projects
/
lambda.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(no commit message)
[lambda.git]
/
assignment10.mdwn
diff --git
a/assignment10.mdwn
b/assignment10.mdwn
index
8e5bf2d
..
ba4df37
100644
(file)
--- a/
assignment10.mdwn
+++ b/
assignment10.mdwn
@@
-152,7
+152,7
@@
Of course, if you need help or want us to review your efforts, we'll be glad to
((eq? (car lst) before)
(insert-co new before after (cdr lst) (lambda (new-lst lefts rights) (k (cons new (cons before new-lst)) (succ lefts) rights))))
((eq? (car lst) after)
((eq? (car lst) before)
(insert-co new before after (cdr lst) (lambda (new-lst lefts rights) (k (cons new (cons before new-lst)) (succ lefts) rights))))
((eq? (car lst) after)
- (insert-co new before after (cdr lst) (lambda (new-lst lefts rights) (k (cons
(after (cons new new-lst)
)) lefts (succ rights)))))
+ (insert-co new before after (cdr lst) (lambda (new-lst lefts rights) (k (cons
after (cons new new-lst
)) lefts (succ rights)))))
(else
(insert-co new before after (cdr lst) (lambda (new-lst lefts rights) (k (cons (car lst) new-lst) lefts rights)))))))
-->
(else
(insert-co new before after (cdr lst) (lambda (new-lst lefts rights) (k (cons (car lst) new-lst) lefts rights)))))))
-->