Ast environment refactoring
This commit is contained in:
@@ -842,10 +842,10 @@ begin
|
|||||||
FCurrUnboundAst :=
|
FCurrUnboundAst :=
|
||||||
TAstScript.Parse(
|
TAstScript.Parse(
|
||||||
'''
|
'''
|
||||||
(do
|
(do
|
||||||
(print txt)
|
(print txt)
|
||||||
)
|
)
|
||||||
'''
|
'''
|
||||||
);
|
);
|
||||||
|
|
||||||
var fn := FEnvironment.Compile(FCurrUnboundAst, [TAst.Identifier('txt')]);
|
var fn := FEnvironment.Compile(FCurrUnboundAst, [TAst.Identifier('txt')]);
|
||||||
|
|||||||
Reference in New Issue
Block a user