svn: r415
This commit is contained in:
parent
55a067ac2e
commit
bc5db8e3df
|
@ -8,7 +8,8 @@
|
|||
(let ([javac
|
||||
(lambda (file)
|
||||
(parameterize ([current-load-relative-directory
|
||||
java.lang])
|
||||
java.lang]
|
||||
[current-directory java.lang])
|
||||
(compile-java 'file
|
||||
'file
|
||||
'full
|
||||
|
|
|
@ -376,8 +376,8 @@
|
|||
(val-editor (caddr example))
|
||||
(val (parse-expression (open-input-text-editor val-editor) val-editor level)))
|
||||
(compile-interactions-ast
|
||||
(make-var-init (make-var-decl name null type #f #f) val #f #f)
|
||||
val-editor level type-recs)))
|
||||
(make-var-init (make-var-decl name null type #f #f) val #f)
|
||||
val-editor level type-recs #t)))
|
||||
contents)
|
||||
(process-extras (cdr extras) type-recs))))
|
||||
((test-case? (car extras))
|
||||
|
|
Loading…
Reference in New Issue
Block a user