RosettaCodeData/Task/Metaprogramming/M2000-Interpreter/metaprogramming.m2000

15 lines
214 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
Module Meta {
FunName$="Alfa"
Code1$=FunName$+"=lambda (X)->{"
Code2$={
=x**2
}
Code3$="}"
Inline code1$+code2$+code3$
Print Function(FunName$, 4)=16
}
Meta