-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathtodo
More file actions
57 lines (50 loc) · 1.35 KB
/
todo
File metadata and controls
57 lines (50 loc) · 1.35 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
Outstanding
-----------
- Implement FORMAT
- Implement FIRST
- Implement LIST*
- Implement macros
- Implement packages
- Implement READ and PRINT
- Implement SETF
- Redefine DEFUN as a macro
- Help for property list
- Help for keyword
- Help for symbol
- Help for sexp
- Help for number
- Help for string
( ( (lambda (X)
((lambda (procedure)
(funcall X (lambda (arg) ((funcall procedure procedure) arg))))
(lambda (procedure)
(funcall X (lambda (arg) ((funcall procedure procedure) arg))) ) ) )
(lambda (func-arg)
(lambda (n)
(if (= 0 n)
1
(* n (funcall func-arg (- n 1)))))) ) 5)
Partially Done
--------------
Done
----
D null? symbol? number? list? atom?
D Implement Cadr
D Implement equals
D Implement last
D Implement lambdas
D Implement keywords
D Implement GETF
D Add ' notation for quote
D Define NIL
D Define T
D Implement DEFPARAMETER
D Implement DEFVAR
D Implement IF
D Implement LET
D Implement LET*
(let ( (first (lambda (List) (car List))) ) (funcall first (list 11 2 3 4)))
(let* ( (first (lambda (List) (car List))) ) (funcall first (list 11 2 3 4)))
D Implement LIST
D Implement PROGN
D Implement QUOTE