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

svn: r415

Browse Source
This commit is contained in:
Kathy Gray 2005-07-21 14:39:22 +00:00
parent 55a067ac2e
commit bc5db8e3df
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/profj/libs/java/lang/installer.ss
View File

@ -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

4
collects/profj/tool.ss
View File

@ -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))