11 lines
193 B
Text
11 lines
193 B
Text
|
|
#lang transd
|
||
|
|
|
||
|
|
MainModule: {
|
||
|
|
code: "(+ 5 x)",
|
||
|
|
|
||
|
|
_start: (lambda (textout
|
||
|
|
(- (to-Int (with x 100 (snd (eval code))))
|
||
|
|
(to-Int (with x 1 (snd (eval code)))))
|
||
|
|
))
|
||
|
|
}
|