paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-20 11:09:42 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Remove debug define

Browse Source
This commit is contained in:
Michaël Van Canneyt 2022-12-17 17:19:04 +01:00
parent 4e5eaaf52e
commit 394a4ba6a0
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packages/fcl-pdf/src/fppdfparser.pp
View File

@ -18,7 +18,7 @@ unit fppdfparser;
{$mode ObjFPC}{$H+}
{$J-}
{$DEFINE DEBUGSTREAMS}
{ $DEFINE DEBUGSTREAMS}
{ $DEFINE DUMPSTREAMS}
interface
@ -827,7 +827,9 @@ function TPDFParser.ParseCMap(aStream : TStream) : TPDFCMap;
begin
Result:=TPDFCMap.Create;
try
{$IFDEF DEBUGSTREAMS}
SaveStreamToFile('parsecmap',aStream);
{$ENDIF}
ParseCMap(aStream,Result);
except
Result.Free;