gnucobol-users
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[open-cobol-list] enhancement to cobpp


From: Richard A. Painter
Subject: [open-cobol-list] enhancement to cobpp
Date: Tue Jun 4 23:49:01 2002

we have a LOT of code that uses the following format:
        COPY XXXX OF "XXXX".
which produces a parse error.

would it be possible to allow this to function the same as:
        COPY XXXX.

i have added the following code to my cobpp tree to make this happen:

cobpp/scanner.l:
  existing: "OFF"                       { return OFF; }
  added:    "OF"                        { return OF; }

cobpp/parser.y:
change: %token COPY, REPLACE, REPLACING, OFF, BY
to:     %token COPY, REPLACE, REPLACING, OFF, BY, OF

after: COPY NAME '.'                  { include_copybook ($2, NULL); }
add:   | COPY NAME OF NAME '.'                  { include_copybook ($2, NULL); }


rich
-- 

+---------------------------------------------------------------+
| Richard A. Painter            Phone 719 495 7054              |
| Painter Engineering, Inc.     Mailto:address@hidden       |
| 8470 Swan Rd.                                                 |
| Black Forest, CO 80908                                        |
|                                                               |
| Visit our Web site:         http://painter.inc                |
|         http://home.earthlink.net/~painterengineering         |
|                                                               |
| Systems & Software Engineering + LAN WAN Networking + X.25    |
| INTERNET TCP-IP + Real-time Transaction Processing            |
| System & Software Integration, Testing, Verification & Audits |
| Web Hosting & Design + Apache + PHP + modSSL + cURL           |
| Database Design & Applications + Oracle                       |
| Benchmarks + Course & Workshop Development & Delivery         |
| Financial and Medical Software Integration + Security         |
| Middleware + EDI + Cryptography + Firewalls                   |
| UNIX + Linux + Windows                                        |
|                                                               |
| What is popular is not always right and what is right is not  |
| always popular.     - Howard Cosell                           |
|                                                               |
| Chance favors the prepared mind!   Illegitima non carborundum |
+---------------------------------------------------------------+



reply via email to

[Prev in Thread] Current Thread [Next in Thread]