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

fix dumb typo

Browse Source 
svn: r18018

original commit: 89eb249b00c307f9ff8af3094d7292b3b9939146
This commit is contained in:
Sam Tobin-Hochstadt 2010-02-08 18:21:43 +00:00
parent 0db7c6d821
commit f6c223fc05
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/typed-scheme/private/base-env.ss
View File

@ -37,7 +37,7 @@
[-> (-lst a) a]))]
[cdddr (-poly (a b c d)
(cl->* [->acc (list (-pair a (-pair b (-pair c d)))) d (list -cdr -cdr -cdr)]
[-> (-lst a) a]))]
[-> (-lst a) (-lst a)]))]
[cadddr (-poly (a) (-> (-lst a) a))]
[cddddr (-poly (a) (-> (-lst a) (-lst a)))]