adding more experimental code

This commit is contained in:
2021-12-05 16:13:36 +00:00
parent 33bea5418e
commit f7d5599f2b
4 changed files with 119 additions and 12 deletions

View File

@ -113,9 +113,9 @@ private
when PD_VOID =>
null;
when PD_STATEMENT =>
Cmd_Name: S.Elastic_String;
Stmt_Starter: S.Elastic_String;
when PD_ASSIGNMENT =>
Var_Name: S.Elastic_String;
Assign_Starter: S.Elastic_String;
end case;
end record;