fixed up minor bugs in program and lots of little problems in the test suites
svn: r6173 original commit: 3c5f2c7395bb13b03d134772a64aadd75a6844f0
This commit is contained in:
parent
cb1e7401d4
commit
208e9fb006
|
@ -118,6 +118,14 @@
|
|||
"the second case in the case-lambda sets"
|
||||
"the name of the application to \\var{name}.")
|
||||
|
||||
(preferences:put-preferences/gui
|
||||
(-> (listof symbol?)
|
||||
(listof any/c)
|
||||
any)
|
||||
(name-list val-list)
|
||||
"Like \\scheme{put-preferences}, but passes along"
|
||||
"a \\var{locked-proc} that asks the user if they want to"
|
||||
"try again.")
|
||||
(preferences:add-panel
|
||||
((or/c string? (cons/c string? (listof string?)))
|
||||
((is-a?/c area-container-window<%>)
|
||||
|
|
|
@ -40,6 +40,7 @@
|
|||
;; these extra evals let me submit multiple, independent top-level
|
||||
;; expressions in the newly created namespace.
|
||||
'(begin (eval '(require (lib "unit.ss")))
|
||||
(eval '(require-for-syntax mzscheme))
|
||||
(eval '(require-for-syntax (lib "unit-exptime.ss")))
|
||||
(eval '(define-syntax (signature->symbols stx)
|
||||
(syntax-case stx ()
|
||||
|
|
Loading…
Reference in New Issue
Block a user