Fix typo.

svn: r9661 original commit: bd9aaddc3f69c3878dbb3d07399110ef393d76e6
2008-05-05 17:05:09 +00:00 · 2008-05-05 17:05:09 +00:00 · 94cd504b90
commit 94cd504b90
parent 21a115a51c
1 changed files with 1 additions and 1 deletions
--- a/collects/typed-scheme/private/type-effect-printer.ss
+++ b/collects/typed-scheme/private/type-effect-printer.ss
@ -105,7 +105,7 @@
    [(Values: (list v ...)) (fp "~a" (cons 'values v))]
    [(Param: in out) 
     (if (equal? in out)
-         (fp "(Paramter ~a)" in)           
+         (fp "(Parameter ~a)" in)           
         (fp "(Parameter ~a ~a)" in out))]
    [(Hashtable: k v) (fp "(HashTable ~a ~a)" k v)]
    #;