On Sat, Oct 19, 2013 at 2:34 PM, Faré <fahree@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@genworks.com, dave.genworks.com(skype)