Changeset 204 for branches/interpreter2/USource.pas
- Timestamp:
- Apr 17, 2020, 11:07:37 PM (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/interpreter2/USource.pas
r203 r204 11 11 TExpressions = class; 12 12 TFunctions = class; 13 TBeginEnd = class; 13 14 14 15 { TValue } … … 98 99 TFunction = class 99 100 Name: string; 101 InternalName: string; 100 102 Params: TFunctionParameters; 101 103 ResultType: TType; 104 BeginEnd: TBeginEnd; 102 105 constructor Create; 103 106 destructor Destroy; override; … … 340 343 begin 341 344 Params := TFunctionParameters.Create; 345 BeginEnd := TBeginEnd.Create; 342 346 end; 343 347 344 348 destructor TFunction.Destroy; 345 349 begin 350 BeginEnd.Free; 346 351 Params.Free; 347 352 inherited Destroy;
Note:
See TracChangeset
for help on using the changeset viewer.