W95 compile fails, mainframe OK, help? 
Author Message
 W95 compile fails, mainframe OK, help?

I have a test program (below) which compiles on the mainframe using
PLI23 and MVS/esa but will not compile on PLI for Windows and I cannot
really see why

Any help appreciated
Obviously just a test but I have many real programs which I would like
to port. The online manuals with IBMPLIW give some limitations with
controlled variables but does not (in my mind) describe this situation.

5639-A24 IBM PL/I for Windows  V1.R2.38 1998.01.22 13:36:21  Page 1    
 Line.File                                                                  

    1.1      TEST1: PROC OPTIONS(MAIN);              
    2.1      DECLARE SYSPRINT FILE;                  
    3.1      DECLARE  DD_PTR POINTER,                
                    1 DD_VECTOR BASED(DD_PTR),        
                      2 CHAR_PTR     POINTER,        
                      2 REP          FIXED BIN(15),  
                      2 RESERVED_A   FIXED BIN(15),  
                      2 VPTR         POINTER;        
    9.1      DECLARE                                  
                    1 NVECTOR BASED(DD_VECTOR.VPTR),  
                      2 EXTENT FIXED BIN(15),        
                      2 NUMBER(EXTENT REFER(NVECTOR.EXTENT))
                               FIXED DEC(15,5),              
                    1 CVECTOR BASED(DD_VECTOR.VPTR),        
                      2 EXTENT FIXED BIN(15),                
                      2 ATOM(EXTENT REFER(CVECTOR.EXTENT)),  
                       (3 START,                            
                        3 LEN) FIXED BIN(15);                
   19.1      PUT SKIP EDIT('PROGRAM ENDED') (A);            
   20.1      END;                                            

5639-A24 IBM PL/I for Windows  V1.R2.38  1998.01.22 13:36:21   Page 2    

Compiler Messages
Message     Line.File  Message Description
IBM1881I S     9.1     The reference EXTENT is ambiguous.
IBM1881I S     9.1     The reference EXTENT is ambiguous.

File Reference Table
  File    Included From  Name

     1                   E:\MitrolPC\ddtest.pli

Component    Return Code    Messages (Total/Suppressed)    Time
Compiler        12                2  /  0                   0 secs
End of compilation of TEST1

Environment is
set ibm.options=nc(w) langlvl(os) mar(2 72) not('?') gs s ~
         xref nest default(nonnative) options system(s486)

Comments and correction anyone?
TIA

John Wood                                                Birmingham UK



Mon, 10 Jul 2000 03:00:00 GMT  
 W95 compile fails, mainframe OK, help?

        >I have a test program (below) which compiles on the mainframe using
        >PLI23 and MVS/esa but will not compile on PLI for Windows and I cannot
        >really see why

        >Any help appreciated
        >Obviously just a test but I have many real programs which I would like
        >to port. The online manuals with IBMPLIW give some limitations with
        >controlled variables but does not (in my mind) describe this situation.

        >5639-A24 IBM PL/I for Windows  V1.R2.38 1998.01.22 13:36:21  Page 1    
        > Line.File                                                                  
        >
        >    1.1      TEST1: PROC OPTIONS(MAIN);              
        >    2.1      DECLARE SYSPRINT FILE;                  
        >    3.1      DECLARE  DD_PTR POINTER,                
        >                    1 DD_VECTOR BASED(DD_PTR),        
        >                      2 CHAR_PTR     POINTER,        
        >                      2 REP          FIXED BIN(15),  
        >                      2 RESERVED_A   FIXED BIN(15),  
        >                      2 VPTR         POINTER;        
        >    9.1      DECLARE                                  
        >                    1 NVECTOR BASED(DD_VECTOR.VPTR),  
        >                      2 EXTENT FIXED BIN(15),        
        >                      2 NUMBER(EXTENT REFER(NVECTOR.EXTENT))

Quote:
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>~~~~~~

