summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2015-10-26 11:27:59 +0100
committerErich Eckner <git@eckner.net>2015-10-26 14:40:06 +0100
commitf8ac270273dfdbe355b53687a603c97f60af7f04 (patch)
treead2153c2ca82a25ed8f7d33f56fe2317b82f745c
parentfc10e60f56e9714b6c295152e4d8d8b4f7278261 (diff)
downloadunits-f8ac270273dfdbe355b53687a603c97f60af7f04.tar.xz
irdecoderunit.pas erzeugt im Debugmodus jetzt eine Kopie des Inputs
-rw-r--r--irdecoderunit.pas7
1 files changed, 4 insertions, 3 deletions
diff --git a/irdecoderunit.pas b/irdecoderunit.pas
index c60b42b..7dd6a25 100644
--- a/irdecoderunit.pas
+++ b/irdecoderunit.pas
@@ -93,9 +93,10 @@ begin
assignFile(debugDatei,tmpdir+'/debug');
rewrite(debugDatei);
closefile(debugDatei);
- end;
-
- ttySLeser:=tLeseProzess.create(inputName,1);
+ ttySLeser:=tLeseProzess.create(inputName,tmpdir+'/kopie',1)
+ end
+ else
+ ttySLeser:=tLeseProzess.create(inputName,1);
fillchar(eingabePuffer,sizeof(eingabePuffer),#0);
init;
end;