[fpc-devel] Porting FPC to IBM zArch

Sven Barth pascaldragon at googlemail.com
Wed Jul 24 13:31:42 CEST 2013


Am 24.07.2013 12:13, schrieb Bernd Oppolzer:
> Oh, so it is already implemented :-)
>
> same here:
>
> TOF:
> 1  LINE #  D/NEST  LVL     < STANFORD PASCAL, OPPOLZER VERSION OF 
> 10.2011 >    12:07:15  07-24-2013    PAGE   1
>
>         1           ) program DECOD ( INPUT , OUTPUT ) ;
>         2           ) (*$N+*)
>         3           ) var I : INTEGER ;
>         4    356D  1)     C1 : CHAR ;
>         5    357D  1)     C2 : CHAR ;
>         6    358D  1)     CH : CHAR ;
>         7    359D  1)     HEX : packed array [ 0 .. 15 ] of CHAR ;
>         8    375D  1)
>         9    375D  1) BEGIN (* HAUPTPROGRAMM *)
>        10           ) (* A (* B (* C *) *) *)
>        11           )   HEX := '0123456789ABCDEF' ;
>        12      1N  1)   I := 0 ;
>        13      1N  1)   while not ( EOF ( INPUT ) ) do
>
> the (*$N+*) comment switches on the nested comment option
In FPC you can use

{$modeswitch nestedcomments}
or
{$modeswitch nestedcomments+}

to switch them on and

{$modeswitch nestedcomments-}

to switch them off.

They are enabled by default in the modes fpc (default mode) and objfpc. 
The modeswitch directive can only be used at the beginning of a 
program/unit though (basically till before the uses section is parsed).

Regards,
Sven



More information about the fpc-devel mailing list