This reference to EXTENT looks ambiguous to me.
Presumably it should be NVECTOR.EXTENT

        >                               FIXED DEC(15,5),              
        >                    1 CVECTOR BASED(DD_VECTOR.VPTR),        
        >                      2 EXTENT FIXED BIN(15),                
        >                      2 ATOM(EXTENT REFER(CVECTOR.EXTENT)),  

Quote:
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>~~~~~~

Likewise this one, should be CVECTOR.EXTENT.

        >                       (3 START,                            
        >                        3 LEN) FIXED BIN(15);                
        >   19.1      PUT SKIP EDIT('PROGRAM ENDED') (A);            
        >   20.1      END;                                            

        >5639-A24 IBM PL/I for Windows  V1.R2.38  1998.01.22 13:36:21   Page 2    
        >
        >Compiler Messages
        >Message     Line.File  Message Description
        >IBM1881I S     9.1     The reference EXTENT is ambiguous.
        >IBM1881I S     9.1     The reference EXTENT is ambiguous.

        >File Reference Table
        >  File    Included From  Name

        >     1                   E:\MitrolPC\ddtest.pli

        >Component    Return Code    Messages (Total/Suppressed)    Time
        >Compiler        12                2  /  0                   0 secs
        >End of compilation of TEST1

        >Comments and correction anyone?
        >TIA

        >John Wood                   Birmingham UK



Tue, 11 Jul 2000 03:00:00 GMT  
 W95 compile fails, mainframe OK, help?

Quote:

> I have a test program (below) which compiles on the mainframe using
> PLI23 and MVS/esa but will not compile on PLI for Windows and I cannot
> really see why

I don't believe that this program compiles anywhere. The error messages
mean that it's unclear what the variables EXTENT are (after NUMBER and
ATOM resp.). Probably you only forgot the declaration. EXTENT must be a
variable outside NVECTOR and CVECTOR resp.

Regards

/*---------------------------------------------------------------*/
     /* Eberhard Sturm                   Tel: +49-251-83-31679 (NEU!) */
    /* Universitaetsrechenzentrum       Fax: +49-251-83-31555 (NEU!) */

  /* D-48149 Muenster                                  "TEAM PL/I" */
 /* http://www.uni-muenster.de/URZ/Mitarbeiter/EberhardSturm.html */
/*---------------------------------------------------------------*/

Quote:
> 5639-A24 IBM PL/I for Windows  V1.R2.38 1998.01.22 13:36:21  Page 1
>  Line.File

>     1.1      TEST1: PROC OPTIONS(MAIN);
>     2.1      DECLARE SYSPRINT FILE;
>     3.1      DECLARE  DD_PTR POINTER,
>                     1 DD_VECTOR BASED(DD_PTR),
>                       2 CHAR_PTR     POINTER,
>                       2 REP          FIXED BIN(15),
>                       2 RESERVED_A   FIXED BIN(15),
>                       2 VPTR         POINTER;
>     9.1      DECLARE
>                     1 NVECTOR BASED(DD_VECTOR.VPTR),
>                       2 EXTENT FIXED BIN(15),
>                       2 NUMBER(EXTENT REFER(NVECTOR.EXTENT))
>                                FIXED DEC(15,5),
>                     1 CVECTOR BASED(DD_VECTOR.VPTR),
>                       2 EXTENT FIXED BIN(15),
>                       2 ATOM(EXTENT REFER(CVECTOR.EXTENT)),
>                        (3 START,
>                         3 LEN) FIXED BIN(15);
>    19.1      PUT SKIP EDIT('PROGRAM ENDED') (A);
>    20.1      END;

> 5639-A24 IBM PL/I for Windows  V1.R2.38  1998.01.22 13:36:21   Page 2

> Compiler Messages
> Message     Line.File  Message Description
> IBM1881I S     9.1     The reference EXTENT is ambiguous.
> IBM1881I S     9.1     The reference EXTENT is ambiguous.

> File Reference Table
>   File    Included From  Name

>      1                   E:\MitrolPC\ddtest.pli

> Component    Return Code    Messages (Total/Suppressed)    Time
> Compiler        12                2  /  0                   0 secs
> End of compilation of TEST1



