Что-то не то...)## Код:
```
PROCEDURE Init;
  VAR res: INTEGER; s: ARRAY 256 OF CHAR;
BEGIN
  (* load realisations for current platform *)
#ifdef Windows
    ASSERT(Kernel.ThisMod('ConsArgsWin') # NIL, 20)
#endif
#ifdef Linux
    ASSERT(Kernel.ThisMod('ConsArgsLin') # NIL, 20)
#endif
```
