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