RosettaCodeData/Task/Runtime-evaluation-In-an-environment/Transd/runtime-evaluation-in-an-environment.transd

11 lines
193 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
#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)))))
))
}