* Remove debug statement

git-svn-id: trunk@40935 -

packages/fcl-passrc/src/pparser.pp

@@ -629,7 +629,6 @@ var
     if l <= 0 then
       exit;
     s:=Trim(copy(FPCCommandLine,Start,l));
-    Writeln('Examining >>',S,'<<');
     if (s[1] = '-') and (length(s)>1) then
     begin
       case s[2] of