equal
deleted
inserted
replaced
2395 procedure preInitModule; |
2395 procedure preInitModule; |
2396 procedure initModule; |
2396 procedure initModule; |
2397 procedure freeModule; |
2397 procedure freeModule; |
2398 |
2398 |
2399 implementation |
2399 implementation |
|
2400 {$IFNDEF PAS2C} |
2400 uses strutils; |
2401 uses strutils; |
|
2402 {$ENDIF} |
2401 |
2403 |
2402 procedure preInitModule; |
2404 procedure preInitModule; |
2403 begin |
2405 begin |
2404 // initialisation flags - they are going to be overwritten by program args |
2406 // initialisation flags - they are going to be overwritten by program args |
2405 |
2407 |