Hi all

I am updating an old port from 2002. I was able to clean a few of the simple errors, but I need a bit of a hint on this one.

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};


--