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. -- _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal