From 2095541b452eb53ba035397e5a3af2f0d487f372 Mon Sep 17 00:00:00 2001 From: Paul Kimpel Date: Sat, 2 Aug 2014 15:11:22 +0000 Subject: [PATCH] Commit debugging patches to B6500 ESPOL compiler as of 2014-08-02. --- source/B65ESPOL/SOURCE.alg_m | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/source/B65ESPOL/SOURCE.alg_m b/source/B65ESPOL/SOURCE.alg_m index d53407a..39f8c4e 100644 --- a/source/B65ESPOL/SOURCE.alg_m +++ b/source/B65ESPOL/SOURCE.alg_m @@ -6324,7 +6324,7 @@ COMMENT * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 70000000 IF STEPI ! UNKNOWNID THEN % BUT THIS HAS ALREADY BEEN 70021000 FLAG(700); % DECLARED. 70022000 IF NOT ENTER(SPAZE,TIPE,KLASS,C) THEN % 70023000 - IF B > 0 THEN % B IS INITIAL-VALUE TYPE 70024000 + IF B } 0 THEN % B IS INITIAL-VALUE TYPE 70024000 IF TABLE(I+1) = ASSNOP THEN % DID HE GIVE ONE 70025000 BEGIN % WELL, COMPILE IT 70026000 IF B=EVNTV THEN FLAG(783); 70026500