Tue, 11 Jul 2000 03:00:00 GMT  
 W95 compile fails, mainframe OK, help?



Quote:
>       >    1.1      TEST1: PROC OPTIONS(MAIN);              
>       >    2.1      DECLARE SYSPRINT FILE;                  
>       >    3.1      DECLARE  DD_PTR POINTER,                
>       >                    1 DD_VECTOR BASED(DD_PTR),        
>       >                      2 CHAR_PTR     POINTER,        
>       >                      2 REP          FIXED BIN(15),  
>       >                      2 RESERVED_A   FIXED BIN(15),  
>       >                      2 VPTR         POINTER;        
>       >    9.1      DECLARE                                  
>       >                    1 NVECTOR BASED(DD_VECTOR.VPTR),  
>       >                      2 EXTENT FIXED BIN(15),        
>       >                      2 NUMBER(EXTENT REFER(NVECTOR.EXTENT))
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>~~~~~~
>This reference to EXTENT looks ambiguous to me.
>Presumably it should be NVECTOR.EXTENT

We agree that it looks ambiguous
I wonder why the "old" PLI23 comoiler was quite clear about it and the
"newer" compiler is unhappy
I have never used extents before like this

John Wood                                                Birmingham UK



Tue, 11 Jul 2000 03:00:00 GMT  
 W95 compile fails, mainframe OK, help?


muenster.de> writes

Quote:

>> I have a test program (below) which compiles on the mainframe using
>> PLI23 and MVS/esa but will not compile on PLI for Windows and I cannot
>> really see why
>I don't believe that this program compiles anywhere. The error messages
>mean that it's unclear what the variables EXTENT are (after NUMBER and
>ATOM resp.). Probably you only forgot the declaration. EXTENT must be a
>variable outside NVECTOR and CVECTOR resp.

Not so I'm afraid
Under MVS it goes like this, sorry for the line wrapping
They seem to default to FB15
I realise I have to fix the W95 version but why the difference

15668-910 IBM OS PL/I OPTIMIZING COMPILER  VER 2 REL 3 MOD 0
22 JAN 98   06:48:58   PAGE   1
-OPTIONS SPECIFIED
0OBJ,A,AG,ESD,NEST,S,STG,OF,F(I);
-OPTIONS USED

 AGGREGATE      NOCOUNT        ATTRIBUTES(FULL)
 ESD            NODECK         NOCOMPILE(S)
 INSOURCE       NOFLOW         CMPAT(V2)
 LMESSAGE       NOGONUMBER     FLAG(I)
 NEST           NOGOSTMT       LANGLVL(OS,NOSPROG)
 OBJECT         NOGRAPHIC      LINECOUNT(55)
 OFFSET         NOIMPRECISE    MARGINS(2,72,0)
 OPTIONS        NOINCLUDE      SEQUENCE(73,80)
 SOURCE         NOINTERRUPT    SIZE(8203352)
 STMT           NOLIST         NOSYNTAX(S)
 STORAGE        NOMACRO        SYSTEM(MVS)
                NOMAP
                NOMARGINI
                NOMDECK
                NONUMBER
                NOOPTIMIZE
                NOTERMINAL
                NOTEST
                NOXREF
15668-910 IBM OS PL/I OPTIMIZING COMPILER  TEST1: PROC OPTIONS(MAIN);
PAGE   2
-                    SOURCE LISTING
-    STMT LEV NT
0
        1      0  TEST1: PROC OPTIONS(MAIN);
00010001
        2   1  0  DECLARE SYSPRINT FILE;
00011001
        3   1  0  DECLARE  DD_PTR POINTER,
00020000
                         1 DD_VECTOR BASED(DD_PTR),
00030000
                           2 CHAR_PTR     POINTER,
00040000
                           2 REP          FIXED BIN(15),
00050000
                           2 RESERVED_A   FIXED BIN(15),
00060000
                           2 VPTR         POINTER;
00070000
        4   1  0  DECLARE
00090000
                         1 NVECTOR BASED(DD_VECTOR.VPTR),
00100000
                           2 EXTENT FIXED BIN(15),
