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

Removed outdated comments

Browse Source
This commit is contained in:
William J. Bowman 2016-01-19 11:09:09 -05:00
parent 4ef32ff3fa
commit b0a5f3fc09
No known key found for this signature in database
GPG Key ID: DDD48D26958F0D1A
2 changed files with 1 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
cur-lib/cur/stdlib/list.rkt
View File

@ -22,16 +22,4 @@
(match n (match n
[z (some A a)] [z (some A a)]
[(s (n-1 : Nat)) [(s (n-1 : Nat))
((recur rest) n-1)]))]) ((recur rest) n-1)]))]))
#;(elim
List
Type
(lambda (A : Type) (ls : (List A))
(-> Nat (Maybe A)))
(lambda (A : Type) (n : Nat) (none A))
(lambda (A : Type) (a : A) (ls : (List A)) (ih : (-> Nat (Maybe A)))
(lambda (n : Nat)
(match n
[z (some A a)]
[(s (n-1 : Nat))
(ih n-1)])))))

2
cur-lib/cur/stdlib/sugar.rkt
View File

@ -28,9 +28,7 @@
(only-in "../cur.rkt" (only-in "../cur.rkt"
[elim real-elim] [elim real-elim]
[#%app real-app] [#%app real-app]
;; Somehow, using real-lambda instead of _lambda causes weird import error
[lambda real-lambda] [lambda real-lambda]
#;[forall real-forall]
[define real-define])) [define real-define]))
(begin-for-syntax (begin-for-syntax