swissChili | 323883d | 2022-02-20 16:35:23 -0800 | [diff] [blame] | 1 | #include "StdLib.h" |
| 2 | #include "PPrint.h" |
| 3 | |
| 4 | StdLib::StdLib() |
| 5 | { |
swissChili | 918557c | 2022-02-20 20:16:34 -0800 | [diff] [blame] | 6 | _print.addNativeSentence("e.Expr", [](VarContext args) |
swissChili | 323883d | 2022-02-20 16:35:23 -0800 | [diff] [blame] | 7 | { |
swissChili | 918557c | 2022-02-20 20:16:34 -0800 | [diff] [blame] | 8 | auto expr = args.expressionVar("Expr"); |
| 9 | sout(pprint(args.expressionVar("Expr"))); |
| 10 | return expr; |
swissChili | 323883d | 2022-02-20 16:35:23 -0800 | [diff] [blame] | 11 | }); |
| 12 | |
swissChili | 918557c | 2022-02-20 20:16:34 -0800 | [diff] [blame] | 13 | _prout.addNativeSentence("e.Expr", [](VarContext args) |
swissChili | 323883d | 2022-02-20 16:35:23 -0800 | [diff] [blame] | 14 | { |
swissChili | 918557c | 2022-02-20 20:16:34 -0800 | [diff] [blame] | 15 | auto expr = args.expressionVar("Expr"); |
| 16 | sout(pprint(expr)); |
swissChili | 323883d | 2022-02-20 16:35:23 -0800 | [diff] [blame] | 17 | return QList<Token>(); |
| 18 | }); |
| 19 | } |
| 20 | |
| 21 | void StdLib::load(Evaluator &eval) |
| 22 | { |
| 23 | eval.addFunction(_print); |
| 24 | eval.addFunction(_prout); |
| 25 | } |