diff --git a/SYMBOL/ALGOL.alg_m b/SYMBOL/ALGOL.alg_m index 7b6798f..0eaa4fb 100644 --- a/SYMBOL/ALGOL.alg_m +++ b/SYMBOL/ALGOL.alg_m @@ -12211,7 +12211,7 @@ PROCEDURE DSS; 16362000 IF ELCLASS = LITV THEN 16381000 BEGIN 16382000 EMITC(ADDR,TRP); 16383000 - IF STEPI!STRING AND ELCLASS!STRNGCON AND %111-16384000 + IF STEPI ! STRING AND ELCLASS ! STRNGCON AND %111-16384000 ELCLASS ! LITNO AND ELCLASS ! NONLITNO THEN %111-16384100 BEGIN ERR(255);GO TO EXIT END; 16384500 IF ELCLASS = LITNO OR ELCLASS = NONLITNO THEN %111-16384700