Copyright (c) Compaq Computer Corporation 1999, 2001. All rights reserved.

PRODUCT:    DIGITAL DEC PL/I for OpenVMS Alpha, Version 4.2A-112

COMPONENT:  Compiler (DPLI$COMPILER.EXE)

OP/SYS:     Compaq OpenVMS Alpha, Version 6.2 through 7.1

SOURCE:     Compaq Computer Corporation


SYMPTOM:

The PLI/LIST command generates incorrect index level numbers for source
code that contains DO, IF or other nested statements.  Consider the
following example that demonstrates the reported behavior:

     $ TYPE TEST.PLI
     SHELL:  procedure ;
     dcl a fixed bin (15);

     do while (1 = 1) ;
        do while (1 = 1);
           a = a + 1 ;
        end ;
     end ;

     end SHELL ;

     $ PLI /LIST /WARN=NOINFO TEST
     $ TYPE TEST.LIS

     SHELL                     Source Listing

                1 SHELL:          procedure ;
         1      2
         1      3 dcl a fixed bin (15);
         1      4
         1      5 do while (1 = 1) ;
         1      6    do while (1 = 1);
         1      7       a = a + 1 ;
         1      8    end ;
         1      9 end ;
         1     10
         1     11 end SHELL ;

A listing generated by VAX PL/1 shows the correct index level numbers:

         1           SHELL:          procedure ;
         2    1
         3    1      dcl a fixed bin (15);
         4    1
         5    1      do while (1 = 1) ;
         6    2         do while (1 = 1);
         7    3            a = a + 1 ;
         8    3         end ;
         9    2      end ;
        10    1
        11    1      end SHELL ;


COMPAQ RESPONSE:

Support for this product will now be provided by the third party vendor,
KEDNOS at (831)373-7003.


WORKAROUND:

None.  This cosmetic error does not affect program compilation or
execution.

buy online or call 1.800.AT.COMPAQ