with Text_IO; use Text_IO; with Variables; use Variables; with Parse_Tree; use Parse_Tree; package Interpreter is -- the Interpret() procedure executes the code given in the abstract -- syntax tree it is given. procedure Interpret(Root : Parse_Node_Access); end Interpreter;