Fix typo.

svn: r9661
2008-05-05 17:05:09 +00:00 · 2008-05-05 17:05:09 +00:00 · bd9aaddc3f
commit bd9aaddc3f
parent 1f7207f0b5
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)]
    #;