Runtime evaluation: Difference between revisions

Content added Content deleted
m (Fix missing newline in output of lang example)
(Added FreeBasic)
Line 513: Line 513:
restore
restore
unused . \ same as first unused; restore, foo, and my-def no longer defined</syntaxhighlight>
unused . \ same as first unused; restore, foo, and my-def no longer defined</syntaxhighlight>

=={{header|FreeBASIC}}==
<syntaxhighlight lang="vb">#macro assign(sym, expr)
__fb_unquote__(__fb_eval__("#undef " + sym))
__fb_unquote__(__fb_eval__("#define " + sym + " " + __fb_quote__(__fb_eval__(expr))))
#endmacro

#define a, b, x

assign("a", 8)
assign("b", 7)
assign("x", Sqr(a) + (Sin(b*3)/2))
Print x

assign("x", "goodbye")
Print x

Sleep</syntaxhighlight>
{{out}}
<pre> 3.246754944014219
goodby</pre>


=={{header|Frink}}==
=={{header|Frink}}==