21 lines
162 B
Plaintext
21 lines
162 B
Plaintext
|
|
||
|
|
;; guile:
|
||
|
|
;; 0
|
||
|
|
;; 0
|
||
|
|
|
||
|
|
;; mes:
|
||
|
|
;; 0
|
||
|
|
;; 1
|
||
|
|
|
||
|
|
(define b 0)
|
||
|
|
(define x (lambda () b))
|
||
|
|
|
||
|
|
(display (x))
|
||
|
|
(newline)
|
||
|
|
(define (c b)
|
||
|
|
(display (x))
|
||
|
|
(newline)
|
||
|
|
(x))
|
||
|
|
(c 1)
|
||
|
|
""
|