suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

* catch configuration error in extra-utils

Browse Source 
* clarified !test macro

svn: r2866
This commit is contained in:
Eli Barzilay 2006-05-05 20:08:25 +00:00
parent 87e66f8af8
commit 74307c1aef
2 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/handin-server/doc.txt
View File

@ -930,7 +930,8 @@ value from the submission code.
non-#f value in the submission context, throwing an error
otherwise. The second form compares the result of evaluation,
requiring it to be equal to `result' (optionally specifying an
equality procedure).
equality procedure). Note that the `result' and `equal?' forms are
*not* evaluated in the submission context.
> (!all-covered)
When coverage information is enabled (see `:coverage?' above), this

5
collects/handin-server/extra-utils.ss
View File

@ -29,8 +29,9 @@
(error (apply format fmt args)))
(define fields
(map car (get-preference 'extra-fields (lambda () #f) #f
(build-path server-dir "config.ss"))))
(map car (or (get-preference 'extra-fields (lambda () #f) #f
(build-path server-dir "config.ss"))
(error* "bad configuration file: missing extra-fields entry"))))
(provide submission-dir)
(define submission-dir-re