patch for allegro8 (was: Re: [asdf-devel] Ready to release?)

[Dave Cooper]

On Sat, Oct 19, 2013 at 2:34 PM, Faré <fahree at gmail.com> wrote:

>
> Now, it's possible that the test is failing to touch files in the
> cache the same way that they are used in the test, because of all the
> pathname normalizations that may happen, but that the discrepancy
> somehow only shows up on Windows.



The failure was happening on MacOS, Linux, and Windows --- not just on
Windows.



> Ahem. Maybe I could normalize this
> cache by using the namestring or native-namestring as the key, instead
> of the pathname object? Probably.
>
> OK, done, please try again (sigh).
>
>

Starting from a fresh git clone of asdf (which was reliably producing the
problem previously), now we don't get any failures with test-force.script
on any platforms.

But I am still getting stamp-propagation failures on Windows with mlisp
after having run mlisp8 (and I think it would also fail if running mlisp8
after mlisp). I will send the console output from that separately.  I
suspect this is indeed an issue with files left over after the run of mlisp
polluting the mlisp8 run. I'll confirm that by clearing build/ before each
run and see if the failures still occur.

Regarding the touching of files: does the below transcript look correct?
(this is on CCL/Mac, and look at the bottom where i check the file-stamp
after having done the touch-file):



bash-3.2$ /Users/dcooper8/genworks/cl-engines/ccl-mac-1.9/dx86cl64
--no-init --quiet
Welcome to Clozure Common Lisp Version 1.9-r15759  (DarwinX8664)!
? (load "script-support.lisp")
#P"/Users/dcooper8/genworks/cl/tests/asdf/asdf-macos/test/script-support.lisp"
? (asdf-test::da)
#<Package "ASDF-TEST">
? (load-asdf)
;Loading
#P"/Users/dcooper8/genworks/cl/tests/asdf/asdf-macos/build/fasls/ccl/asdf.dx64fsl"...Configuring
ASDF
Enabling debugging
Being a bit verbose
Comparing directories
*TEST-DIRECTORY* and X both evaluate to same path:
  #P"/Users/dcooper8/genworks/cl/tests/asdf/asdf-macos/test/"
T
? (frob-packages)
Frob packages
T
? (load-system 'test-force)
;Loading
#P"/Users/dcooper8/genworks/cl/tests/asdf/asdf-macos/test/test-force.asd"...
;Loading
#P"/Users/dcooper8/genworks/cl/tests/asdf/asdf-macos/build/fasls/ccl-1.9-f96-macosx-x64/asdf/test/file1.dx64fsl"...
T
? (defparameter file1 (test-fasl "file1"))
FILE1
? (defparameter file1-date (file-write-date file1))
FILE1-DATE
? (defparameter date1 (- file1-date 600))
DATE1
? (defparameter date2 (- file1-date 300))
DATE2
? file1
#P"/Users/dcooper8/genworks/cl/tests/asdf/asdf-macos/build/fasls/ccl-1.9-f96-macosx-x64/asdf/test/file1.dx64fsl"
? file1-date
3591196920
? (file-write-date "test-force.asd")
3591196848
? (get-file-stamp "test-force.asd")
3591196848
? (asdf/cache:with-asdf-cache () (get-file-stamp "test-force.asd"))
3591196848
? date1
3591196320
? (asdf/cache:with-asdf-cache () (touch-file "test-force.asd" :timestamp
date1))
3591196320
? (asdf/cache:with-asdf-cache () (get-file-stamp "test-force.asd"))
3591196848
?



-- 
My Best,

Dave Cooper, Genworks Support
david.cooper at genworks.com, dave.genworks.com(skype)
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/asdf-devel/attachments/20131019/2ba3f07d/attachment.html>