/* bcpl.h - Header file to allow calls to the BCPL library
        from C language programs
Author: Bill Kinnersley
Date: Mar 12, 1988
Mail:   Physics Dept.
        Montana State University
        Bozeman, MT 59717
        BITNET: iphwk@mtsunix1
        INTERNET: iphwk%mtsunix1.bitnet@cunyvm.cuny.edu
        UUCP: ...psuvax1!mtsunix1.bitnet!iphwk
*/
long BCPLInit(), BCPL(), MakeBSTR();
#define bptr(p)         (((long)p) >>2)
#define SYSREQUEST      -0x84L
#define TOCSTR          -0x80L
#define TOBSTR          -0x7cL
#define EXECUTEC        -0x6cL
#define ISINTERACT      -0x68L
#define DATESTAMPC      -0x64L
#define SETPROTECT      -0x60L
#define SETCOMMENT      -0x5cL
#define DEVICEPROCC     -0x58L
#define QUEUEPKT        -0x54L
#define CLEARMEM        -0x50L
#define LOADSEG         -0x4cL
#define CREATEPROCC     -0x48L
#define IOERR           -0x44L
#define CURRENTDIR      -0x40L
#define CREATEDIRC      -0x3cL
#define INFO            -0x38L
#define EXNEXT          -0x34L
#define EXAMINE         -0x30L
#define LOCKC           -0x2cL
#define RENAMEC         -0x28L
#define DELETEFILE      -0x24L
#define SEEK            -0x20L
#define WRITE           -0x18L
#define READ            -0xcL
#define STRNCPY         -0x8L
#define OPEN            -0x4L
#define START           0x4L
#define EXIT            0x8L
#define MULTIPLY        0xcL
#define DIVIDE          0x10L
#define MOD             0x14L
#define SETIO           0x18L
#define PACKLW          0x20L
#define UNPACKLW        0x24L
#define SETRES2         0x28L
#define MAKEGV          0x34L
#define FINDTASK        0x38L
#define GETBYTE         0x3cL
#define PUTBYTE         0x40L
#define LEVEL           0x44L
#define LONGJUMP1       0x48L
#define ALLOCMEM        0x4cL
#define LONGJUMP2       0x50L
#define DOIO            0x54L
#define SENDIO          0x58L
#define CREATECO        0x5cL
#define DELETECO        0x60L
#define CALLCO          0x64L
#define COWAIT          0x68L
#define RESUMECO        0x6cL
#define INSTALLSEG      0x70L
#define GETVEC1         0x74L
#define FREEVEC         0x78L
#define OPENDEV         0x7cL
#define CLOSEDEV        0x80L
#define CREATEPROCB     0x84L
#define REMPROCESS      0x88L
#define PARENTDIR       0x8cL
#define SETSIGS         0x90L
#define CLEARSIGS       0x94L
#define DOSALERT        0x98L
#define FINDROOT        0x9cL
#define READINC         0xa0L
#define TASKWAIT1       0xa4L /* same as 190 */
#define PUTPKT          0xa8L
#define WRITEOUTC       0xacL
#define PACKSTRING      0xb0L
#define UNPACKSTRING    0xb4L
#define HOLDTASK        0xb8L
#define DELAY           0xbcL
#define SENDPKT         0xc0L
#define RETURNPKT       0xc4L
#define OPENWINDOW      0xc8L
#define SETCURDIR       0xccL
#define BUILDSYSREQ     0xd0L
#define WRITET          0xd4L
#define RDCH            0xd8L
#define UNRDCH          0xdcL
#define WRCH            0xe0L
#define READINB         0xe4L
#define WRITEOUTB       0xe8L
#define FINDINPUT       0xecL
#define FINDOUTPUT      0xf0L
#define SELECTINPUT     0xf4L
#define SELECTOUTPUT    0xf8L
#define ENDREAD         0xfcL
#define ENDWRITE        0x100L
#define INPUT           0x104L
#define OUTPUT          0x108L
#define READN           0x10cL
#define NEWLINE         0x110L
#define WRITEI          0x114L
#define WRITEN          0x118L
#define WRITEHEX        0x11cL
#define WRITEOCT        0x120L
#define WRITES          0x124L
#define WRITEF          0x128L
#define TOUPPER         0x12cL
#define CHARCMP         0x130L
#define STRCMP          0x134L
#define RDARGS          0x138L
#define RDLINE          0x13cL
#define PARSESTRING     0x140L
#define LOAD            0x144L
#define UNLOAD          0x148L
#define TIDYUP          0x150L
#define ADDDEVICE       0x154L
#define DATESTAMPB      0x158L
#define WAITFORCHAR     0x15cL
#define EXECLIB         0x160L
#define FINDSEGARRAY    0x164L
#define DELETEOBJ       0x168L
#define RENAMEB         0x16cL
#define CLOSE           0x174L
#define GETWORD         0x178L
#define PUTWORD         0x17cL
#define TASKWAIT2       0x190L /* same as a4 */
#define EXECUTEB        0x194L
#define DEVICEPROCB     0x198L
#define LIBCALL         0x19cL
#define WRITEERR        0x1a0L
#define FINDCONHAND     0x1a4L
#define FINDFILEHAND    0x1a8L
#define EXTDEVNAME      0x1acL
#define LOCKB1          0x1b0L  /* same as 1ec */
#define UNLOCK          0x1b4L
#define GETLONG         0x1b8L
#define PUTLONG         0x1bcL
#define OPENFILE        0x1c0L
#define DUPLOCK         0x1c4L
#define MAKESYSREQ      0x1c8L
#define STRCPY          0x1ccL
#define RUNLOADED       0x1e4L
#define LOCKB2          0x1ecL  /* same as 1b0 */
#define FINDDEVINFO     0x1f0L
#define CREATEDIRB      0x1f4L
#define CMPTIME         0x1f8L
#define TIMERIO         0x1fcL
#define SETTIME         0x200L
#define FINDCLI         0x218L