github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-14 15:36:34 +00:00
Code Issues Projects Releases Wiki Activity
Interlisp.maiko/inc/debug.h
Nick Briggs 6528ac38e3 Remove proprietary license from all files. 
The code is being re-licensed under the MIT license.

	modified:   bin/fixid
	modified:   bin/launch.asm
	modified:   bin/makefile-hpux.hp9000-x
	modified:   bin/makefile-init.sgi
	modified:   bin/makefile-init.sparc
	modified:   bin/makefile-init.sparc-multi
	modified:   bin/makefile-irix.sgi-x
	modified:   bin/makefile-sunos4.sparc
	modified:   bin/makefile-sunos4.sparc%
	modified:   bin/makefile-sunos4.sparc-multi
	modified:   bin/makefile-sunos5.386-x
	modified:   bin/makefile-sunos5.i386-x
	modified:   bin/makefile-sunos5.sparc-x
	modified:   bin/makefile-tail
	modified:   bin/makeisc
	modified:   bin/makeright
	modified:   inc/Check.h
	modified:   inc/MyWindow.h
	modified:   inc/Stipple.h
	modified:   inc/XCursors.h
	modified:   inc/XKeymap.h
	modified:   inc/XVersion.h
	modified:   inc/Xdeflt.h
	modified:   inc/Xicon.h
	modified:   inc/address.h
	modified:   inc/arith.h
	modified:   inc/arith2.h
	modified:   inc/array.h
	modified:   inc/bb.h
	modified:   inc/cell.h
	modified:   inc/cell.h%
	modified:   inc/copyright
	modified:   inc/dbprint.h
	modified:   inc/debug.h
	modified:   inc/devif.h
	modified:   inc/display.h
	modified:   inc/dspdata.h
	modified:   inc/ether.h
	modified:   inc/fast_dsp.h
	modified:   inc/fp.h
	modified:   inc/gc.h
	modified:   inc/gc.h.save
	modified:   inc/gcscan.h
	modified:   inc/hdw_conf.h
	modified:   inc/ifpage.h
	modified:   inc/inlineC.h
	modified:   inc/inlnMIPS.h
	modified:   inc/inlnPS2.h
	modified:   inc/inlndos.h
	modified:   inc/iopage.h
	modified:   inc/kbdif.h
	modified:   inc/keyboard.h
	modified:   inc/keyboard.h%
	modified:   inc/keysym.h
	modified:   inc/ldeXdefs.h
	modified:   inc/lispemul.h
	modified:   inc/lispemul.h.save
	modified:   inc/lispmap.h
	modified:   inc/lldsp.h
	modified:   inc/lnk-Xdeflt.h
	modified:   inc/lnk-debug.h
	modified:   inc/lnk-fast_dsp.h
	modified:   inc/lnk-inlineC.h
	modified:   inc/lnk-lispmap.h
	modified:   inc/lnk-tosfns.h
	modified:   inc/lnk-tosret.h
	modified:   inc/locfile.h
	modified:   inc/lpdefs.h
	modified:   inc/lpglobl.h
	modified:   inc/lspglob.h
	modified:   inc/lsptypes.h
	modified:   inc/medleyfp.h
	modified:   inc/mnxdefs.h
	modified:   inc/my.h
	modified:   inc/native.h
	modified:   inc/ocr.h
	modified:   inc/osmsg.h
	modified:   inc/picture.h
	modified:   inc/pilotbbt.h
	modified:   inc/print.h
	modified:   inc/profile.h
	modified:   inc/rawrs232c.h
	modified:   inc/return.h
	modified:   inc/rs232c.h
	modified:   inc/stack.h
	modified:   inc/stream.h
	modified:   inc/stream.h%
	modified:   inc/stream.h2
	modified:   inc/sysatms.h
	modified:   inc/timeout.h
	modified:   inc/tos1defs.h
	modified:   inc/tosfns.h
	modified:   inc/tosret.h
	modified:   inc/tty.h
	modified:   inc/version.h
	modified:   inc/vmemsave.h
	modified:   inc/xbitmaps.h
	modified:   inc/xdefs.h
	modified:   src/Cldeetr.c
	modified:   src/allocmds.c
	modified:   src/arith2.c
	modified:   src/arith3.c
	modified:   src/arith4.c
	modified:   src/array.c
	modified:   src/array2.c
	modified:   src/array3.c
	modified:   src/array4.c
	modified:   src/array5.c
	modified:   src/array6.c
	modified:   src/asmbbt.c
	modified:   src/asmbitblt.c
	modified:   src/atom.c
	modified:   src/bbtSPARC.s
	modified:   src/bbtsub.c
	modified:   src/bin.c
	modified:   src/binds.c
	modified:   src/bitblt.c
	modified:   src/blt.c
	modified:   src/byteswap.c
	modified:   src/call-c.c
	modified:   src/car-cdr.c
	modified:   src/cdaudio.c
	modified:   src/cdrom.c
	modified:   src/chardev.c
	modified:   src/chatter.c
	modified:   src/codeconv.c
	modified:   src/codetbl.c
	modified:   src/colorbltfns.c
	modified:   src/common.c
	modified:   src/conspage.c
	modified:   src/cr
	modified:   src/dbgtool.c
	modified:   src/dir.c
	modified:   src/doscomm.c
	modified:   src/doskbd.c
	modified:   src/dosmouse.c
	modified:   src/draw.c
	modified:   src/dsk.c
	modified:   src/dspif.c
	modified:   src/dspsubrs.c
	modified:   src/ejlisp.c
	modified:   src/eqf.c
	modified:   src/ether.c
	modified:   src/findkey.c
	modified:   src/foreign.c
	modified:   src/fp.c
	modified:   src/fvar.c
	modified:   src/gc.c
	modified:   src/gc2.c
	modified:   src/gcarray.c
	modified:   src/gccode.c
	modified:   src/gcfinal.c
	modified:   src/gchtfind.c
	modified:   src/gcmain3.c
	modified:   src/gcoflow.c
	modified:   src/gcr.c
	modified:   src/gcrcell.c
	modified:   src/gcscan.c
	modified:   src/gvar2.c
	modified:   src/hacks.c
	modified:   src/hardrtn.c
	modified:   src/imagefile.c
	modified:   src/imagefile2.c
	modified:   src/inet.c
	modified:   src/initdsp.c
	modified:   src/initkbd.c
	modified:   src/initsout.c
	modified:   src/intcall.c
	modified:   src/kbdif.c
	modified:   src/kbdsubrs.c
	modified:   src/keyevent.c
	modified:   src/keylib.c
	modified:   src/keymaker.c
	modified:   src/keytst.c
	modified:   src/keytstno.c
	modified:   src/kprint.c
	modified:   src/launch.asm
	modified:   src/ldeboot.c
	modified:   src/ldeether.c
	modified:   src/ldsout.c
	modified:   src/lineblt8.c
	modified:   src/lisp2c.c
	modified:   src/llcolor.c
	modified:   src/llstk.c
	modified:   src/loader.c
	modified:   src/loopsops.c
	modified:   src/lowlev1.c
	modified:   src/lowlev2.c
	modified:   src/lpdual.c
	modified:   src/lpkit.c
	modified:   src/lplexyy.c
	modified:   src/lpmain.c
	modified:   src/lpread.c
	modified:   src/lpsolve.c
	modified:   src/lptran.c
	modified:   src/lpwrite.c
	modified:   src/lpytab.c
	modified:   src/lsthandl.c
	modified:   src/main.c
	modified:   src/misc7.c
	modified:   src/miscn.c
	modified:   src/mkatom.c
	modified:   src/mkcell.c
	modified:   src/mkkey.c
	modified:   src/mkvdate.c
	modified:   src/mnwevent.c
	modified:   src/mnxmeth.c
	modified:   src/mouseif.c
	modified:   src/mvs.c
	modified:   src/ocr.c
	modified:   src/ocrproc.c
	modified:   src/oether.c
	modified:   src/oldeether.c
	modified:   src/optck.c
	modified:   src/osmsg.c
	modified:   src/perrno.c
	modified:   src/picture.c
	modified:   src/rawcolor.c
	modified:   src/rawrs232c.c
	modified:   src/return.c
	modified:   src/rpc.c
	modified:   src/rplcons.c
	modified:   src/rs232c.c
	modified:   src/setsout.c
	modified:   src/shift.c
	modified:   src/socdvr.c
	modified:   src/storage.c
	modified:   src/subr.c
	modified:   src/subr0374.c
	modified:   src/sxhash.c
	modified:   src/testdsp.c
	modified:   src/testtool.c
	modified:   src/timeoday.c
	modified:   src/timeofday.c
	modified:   src/timer.c
	modified:   src/truecolor.c
	modified:   src/tstsout.c
	modified:   src/tty.c
	modified:   src/typeof.c
	modified:   src/ubf1.c
	modified:   src/ubf2.c
	modified:   src/ubf3.c
	modified:   src/ufn.c
	modified:   src/ufs.c
	modified:   src/unixcomm.c
	modified:   src/unixfork.c
	modified:   src/unwind.c
	modified:   src/uraid.c
	modified:   src/usrsubr.c
	modified:   src/uutils.c
	modified:   src/vars3.c
	modified:   src/vesafns.asm
	modified:   src/vesainit.c
	modified:   src/vgainit.c
	modified:   src/vmemsave.c
	modified:   src/xbbt.c
	modified:   src/xc.c
	modified:   src/xc.c.orig
	modified:   src/xcursor.c
	modified:   src/xinit.c
	modified:   src/xlspwin.c
	modified:   src/xmkicon.c
	modified:   src/xrdopt.c
	modified:   src/xscroll.c
	modified:   src/xwinman.c
	modified:   src/z2.c
