Copyright (c) Digital Equipment Corporation 1996, 1998. All rights reserved.

PRODUCT:  DIGITAL DEC PL/I for OpenVMS Alpha, Version 4.1-1

OP/SYS:   DIGITAL OpenVMS Alpha, Version 6.2

SOURCE:   Digital Equipment Corporation


SYMPTOM:

A DEC PL/I program on OpenVMS Alpha that uses a compile-time preprocessor
%PROCEDURE to quote the NUL character (ASCII 0) does not compile.  The
compiler aborts with the following error messages:

     %PLIG-F-BUGCHECK, Compiler bug check during syntax phase    .
         Submit an SPR with a problem description.

     %PLIG-I-NOBJECT, No object file produced.


EXAMPLE:

The follow example demonstrates the reported behavior:

     example1.pli

     %byte_char: procedure (char_num) returns( character );
     %declare char_num fixed;

     %if char_num ^= 39
     %then
         return('''' || byte(char_num) || '''');
     %else
         return('''' || '''''' || '''');
      %end;

      test : procedure options(main);
          declare table_init(3) character(1) static readonly init(
              byte_char(0), byte_char(1), byte_char(2));
          declare table character(3) based(addr(table_init));

          put edit('table = ', '''', table, '''')(a,a,a,a);
          put skip;
      end test;

     $ pli example1.pli

     %PLIG-F-BUGCHECK, Compiler bug check during syntax phase    .
                      Submit an SPR with a problem description.

     %PLIG-I-NOBJECT, No object file produced.


DIGITAL RESPONSE:

UniPrise[TM] Engineering has acknowledged this problem and plans to
address it in a future release.


WORKAROUND:

Place the character into the source file instead of computing it at
compile time via the preprocessor.


[TM]  UniPrise and the UniPrise logo are trademarks of UniPrise Systems
      Incorporated.

All other trademarks and registered trademarks are the property of their
respective owners.

buy online or call 1.800.AT.COMPAQ