[fpc-pascal] importtl tool

José Mejuto joshyfun at gmail.com
Fri Oct 21 13:42:59 CEST 2016


El 21/10/2016 a las 12:32, LacaK escribió:

> So result should be:
>             case FD^.lprgelemdescParam[k].paramdesc.wParamFlags and
> (PARAMFLAG_FIN or PARAMFLAG_FOUT) of
>               PARAMFLAG_FIN or PARAMFLAG_FOUT:sPar:='var ';
>               PARAMFLAG_FOUT:sPar:='out ';
>              else sPar:='constref ';
>             end;

Hello,

Maybe a big note should be added if it is fixed in that way. Or even better


               PARAMFLAG_FOUT:sPar:='out ';
               PARAMFLAG_FIN:sPar:='constref ';
              else sPar:='constref ';

To note that both "constref" are intentional.

-- 




More information about the fpc-pascal mailing list