package Scripting.Statements.Methods is
type Method is new Statement with private;
type A_Method is access all Method'Class;
function Create_Method return A_Method;
procedure Set_Function