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