2020-08-11 18:39:45 -07:00

439 lines
9.4 KiB
C
Executable File
Raw Blame History

/* $Id: debug.h,v 1.2 1999/01/03 02:05:56 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved */
/************************************************************************/
/* */
/* (C) Copyright 1989-92 Venue. All Rights Reserved. */
/* Manufactured in the United States of America. */
/* */
/************************************************************************/
#ifndef BYTESWAP
/************************************************/
/* Normal byte-order version of definitions */
/************************************************/
typedef struct{
DLword W0;
DLword W1;
DLword W2;
DLword W3;
DLword WU;
DLword W4;
DLword W5;
int TIME;
unsigned MOUSESTATE : 3;
unsigned SHIFT1 : 1;
unsigned SHIFT2 : 1;
unsigned keLOCK : 1;
unsigned keCTRL : 1;
unsigned keMETA : 1;
unsigned keFONT : 1;
unsigned USERMODE1 : 1;
unsigned USERMODE2 : 1;
unsigned USERMODE3 : 1;
unsigned NIL1 : 4;
DLword MOUSEX;
DLword MOUSEY;
} KEYBOARDEVENT;
typedef struct{
DLword READ;
DLword WRITE;
} RING;
typedef struct{
LispPTR FLAGS;
LispPTR CODES;
LispPTR SHIFTCODES;
LispPTR ARMED;
LispPTR INTERRUPTLIST;
} KEYACTION;
typedef struct{
unsigned int EVENTWAKEUPPENDING : 1;
unsigned int nil1 : 7;
unsigned int EVENTQUEUETAIL : 24;
LispPTR EVENTNAME;
} EVENT;
typedef struct{
unsigned int nil1 : 1;
unsigned int MLOCKPERPROCESS : 1;
unsigned int nil2 : 6;
unsigned int MLOCKQUEUETAIL : 24;
LispPTR MLOCKOWNER;
LispPTR MLOCKNAME;
LispPTR MLOCKLINK;
} MONITORLOCK;
typedef struct{
DLword PROCFX0;
DLword PROCFX;
unsigned int PROCSTATUS : 8;
unsigned int PROCNAME : 24;
unsigned int PROCPRIORITY : 8;
unsigned int PROCQUEUE : 24;
unsigned int nil1 : 8;
unsigned int NEXTPROCHANDLE : 24;
unsigned int PROCTIMERSET : 1;
unsigned int PROCBEINGDELETED : 1;
unsigned int PROCDELETED : 1;
unsigned int PROCSYSTEMP : 1;
unsigned int PROCNEVERSTARTED : 1;
unsigned int nil2 : 3;
unsigned int PROCWAKEUPTIMER : 24;
LispPTR PROCTIMERLINK;
LispPTR PROCTIMERBOX;
LispPTR WAKEREASON;
LispPTR PROCEVENTORLOCK;
LispPTR PROCFORM;
LispPTR RESTARTABLE;
LispPTR PROCWINDOW;
LispPTR PROCFINISHED;
LispPTR PROCRESULT;
LispPTR PROCFINISHEVENT;
LispPTR PROCMAILBOX;
LispPTR PROCDRIBBLEOUTPUT;
LispPTR PROCINFOHOOK;
LispPTR PROCTYPEAHEAD;
LispPTR PROCREMOTEINFO;
LispPTR PROCUSERDATA;
LispPTR PROCEVENTLINK;
LispPTR PROCAFTEREXIT;
LispPTR PROCBEFOREEXIT;
LispPTR PROCOWNEDLOCKS;
LispPTR PROCEVAPPLYRESULT;
LispPTR PROCTTYENTRYFN;
LispPTR PROCEXITFN;
LispPTR PROCHARDRESETINFO;
LispPTR PROCRESTARTFORM;
LispPTR PROCOLDTTYPROC;
LispPTR nil3;
} PROCESS;
typedef struct{
unsigned int PQPRIORITY : 8;
unsigned int PQHIGHER : 24;
LispPTR PQLOWER;
LispPTR PQNEXT;
LispPTR PQLAST;
} PROCESSQUEUE;
typedef struct fdev{
unsigned RESETABLE : 1;
unsigned RANDOMACCESSP : 1;
unsigned NODIRECTORIES : 1;
unsigned PAGEMAPPED : 1;
unsigned FDBINABLE : 1;
unsigned FDBOUTABLE : 1;
unsigned FDEXTENDABLE : 1;
unsigned BUFFERED : 1;
unsigned DEVICENAME : 24;
unsigned REMOTEP : 1;
unsigned SUBDIRECTORIES : 1;
unsigned INPUT_INDIRECTED : 1;
unsigned OUTPUT_INDIRECTED : 1;
unsigned NIL1 : 4;
unsigned DEVICEINFO : 24;
LispPTR OPENFILELST ;
LispPTR HOSTNAMEP ;
LispPTR EVENTFN ;
LispPTR DIRECTORYNAMEP ;
LispPTR OPENFILE ;
LispPTR CLOSEFILE ;
LispPTR REOPENFILE ;
LispPTR GETFILENAME ;
LispPTR DELETEFILE ;
LispPTR GENERATEFILES ;
LispPTR RENAMEFILE ;
LispPTR OPENP ;
LispPTR REGISTERFILE ;
LispPTR UNREGISTERFILE ;
LispPTR FREEPAGECOUNT ;
LispPTR MAKEDIRECTORY ;
LispPTR CHECKFILENAME ;
LispPTR HOSTALIVEP ;
LispPTR BREAKCONNECTION ;
LispPTR BIN ;
LispPTR BOUT ;
LispPTR PEEKBIN ;
LispPTR READCHAR ;
LispPTR WRITECHAR ;
LispPTR PEEKCHAR ;
LispPTR UNREADCHAR ;
LispPTR READP ;
LispPTR EOFP ;
LispPTR BLOCKIN ;
LispPTR BLOCKOUT ;
LispPTR FORCEOUTPUT ;
LispPTR GETFILEINFO ;
LispPTR SETFILEINFO ;
LispPTR CHARSETFN ;
LispPTR INPUTSTREAM ;
LispPTR OUTPUTSTREAM ;
LispPTR GETFILEPTR ;
LispPTR GETEOFPTR ;
LispPTR SETFILEPTR ;
LispPTR BACKFILEPTR ;
LispPTR SETEOFPTR ;
LispPTR LASTC ;
LispPTR GETNEXTBUFFER ;
LispPTR RELEASEBUFFER ;
LispPTR READPAGES ;
LispPTR WRITEPAGES ;
LispPTR TRUNCATEFILE ;
LispPTR WINDOWOPS ;
LispPTR WINDOWDATA ;
}FDEV;
typedef struct package{
LispPTR INDEX ;
LispPTR TABLES ;
LispPTR NAME ;
LispPTR NAMESYMBOL ;
LispPTR NICKNAMES ;
LispPTR USE_LIST ;
LispPTR USED_BY_LIST ;
LispPTR EXTERNAL_ONLY ;
LispPTR INTERNAL_SYMBOLS ;
LispPTR EXTERNAL_SYMBOLS ;
LispPTR SHADOWING_SYMBOLS ;
} PACKAGE;
#ifdef NEVER
typedef struct {
unsigned nil1 : 8 ;
unsigned BASE : 24 ;
unsigned READ_ONLY_P : 1 ;
unsigned nil2 : 1 ;
unsigned BIT_P : 1 ;
unsigned STRING_P : 1 ;
unsigned nil3 : 1 ;
unsigned DISPLACED_P : 1 ;
unsigned FILL_POINTER_P : 1 ;
unsigned EXTENDABLE_P : 1 ;
unsigned TYPE_NUMBER : 8 ;
DLword OFFSET;
DLword FILL_POINTER;
DLword TOTAL_SIZE;
} ONED_ARRAY;
#endif /* NEVER */
#else
/****************************************************************/
/* Byte-swapped, word-swapped definitions, for e.g. 80386's */
/****************************************************************/
typedef struct{
DLword W1;
DLword W0;
DLword W3;
DLword W2;
DLword W4;
DLword WU;
/* only swapped down to here, and MOUSEX & Y -- there */
/* looks like a missing word in the block at this point. */
DLword W5;
int TIME;
unsigned MOUSESTATE : 3;
unsigned SHIFT1 : 1;
unsigned SHIFT2 : 1;
unsigned LOCK : 1;
unsigned CTRL : 1;
unsigned META : 1;
unsigned FONT : 1;
unsigned USERMODE1 : 1;
unsigned USERMODE2 : 1;
unsigned USERMODE3 : 1;
unsigned NIL1 : 4;
DLword MOUSEY;
DLword MOUSEX;
} KEYBOARDEVENT;
typedef struct{
DLword WRITE;
DLword READ;
} RING;
typedef struct{
LispPTR FLAGS;
LispPTR CODES;
LispPTR SHIFTCODES;
LispPTR ARMED;
LispPTR INTERRUPTLIST;
} KEYACTION;
typedef struct{
unsigned int EVENTQUEUETAIL : 24;
unsigned int nil1 : 7;
unsigned int EVENTWAKEUPPENDING : 1;
LispPTR EVENTNAME;
} EVENT;
typedef struct{
unsigned int MLOCKQUEUETAIL : 24;
unsigned int nil2 : 6;
unsigned int MLOCKPERPROCESS : 1;
unsigned int nil1 : 1;
LispPTR MLOCKOWNER;
LispPTR MLOCKNAME;
LispPTR MLOCKLINK;
} MONITORLOCK;
typedef struct{
DLword PROCFX;
DLword PROCFX0;
unsigned int PROCNAME : 24;
unsigned int PROCSTATUS : 8;
unsigned int PROCQUEUE : 24;
unsigned int PROCPRIORITY : 8;
unsigned int NEXTPROCHANDLE : 24;
unsigned int nil1 : 8;
unsigned int PROCWAKEUPTIMER : 24;
unsigned int nil2 : 3;
unsigned int PROCNEVERSTARTED : 1;
unsigned int PROCSYSTEMP : 1;
unsigned int PROCDELETED : 1;
unsigned int PROCBEINGDELETED : 1;
unsigned int PROCTIMERSET : 1;
LispPTR PROCTIMERLINK;
LispPTR PROCTIMERBOX;
LispPTR WAKEREASON;
LispPTR PROCEVENTORLOCK;
LispPTR PROCFORM;
LispPTR RESTARTABLE;
LispPTR PROCWINDOW;
LispPTR PROCFINISHED;
LispPTR PROCRESULT;
LispPTR PROCFINISHEVENT;
LispPTR PROCMAILBOX;
LispPTR PROCDRIBBLEOUTPUT;
LispPTR PROCINFOHOOK;
LispPTR PROCTYPEAHEAD;
LispPTR PROCREMOTEINFO;
LispPTR PROCUSERDATA;
LispPTR PROCEVENTLINK;
LispPTR PROCAFTEREXIT;
LispPTR PROCBEFOREEXIT;
LispPTR PROCOWNEDLOCKS;
LispPTR PROCEVAPPLYRESULT;
LispPTR PROCTTYENTRYFN;
LispPTR PROCEXITFN;
LispPTR PROCHARDRESETINFO;
LispPTR PROCRESTARTFORM;
LispPTR PROCOLDTTYPROC;
LispPTR nil3;
} PROCESS;
typedef struct{
unsigned int PQHIGHER : 24;
unsigned int PQPRIORITY : 8;
LispPTR PQLOWER;
LispPTR PQNEXT;
LispPTR PQLAST;
} PROCESSQUEUE;
typedef struct fdev{
unsigned DEVICENAME : 24;
unsigned BUFFERED : 1;
unsigned FDEXTENDABLE : 1;
unsigned FDBOUTABLE : 1;
unsigned FDBINABLE : 1;
unsigned PAGEMAPPED : 1;
unsigned NODIRECTORIES : 1;
unsigned RANDOMACCESSP : 1;
unsigned RESETABLE : 1;
unsigned DEVICEINFO : 24;
unsigned NIL1 : 4;
unsigned OUTPUT_INDIRECTED : 1;
unsigned INPUT_INDIRECTED : 1;
unsigned SUBDIRECTORIES : 1;
unsigned REMOTEP : 1;
LispPTR OPENFILELST ;
LispPTR HOSTNAMEP ;
LispPTR EVENTFN ;
LispPTR DIRECTORYNAMEP ;
LispPTR OPENFILE ;
LispPTR CLOSEFILE ;
LispPTR REOPENFILE ;
LispPTR GETFILENAME ;
LispPTR DELETEFILE ;
LispPTR GENERATEFILES ;
LispPTR RENAMEFILE ;
LispPTR OPENP ;
LispPTR REGISTERFILE ;
LispPTR UNREGISTERFILE ;
LispPTR FREEPAGECOUNT ;
LispPTR MAKEDIRECTORY ;
LispPTR CHECKFILENAME ;
LispPTR HOSTALIVEP ;
LispPTR BREAKCONNECTION ;
LispPTR BIN ;
LispPTR BOUT ;
LispPTR PEEKBIN ;
LispPTR READCHAR ;
LispPTR WRITECHAR ;
LispPTR PEEKCHAR ;
LispPTR UNREADCHAR ;
LispPTR READP ;
LispPTR EOFP ;
LispPTR BLOCKIN ;
LispPTR BLOCKOUT ;
LispPTR FORCEOUTPUT ;
LispPTR GETFILEINFO ;
LispPTR SETFILEINFO ;
LispPTR CHARSETFN ;
LispPTR INPUTSTREAM ;
LispPTR OUTPUTSTREAM ;
LispPTR GETFILEPTR ;
LispPTR GETEOFPTR ;
LispPTR SETFILEPTR ;
LispPTR BACKFILEPTR ;
LispPTR SETEOFPTR ;
LispPTR LASTC ;
LispPTR GETNEXTBUFFER ;
LispPTR RELEASEBUFFER ;
LispPTR READPAGES ;
LispPTR WRITEPAGES ;
LispPTR TRUNCATEFILE ;
LispPTR WINDOWOPS ;
LispPTR WINDOWDATA ;
}FDEV;
typedef struct package{
LispPTR INDEX ;
LispPTR TABLES ;
LispPTR NAME ;
LispPTR NAMESYMBOL ;
LispPTR NICKNAMES ;
LispPTR USE_LIST ;
LispPTR USED_BY_LIST ;
LispPTR EXTERNAL_ONLY ;
LispPTR INTERNAL_SYMBOLS ;
LispPTR EXTERNAL_SYMBOLS ;
LispPTR SHADOWING_SYMBOLS ;
} PACKAGE;
#ifdef NEVER
typedef struct {
unsigned BASE : 24 ;
unsigned nil1 : 8 ;
DLword OFFSET;
unsigned TYPE_NUMBER : 8 ;
unsigned EXTENDABLE_P : 1 ;
unsigned FILL_POINTER_P : 1 ;
unsigned DISPLACED_P : 1 ;
unsigned nil3 : 1 ;
unsigned STRING_P : 1 ;
unsigned BIT_P : 1 ;
unsigned nil2 : 1 ;
unsigned READ_ONLY_P : 1 ;
DLword TOTAL_SIZE;
DLword FILL_POINTER;
} ONED_ARRAY;
#endif /* NEVER */
#endif /* BYTESWAP */
Reference in New Issue View Git Blame Copy Permalink