11 lines
100 B
Scheme
11 lines
100 B
Scheme
|
|
(define-integer one 1)
|
|
|
|
(display one)
|
|
(newline)
|
|
|
|
(set-integer! one "one")
|
|
|
|
(display one)
|
|
(newline)
|