dont ignore checker body if not evaluating submission
svn: r1029
This commit is contained in:
parent
af24612618
commit
dff3e69814
|
@ -674,6 +674,9 @@ Keywords for configuring `check:':
|
||||||
below).
|
below).
|
||||||
|
|
||||||
* :eval? -- whether submissions should be evaluated. Defaults to #t.
|
* :eval? -- whether submissions should be evaluated. Defaults to #t.
|
||||||
|
Note that if it is specified as #f, then the checker body will not
|
||||||
|
be able to run any tests on the code, unless it contains code that
|
||||||
|
performs some evaluation (eg, using the facilities of "utils.ss").
|
||||||
|
|
||||||
* :language -- the language that is used for evaluating submissions,
|
* :language -- the language that is used for evaluating submissions,
|
||||||
same as the `language' argument for `make-evaluator' (see above).
|
same as the `language' argument for `make-evaluator' (see above).
|
||||||
|
|
|
@ -349,7 +349,7 @@
|
||||||
body*1 body* (... ...))])])
|
body*1 body* (... ...))])])
|
||||||
(let () body ...))
|
(let () body ...))
|
||||||
(when (thread-cell-ref added-lines) (write-text))))]
|
(when (thread-cell-ref added-lines) (write-text))))]
|
||||||
[(not eval?) #t]
|
[(not eval?) (let () body ...)]
|
||||||
[else (error* "no language configured for submissions")])
|
[else (error* "no language configured for submissions")])
|
||||||
output-file)
|
output-file)
|
||||||
;; ========================================
|
;; ========================================
|
||||||
|
|
Loading…
Reference in New Issue
Block a user