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

tweaked wording of any error message

Browse Source 
svn: r6071
This commit is contained in:
Robby Findler 2007-04-28 20:21:04 +00:00
parent 352e9c8b2b
commit bbb4f1c307
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/mzlib/private/contract-arrow.ss
View File

@ -60,7 +60,7 @@
procedure?))))]))
(define-syntax (any stx)
(raise-syntax-error 'any "Use any out of an arrow contract" stx))
(raise-syntax-error 'any "use of any outside of an arrow contract" stx))
;; FIXME: need to pass in the name of the contract combinator.
(define (build--> name doms doms-rest rngs rng-any? func)