00110000
                           2 NUMBER(EXTENT REFER(NVECTOR.EXTENT))
00120000
                                    FIXED DEC(15,5),
00130000
                         1 CVECTOR BASED(DD_VECTOR.VPTR),
00140000
                           2 EXTENT FIXED BIN(15),
00150000
                           2 ATOM(EXTENT REFER(CVECTOR.EXTENT)),
00160000
                            (3 START,
00170000
                             3 LEN) FIXED BIN(15);
00180000
        5   1  0  PUT SKIP EDIT('PROGRAM ENDED') (A);
00190000
        6   1  0  END;
00200000
15668-910 IBM OS PL/I OPTIMIZING COMPILER  TEST1: PROC OPTIONS(MAIN);
PAGE   3
-                                                       ATTRIBUTE TABLE
(FULL)
-DCL NO.    IDENTIFIER                      ATTRIBUTES

04          ATOM                            (*)/* IN CVECTOR */ BASED /*
STRUCTURE */
03          CHAR_PTR                        /* IN DD_VECTOR */ BASED
ALIGNED POINTER
04          CVECTOR                         BASED (VPTR) /* STRUCTURE */
03          DD_PTR                          AUTOMATIC ALIGNED POINTER
03          DD_VECTOR                       BASED (DD_PTR) /* STRUCTURE
*/
04          EXTENT                          /* IN CVECTOR */ BASED
ALIGNED BINARY FIXED (15,0)
04          EXTENT                          /* IN NVECTOR */ BASED
ALIGNED BINARY FIXED (15,0)
04          LEN                             (* REFER (EXTENT) ) /* IN
ATOM IN CVECTOR */ BASED ALIGNED BINARY FIXED
                                            (15,0)
04          NUMBER                          (* REFER (EXTENT) ) /* IN
NVECTOR */ BASED ALIGNED DECIMAL FIXED (15,5)
04          NVECTOR                         BASED (VPTR) /* STRUCTURE */
03          REP                             /* IN DD_VECTOR */ BASED
ALIGNED BINARY FIXED (15,0)
03          RESERVED_A                      /* IN DD_VECTOR */ BASED
ALIGNED BINARY FIXED (15,0)
04          START                           (* REFER (EXTENT) ) /* IN
ATOM IN CVECTOR */ BASED ALIGNED BINARY FIXED
                                            (15,0)
02          SYSPRINT                        EXTERNAL FILE
01          TEST1                           EXTERNAL ENTRY
RETURNS(DECIMAL /* SINGLE */ FLOAT (6))
03          VPTR                            /* IN DD_VECTOR */ BASED
ALIGNED POINTER
15668-910 IBM OS PL/I OPTIMIZING COMPILER  TEST1: PROC OPTIONS(MAIN);
PAGE   4
-                                       AGGREGATE LENGTH TABLE
0DCL NO.   IDENTIFIER                          LVL     DIMS
OFFSET       ELEMENT         TOTAL

LENGTH        LENGTH

 4         CVECTOR                               1
ADJ           ADJ
           EXTENT                                2
2
           ATOM                                  2        1
2           ADJ           ADJ
           START                                 3        1
ADJ             2
           LEN                                   3        1
ADJ             2
03         DD_VECTOR                             1
12            12
           CHAR_PTR                              2
4
           REP                                   2
4             2
           RESERVED_A                            2
6             2
           VPTR                                  2
8             4
04         NVECTOR                               1
ADJ           ADJ
           EXTENT                                2
2
           NUMBER                                2        1
2             8           ADJ
0                                                           SUM OF
CONSTANT LENGTHS                12
15668-910 IBM OS PL/I OPTIMIZING COMPILER  TEST1: PROC OPTIONS(MAIN);
PAGE   5
-                    STORAGE REQUIREMENTS
-BLOCK, SECTION OR STATEMENT     TYPE                  LENGTH   (HEX)
DSA SIZE   (HEX)
-**TEST11                        PROGRAM CSECT            256     100
 **TEST12                        STATIC CSECT             148      94
 TEST1                           PROCEDURE BLOCK          256     100
