Runtime evaluation/In an environment: Difference between revisions

Content added Content deleted
m (→‎{{header|Octave}}: modified to resemble to other examples)
m (→‎{{header|Metafont}}: modified to resemble to other examples)
Line 84: Line 84:
=={{header|Metafont}}==
=={{header|Metafont}}==


<lang metafont>vardef evalit(expr s, v) =
<lang metafont>vardef evalit(expr s, va, vb) =
save x; x := v; scantokens s
save x,a,b; x := va; a := scantokens s;
x := vb; b := scantokens s; a-b
enddef;
enddef;


a := evalit("2x+1", 5);
show(evalit("2x+1", 5, 3));
b := evalit("2x+1", 2);
show (a-b);
end</lang>
end</lang>