HP3000-L Archives

September 2002, 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:
Re: _mpe_fileno crashing?
From:
Ken Hirsch <[log in to unmask]>
Reply To:
Ken Hirsch <[log in to unmask]>
Date:
Fri, 13 Sep 2002 11:36:19 -0400
Content-Type:
text/plain
Parts/Attachments:
text/plain (23 lines) 
From: "Peter Smithson" <[log in to unmask]>

> On Fri, 13 Sep 2002 10:43:34 GMT, [log in to unmask] (Peter
> Smithson) wrote:
>
> I've found that deleting the _mpe_fileno line fixes the problem with
> the COBOL/C program after noticing that filenum was 1 before and after
> the line -
>
> filenum= _mpe_fileno(filenum);
>
> when running the pure C program.

If you include <fcntl.h>, there are macros that shouldn't crash:

#define _MPE_FILENO(fd) (((fd)>2 && (fd)<10) ? (fd)+1014 : (fd))
/* POSIX file number to MPE file number */
#define _POSIX_FILENO(fn) (((fn)>1013 && (fn)<1024) ? (fn)-1014 : (fn))
/* MPE file number to POSIX file number */

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2