From 289c154f4689ebe2db692984f8b8346cb57dd4a7 Mon Sep 17 00:00:00 2001 From: Norayr Chilingarian Date: Sat, 9 May 2020 01:31:04 +0400 Subject: [PATCH] Output of S.s when there was no text scanned was garbage --- src/vipack.Mod | 1 - src/vpkLogger.Mod | 4 ---- 2 files changed, 5 deletions(-) diff --git a/src/vipack.Mod b/src/vipack.Mod index 3e2f022..173937f 100644 --- a/src/vipack.Mod +++ b/src/vipack.Mod @@ -22,7 +22,6 @@ BEGIN (* Getting 1 argument and outputting it *) Texts.OpenScanner(S, Oberon.Par.text, Oberon.Par.pos); Texts.Scan(S); - Out.String(S.s); Out.Ln; command := S.s; diff --git a/src/vpkLogger.Mod b/src/vpkLogger.Mod index 5f416f7..0b595e2 100644 --- a/src/vpkLogger.Mod +++ b/src/vpkLogger.Mod @@ -62,11 +62,7 @@ BEGIN LogNormalized(sec, 2); Out.String(" :- "); FOR i := 0 TO Strings.Length(buff) - 1 DO - (* Out.Char(" "); - Out.Int(ORD(buff[i]), 4); - Out.Char("-"); *) Out.Char(buff[i]); - (* Out.Char(" ");Out.Char(" ");Out.Char(" "); *) END; Out.Ln; END Log;