[open-cobol-list] minor preprocessor bug

[David Korn]

cc:  address@hidden
Subject: minor preprocessor bug
--------


=============prog2.cob===========================
       COPY MYCOPY REPLACING = XX-= BY = LK-=.
=============end prog2.cob===========================
=============MYCOPY===========================
01 XX-ORIG-NPA-NXX-ZZ
=============end MYCOPY===========================

cobc -static -std=mvs -E prog2.cob
# 1 "prog2.cob"

# 1 "MYCOPY"
       01 LK-ORIG-NPA-NLK-ZZ
# 1 "prog2.cob"



Note that the space before the second XX but it is still being replaced.
It is behaving like
       COPY MYCOPY REPLACING =XX-= BY =LK-=.

David Korn
address@hidden