It works =D
Mattias, can I commit?
Index: pascalparsertool.pas
===================================================================
--- pascalparsertool.pas (revision 32060)
+++ pascalparsertool.pas (working copy)
@@ -1172,7 +1172,7 @@
begin
// read parameter prefix modifier
if UpAtomIs('VAR') or UpAtomIs('CONST') or UpAtomIs('CONSTREF')
- or (UpAtomIs('OUT') and (Scanner.CompilerMode in
[cmOBJFPC,cmDELPHI,cmFPC]))
+ or (UpAtomIs('OUT') and (Scanner.CompilerMode in [cmOBJFPC,cmDELPHI]))
then begin
if not Extract then
ReadNextAtom
--
Felipe Monteiro de Carvalho
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
