/[gcl]/gcl/ansi-tests/compile-and-load.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/compile-and-load.lsp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.5 by pfdietz, Tue Jun 17 12:43:11 2003 UTC revision 1.6 by pfdietz, Wed Jun 18 11:55:24 2003 UTC
# Line 30  Line 30 
30                                   (file-write-date compile-pathname))))                                   (file-write-date compile-pathname))))
31      (unless (and (not force)      (unless (and (not force)
32                   former-data                   former-data
33                   (<= (cadr former-data) source-write-time))                   (>= (cadr former-data) source-write-time))
34        (when (or (not target-write-time)        (when (or (not target-write-time)
35                  (<= target-write-time source-write-time))                  (<= target-write-time source-write-time))
36          (compile-file pathname))          (compile-file pathname))

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26