diff --git a/.gitignore b/.gitignore index 342f79ddeb472b9592592b6883b87463eb802ace..08d5a1db688868a96b7618717c83bb90d3e547e2 100644 --- a/.gitignore +++ b/.gitignore @@ -1,12 +1,8 @@ -# really this is private to my build process ? ?? ??? -???? -????? -generate-asdf.lisp +build -# Temporary files from documentation build doc/asdf/ doc/asdf.aux doc/asdf.cp @@ -25,7 +21,6 @@ doc/asdf.vr doc/asdf.vrs doc/asdf.t2d/ -# We build these at various stages in the build and test process LICENSE tmp/ *.dribble @@ -43,7 +38,6 @@ tmp/ test/try-reloading-dependency.asd test/fileMissing.lisp -# debian stuff build-stamp debian/cl-asdf.debhelper.log debian/cl-asdf.postinst.debhelper diff --git a/test/package-test.lisp b/test/package-test.lisp new file mode 100644 index 0000000000000000000000000000000000000000..1bff24b7c70ce09cae8dc314731042ad0bd9e5de --- /dev/null +++ b/test/package-test.lisp @@ -0,0 +1,2 @@ +(in-package :asdf/package) + diff --git a/test/script-support.lisp b/test/script-support.lisp index bd37e25b6b1eb1133e91b3f551ee6d4ea7420e77..fa179cff3a16e855a6b1a3a60ea70eccfe2ffe0c 100644 --- a/test/script-support.lisp +++ b/test/script-support.lisp @@ -340,7 +340,7 @@ is bound, write a message and exit on an error. If `(testing-asdf #'(lambda () ,@body))) (defun close-inputs () - (close *standard-input*)) + #-ecl (close *standard-input*)) (defun configure-asdf () (untrace) diff --git a/test/static-and-serial.asd b/test/static-and-serial.asd new file mode 100644 index 0000000000000000000000000000000000000000..2e4842aa04676f9a363d4b4058392794804c8e44 --- /dev/null +++ b/test/static-and-serial.asd @@ -0,0 +1,12 @@ +#| +make sure that serial t and static-files don't cause full rebuilds all +the time... +|# + +(defsystem static-and-serial + :version "0.1" + :serial t + :components + ((:static-file "file2.lisp") + (:static-file "run-tests.sh") + (:file "file1"))) diff --git a/test/test-concatenate-source.lisp b/test/test-concatenate-source.lisp new file mode 100644 index 0000000000000000000000000000000000000000..7ae35a131316d3c2d9fce503f78603f8e2f17399 --- /dev/null +++ b/test/test-concatenate-source.lisp @@ -0,0 +1,8 @@ +(defpackage :test-package (:use :cl)) +(in-package :test-package) +(defvar *file3* t) +(defpackage :test-package (:use :cl)) +(in-package :test-package) +(defvar *file1* t) +(in-package :test-package) +(assert *file1*)