spell util correctly

svn: r4060
This commit is contained in:
Matthew Flatt 2006-08-13 13:49:55 +00:00
parent b69603ce03
commit 22e4122a81

View File

@ -7,7 +7,7 @@
name))
(when (system (format "gcc -o ~a -O2 -D___SINGLE_HOST ~a.c ~a_.c -lgambc -lm -ldl~a"
name name name
(if (file-exists? "/usr/lib/libtuil.a")
(if (file-exists? "/usr/lib/libutil.a")
" -lutil"
"")))
(delete-file (format "~a.c" name))