240      F0
15668-910 IBM OS PL/I OPTIMIZING COMPILER  TEST1: PROC OPTIONS(MAIN);
PAGE   6
-                    EXTERNAL SYMBOL DICTIONARY
-            SYMBOL         TYPE     ID      ADDR     LENGTH

            PLISTART         SD     0001    000000    000080
            **TEST11         SD     0002    000000    000100
            **TEST12         SD     0003    000000    000094
            PLITABS          WX     0004    000000
            PLIXOPT          WX     0005    000000
            IBMBPOPT         WX     0006    000000
            PLIXHD           WX     0007    000000
            IBMBEATA         WX     0008    000000
            PLIFLOW          WX     0009    000000
            PLICOUNT         WX     000A    000000
            IBMBPIRA         ER     000B    000000
            IBMBPIRB         ER     000C    000000
            IBMBPIRC         ER     000D    000000
            PLICALLA         LD             000004
            PLICALLB         LD             000008
            PLIMAIN          SD     000E    000000    000008
            IBMBSEDA         ER     000F    000000
            IBMBSIOA         ER     0010    000000
            IBMBCCCA         ER     0011    000000
            IBMBOCLA         ER     0012    000000
            IBMBOCLC         WX     0013    000000
            IBMBSAOA         ER     0014    000000
            IBMBSEDB         WX     0015    000000
            IBMBSIOE         WX     0016    000000
            IBMBSIOT         WX     0017    000000
            IBMBSPLA         ER     0018    000000
            IBMBSXCA         WX     0019    000000
            IBMBSXCB         WX     001A    000000
            IBMBSIST         WX     001B    000000
            TEST1            LD             000008
            SYSPINT          SD     001C    000000    000020
            CEESTART         WX     001D    000000
            CEEFMAIN         WX     001E    000000
            IBMLLIST         ER     001F    000000
15668-910 IBM OS PL/I OPTIMIZING COMPILER  TEST1: PROC OPTIONS(MAIN);
PAGE   7
-              TABLES OF OFFSETS AND STATEMENT NUMBERS
0
-              WITHIN PROCEDURE TEST1
0OFFSET (HEX)       0     8E     E8
 STATEMENT NO.      1      5      6
15668-910 IBM OS PL/I OPTIMIZING COMPILER  TEST1: PROC OPTIONS(MAIN);
PAGE   8
-
 NO MESSAGES PRODUCED FOR THIS COMPILATION
-COMPILE TIME    0.00 MINS        SPILL FILE:     0 RECORDS, SIZE  4051
-END OF COMPILATION OF TEST1

John Wood                      
Teamco Systems R&D



Tue, 11 Jul 2000 03:00:00 GMT  
 W95 compile fails, mainframe OK, help?


Quote:
>Actually, the program as listed compiles OK on PLI V2.3 and PLI for MVS
>1.1 because these structures are not used or referenced. If the code is
>changed so that these structures are ALLOCATED, then error IEL0519I is
>produced, which is essentially the same error reported by PLI for
>Windows.

Thank you
John Wood                                                Birmingham UK


Fri, 14 Jul 2000 03:00:00 GMT  
 
 [ 7 post ] 

 Relevant Pages 

1. Tk4.0p2 on FreeBSD: compiles OK but tests fail

2. HELP: Plugin code breaks Netscape under Win98 (OK in W95)

3. Problem with scales on W95/98, ok on NT, UNIX

4. Need Help Compiling on a Mainframe

5. Python on W95 + wxPython : DLL load failed

6. Importing wxPython under IDLE 0.5 fails though ok under raw python or pythonwin

7. Newbie: import works ok if in base directory but fails in other directories

8. shared lib problems on SunOS: build ok, load fails

9. Unable to compile clipper s87 on W95 or W98

10. Unable to compile standalone tcltk script - 8.0p2/plus/borland/w95

11. Acees violation from extension if compiled with MinGW, but ok with Borland

12. Buttons: Mac OK, Windows not OK

 

 
Powered by phpBB® Forum Software