[Scm-discuss] Updating scm to plan9

[Fernan Bolando]

Hi all

I currently updating scm to be able to use under plan9.

It seems like there are a few things that needed fixing in order to compile under plan9.

in scm.c I changed the wait()  to waitpid(). I am still unable to compile it though.

I decided to post the errors below in 9fans and scm-discuss, incase you guys will see something obvious.

Meanwhile I need some sleep.

compile errors ****

/usr/fernan/tmp/scm/sys.c:628[sys.c:3613] initialization of incompatible pointers: sfptob
IND FUNC(INT, IND STRUCT _7_) INT and IND FUNC(OLD, INT, LONG) INT
/usr/fernan/tmp/scm/sys.c:629[sys.c:3614] initialization of incompatible pointers: sfptob
IND FUNC(IND CONST CHAR, IND STRUCT _7_) INT and IND FUNC(OLD, IND CHAR, LONG) INT


The following are the relevant structure and code

typedef struct {
  char *name;
  SCM (*mark)P((SCM ptr));
  int (*free)P((FILE *p));
  int (*print)P((SCM exp, SCM port, int writing));
  SCM (*equalp)P((SCM, SCM));
  int (*fputc)P((int c, FILE *p));
/* int (*fputs)P((char *s, FILE *p)); */
/* sizet (*fwrite)P((char *s, sizet siz, sizet num, FILE *p)); */
  int (*fputs)P((const char *s, FILE *p));
  sizet (*fwrite)P((const void *s, sizet siz, sizet num, FILE *p));
  int (*fflush)P((FILE *stream));
  int (*fgetc)P((FILE *p));
  int (*fclose)P((FILE *p));
  int (*ungetc)P((int c, SCM p));
} ptobfuns;


static ptobfuns sfptob = {
  "soft",
  markcdr,
  noop0,
  0,
  0,
  sfputc,
  sfputs,
  sfwrite,
  sfflush,

  sfgetc,

sfclose};

fernan

-- 
http://www.fernski.com