Changeset 19 for branches/DelphiToC/Example.pas

Timestamp:

Apr 9, 2009, 2:08:56 PM (16 years ago)

Author:

george

Message:

• Přidáno: Nástřel parsování funkcí.
• Přidáno: Zobrazení stromu struktury programu.
• Opraveno: Zobrazení chybových hlášení.

File:

• branches/DelphiToC/Example.pas (modified) (1 diff)

branches/DelphiToC/Example.pas

@@ -1 +1 @@
 program Test;
+
+procedure Pokus;
+begin
+end;
+
+const
+  Verze: Byte = 10;
 var
-  a: Byte;
+  a: Bpyte;
   B: Byte;
+  sS: Byte;
 begin
   A := 1;
-end;
+end.