A user-defined Scheme procedure.
| 20 | "quasiquote unquote unquote-splicing".split()) |
| 21 | |
| 22 | class Procedure: |
| 23 | "A user-defined Scheme procedure." |
| 24 | def __init__(self, parms, exp, env): |
| 25 | self.parms, self.exp, self.env = parms, exp, env |
| 26 | def __call__(self, *args): |
| 27 | return eval(self.exp, Env(self.parms, args, self.env)) |
| 28 | |
| 29 | ################ parse, read, and user interaction |
| 30 |