Changeset 28 for branches/Analyzátor gramatiky/UGrammer.pas
- Timestamp:
- Nov 11, 2009, 10:30:00 AM (15 years ago)
- Location:
- branches/Analyzátor gramatiky
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/Analyzátor gramatiky
- Property svn:ignore
-
old new 1 1 *.exe 2 2 *.dcu 3 backup 4 lib
-
- Property svn:ignore
-
branches/Analyzátor gramatiky/UGrammer.pas
r17 r28 1 1 unit UGrammer; 2 3 {$MODE Delphi} 2 4 3 5 interface … … 9 11 TGrammerRule = class; 10 12 11 TPathItem = record13 TPathItem = class 12 14 public 13 15 Rule: TGrammerRule; … … 18 20 end; 19 21 20 TGrammerPath = record22 TGrammerPath = class 21 23 Items: array of TPathItem; 22 24 procedure Assign(Source: TGrammerPath); … … 24 26 end; 25 27 26 TPossibleCharacter = record28 TPossibleCharacter = class 27 29 Character: Char; 28 30 RulePath: TGrammerPath; … … 30 32 end; 31 33 32 TPossibleCharacters = record34 TPossibleCharacters = class 33 35 Items: array of TPossibleCharacter; 34 36 procedure Assign(Source: TPossibleCharacters);
Note:
See TracChangeset
for help on using the changeset viewer.