1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-24 20:30:28 +02:00

* tests/r4rs.test: delete files tmp1, tmp2, tmp3 after the tests

have run.

	* tests/ports.test (test-file), tests/load.test (temp-dir):
	redefined using data-file-name instead of tmpnam.  the test files
	will be created in the build directory instead of /var/tmp or
	whereever tmpnam puts them.
This commit is contained in:
Gary Houston 2001-04-25 23:13:52 +00:00
parent 8acc3515a0
commit c685b42fa3
4 changed files with 16 additions and 2 deletions

View file

@ -1018,3 +1018,7 @@
;; alternatively execute every test file's code in a module of its own
(if (defined? 'x) (undefine x))
(if (defined? 'y) (undefine y))
(delete-file (data-file-name "tmp1"))
(delete-file (data-file-name "tmp2"))
(delete-file (data-file-name "tmp3"))