ftp.nice.ch/pub/next/developer/languages/lisp/AKCL.1.599.s.tar.gz#/akcl-1-599/h/hp800.h

This is hp800.h in view mode; [Download] [Up]

#define HPUX
#define HPUX_SOM
#define HP
  
#include "bsd.h"
#undef RUN_PROCESS
#undef WANT_VALLOC
/* uses sigvector instead of sigvec.   Could alternately
     link with -lbsd */
#define sigvec sigvector  

/* does not have getpagesize() */

/*
#define SBRK(n) \
  (printf("sbrk(%x)=%x",n,FIXtemp=sbrk(n)),fflush(stdout),FIXtemp)

#define BRK(n) \
  (printf("brk(%x)=%x",n,FIXtemp=brk(n)),fflush(stdout),FIXtemp)
*/
  
#undef SFASL
#define UNIXFASL "unixfasl-hp800.c"

  /* since we do brk of the whole thing we use a smaller number */

/*
#undef MAXPAGE
#define MAXPAGE 10000
*/

#define ADDITIONAL_FEATURES \
		     ADD_FEATURE("HP9000-800"); \
                      ADD_FEATURE("MC68020"); \
    ADD_FEATURE("HP-UX");


/*
#define USE_C_EXTENDED_MUL
#define USE_C_EXTENDED_DIV
*/

#define DATA_BEGIN (char *)N_DATADDR(header)

#define RELOC_FILE "rel_hp300.c"

#define	IEEEFLOAT

#define reloc r_info

#define N_RELOFF(hdr) RTEXT_OFFSET(hdr)
#define N_SYMOFF(hdr) LESYM_OFFSET(hdr)
#define N_TXTOFF(hdr) TEXT_OFFSET(hdr)

/* #undef cs_check */

#undef SET_REAL_MAXPAGE
#define SET_REAL_MAXPAGE real_maxpage = MAXPAGE


/*
#undef INIT_ALLOC
#define INIT_ALLOC 	if (BRK(pagetochar(MAXPAGE)) < 0) \
		error("Can't allocate.  Good-bye!.");
*/

#define HAVE_AOUT
#define exec header
#define SEEK_TO_END_OFILE(fp) \
  do{struct header hdr; \
     fseek(fp,0,0); \
     fread(&hdr, sizeof(hdr), 1, fp); \
     fseek(fp,hdr.som_length,0); \
     }while(0)

/* have the getcwd command */

#define GETCWD

/* note gabor used the att ldirectory... maybe bsd is ok?? */

#undef LD_COMMAND

/*   This is for pre 6.01 hpux, you need to create .stb file
#define LD_COMMAND(command,main,start,input,ldarg,output) \
  sprintf(command,"ld -o %s -N -x -R %x %s %s.stb %s",  \
           output,start,input, main,ldarg)

*/
  
#define LD_COMMAND(command,main,start,input,ldarg,output) \
  sprintf(command,\
	  "ld -d -a archive -s -e init_code -A %s -R %x -D0x%x %s %s -o %s", \
       main,start,start + data_off, input,ldarg,output)




/*
#define	SIGNED_CHAR  
#define	REGISTER_VAR
#define	BYTE_ADDRESS
#define	CORE_STARTS_NEAR_0
#undef	DOWN_STACK
#undef	REVERSE_PARAMETER_ORDER
#undef	CC_OPTIMIZES_TEST  
#define	UNIX
#undef	BSD
#define	HPUX
#undef	ATT
#define	ALLOCATE_INCREMENTALLY
#define	ALLOW_FORK

*/


/* use #include <fcntl.h> */

#define HAVE_FCNTL

#define RSYM_AUX "../c/rel_hp300.c"


#define FIX_BSS     sym->n_type = N_BSS; \
	       val = (val + 3) & ~3;



/* Begin for cmpinclude */


/* End for cmpinclude */


#define MUST_COPY_VA_LIST

/* For listen LISTEN_FOR_INPUT in stdio.h */
#define _file __fileL
#define _cnt __cnt

/* #define DBEGIN 0x40000000 */
/* #define DBEGIN 0x800000 */


#define UNIXSAVE "unexhp9k800.c"

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.