W95 compile fails, mainframe OK, help?
Author |
Message |
John Woo #1 / 7
|
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 |
|
|
robi #2 / 7
|
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 |
|
|
Eberhard Stur #3 / 7
|
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 |
|
|
John Woo #4 / 7
|
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 |
|
|
John Woo #5 / 7
|
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 |
|
|
John Woo #6 / 7
|
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 |
|
|
|