HP3000-L Archives

October 1999, Week 2

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Stan Sieler <[log in to unmask]>
Reply To:
Stan Sieler <[log in to unmask]>
Date:
Sat, 9 Oct 1999 12:57:06 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (74 lines)
Re:

> on, and HP's compiler is complaining:
>
>  error 1615: Default parameter specification not supported.
>
> yet per the documentation, you're supposed to use "pragma intrinsic" to
> SPECIFICALLY allow the use of "default parameters"
>
> Here is a VERY simple sample that compiles & runs OK with CCSC, yet fails
> w/HP's C
>

Change "fopen" to "FOPEN" in your pragma intrinsic, and file a bug
report.  Of course, HP may say it's designed to work that way :)

:ccxl t

SAT OCT  9 1999 12:49 PM  Copyright Hewlett-Packard Co.  1984.       PAGE     1
HP C/iX HP31506 A.05.19                                                     "T"

    1  0   # 1 "T.SOURCE.SIELER"
    1  0   #pragma intrinsic FOPEN
    2  0
    3  0
    4  0
    5  0   main ()
    6  0   {
    7  1
    8  1   short int fid;
    9  1
   10  1   fid = FOPEN (
   11  1            ,
   12  1            0153,
   13  1            0300);
   14  1   }
End Run

END OF COMPILE




SAT OCT  9 1999 12:51 PM  Copyright Hewlett-Packard Co.  1984.       PAGE     1
HP C/iX HP31506 A.05.19                                                     "T"

    1  0   # 1 "T.SOURCE.SIELER"
    1  0   #pragma intrinsic fopen
    2  0
    3  0
    4  0
    5  0   main ()
    6  0   {
    7  1
    8  1   short int fid;
    9  1
   10  1   fid = FOPEN (
   11  1            ,
   12  1            0153,
   13  1            0300);
   14  1   }
cc: "T.SOURCE.SIELER", line 11: error 1634: Missing arguments only allowed on intrinsic calls.
run CCOMXL.PUB.SYS;INFO="";PARM=1;XL="QCOMPXL.PUBNEW.GREEN"
Program terminated in an error state. (CIERR 976)
End Run


Also, report a bug: "pragma intrinsic fails to complain if the identifier is *not* in
the intrinsics file".

The problem is that "fopen" isn't in there..."FOPEN" is.

Stan

ATOM RSS1 RSS2