scsh-conservatory
/
scsh-0.6
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Snapshot of cig generated files.

This commit is contained in:
mainzelm 2001-01-09 15:57:06 +00:00
parent 31894f1894
commit 67805dde9f
5 changed files with 33 additions and 39 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
scsh/flock.c
View File

@ -21,7 +21,7 @@ extern int errno;
s48_value df_set_lock(s48_value g1, s48_value g2, s48_value g3, s48_value g4, s48_value g5, s48_value g6) s48_value df_set_lock(s48_value g1, s48_value g2, s48_value g3, s48_value g4, s48_value g5, s48_value g6)
{ {
extern int set_lock(int , int , int , int , int , int ); extern int set_lock(int , int , int , int , int , int );
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1); S48_DECLARE_GC_PROTECT(1);
int r1; int r1;
@ -37,14 +37,14 @@ s48_value df_set_lock(s48_value g1, s48_value g2, s48_value g3, s48_value g4, s4
s48_value df_get_lock(s48_value g1, s48_value g2, s48_value g3, s48_value g4, s48_value g5, s48_value g6, s48_value mv_vec) s48_value df_get_lock(s48_value g1, s48_value g2, s48_value g3, s48_value g4, s48_value g5, s48_value g6, s48_value mv_vec)
{ {
extern int get_lock(int , int , int , int , int , int , int *, int *, int *, int *, int *); extern int get_lock(int , int , int , int , int , int , int *, int *, int *, int *, int *);
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(2); S48_DECLARE_GC_PROTECT(2);
int r1; int r1;
int r2; int r2 = 0;
int r3; int r3 = 0;
int r4; int r4 = 0;
int r5; int r5 = 0;
int r6; int r6 = 0;
@ -60,10 +60,8 @@ s48_value df_get_lock(s48_value g1, s48_value g2, s48_value g3, s48_value g4, s4
return ret1; return ret1;
} }
s48_value s48_init_flock(void) void s48_init_flock(void)
{ {
S48_EXPORT_FUNCTION(df_set_lock); S48_EXPORT_FUNCTION(df_set_lock);
S48_EXPORT_FUNCTION(df_get_lock); S48_EXPORT_FUNCTION(df_get_lock);
return S48_UNSPECIFIC;
} }

1
scsh/network.c
View File

@ -95,5 +95,4 @@ void s48_init_network(void)
S48_EXPORT_FUNCTION(scheme_serv_name2serv_info); S48_EXPORT_FUNCTION(scheme_serv_name2serv_info);
S48_EXPORT_FUNCTION(scheme_proto_num2proto_info); S48_EXPORT_FUNCTION(scheme_proto_num2proto_info);
S48_EXPORT_FUNCTION(scheme_proto_name2proto_info); S48_EXPORT_FUNCTION(scheme_proto_name2proto_info);
} }

4
scsh/select.c
View File

@ -54,10 +54,8 @@ s48_value df_select_filter(s48_value g1, s48_value g2, s48_value g3, s48_value g
return ret1; return ret1;
} }
s48_value s48_init_select(void) void s48_init_select(void)
{ {
S48_EXPORT_FUNCTION(df_select_copyback); S48_EXPORT_FUNCTION(df_select_copyback);
S48_EXPORT_FUNCTION(df_select_filter); S48_EXPORT_FUNCTION(df_select_filter);
return S48_UNSPECIFIC;
} }

7
scsh/syscalls.c
View File

@ -810,7 +810,7 @@ s48_value df_errno_msg(s48_value g1, s48_value mv_vec)
return ret1; return ret1;
} }
s48_value s48_init_syscalls(void) void s48_init_syscalls(void)
{ {
S48_EXPORT_FUNCTION(scheme_exec); S48_EXPORT_FUNCTION(scheme_exec);
S48_EXPORT_FUNCTION(scsh_exit); S48_EXPORT_FUNCTION(scsh_exit);
@ -887,6 +887,7 @@ s48_value s48_init_syscalls(void)
S48_EXPORT_FUNCTION(scm_gethostname); S48_EXPORT_FUNCTION(scm_gethostname);
S48_EXPORT_FUNCTION(df_errno_msg); S48_EXPORT_FUNCTION(df_errno_msg);
S48_EXPORT_FUNCTION(scm_crypt); S48_EXPORT_FUNCTION(scm_crypt);
S48_EXPORT_FUNCTION(scm_openlog);
return S48_UNSPECIFIC; S48_EXPORT_FUNCTION(scm_syslog);
S48_EXPORT_FUNCTION(scm_closelog);
} }

42
scsh/tty.c
View File

@ -22,15 +22,15 @@ extern int errno;
s48_value df_scheme_tcgetattr(s48_value g1, s48_value g2, s48_value mv_vec) s48_value df_scheme_tcgetattr(s48_value g1, s48_value g2, s48_value mv_vec)
{ {
extern int scheme_tcgetattr(int , char *, int *, int *, int *, int *, int *, int *); extern int scheme_tcgetattr(int , char *, int *, int *, int *, int *, int *, int *);
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(2); S48_DECLARE_GC_PROTECT(2);
int r1; int r1;
int r2; int r2 = 0;
int r3; int r3 = 0;
int r4; int r4 = 0;
int r5; int r5 = 0;
int r6; int r6 = 0;
int r7; int r7 = 0;
@ -50,7 +50,7 @@ s48_value df_scheme_tcgetattr(s48_value g1, s48_value g2, s48_value mv_vec)
s48_value df_scheme_tcgetattrB(s48_value g1, s48_value g2, s48_value g3) s48_value df_scheme_tcgetattrB(s48_value g1, s48_value g2, s48_value g3)
{ {
extern int scheme_tcgetattrB(int , char *, s48_value ); extern int scheme_tcgetattrB(int , char *, s48_value );
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1); S48_DECLARE_GC_PROTECT(1);
int r1; int r1;
@ -66,7 +66,7 @@ s48_value df_scheme_tcgetattrB(s48_value g1, s48_value g2, s48_value g3)
s48_value df_scheme_tcsetattr(s48_value g1, s48_value g2, s48_value g3, s48_value g4, s48_value g5, s48_value g6, s48_value g7, s48_value g8, s48_value g9, s48_value g10, s48_value g11) s48_value df_scheme_tcsetattr(s48_value g1, s48_value g2, s48_value g3, s48_value g4, s48_value g5, s48_value g6, s48_value g7, s48_value g8, s48_value g9, s48_value g10, s48_value g11)
{ {
extern int scheme_tcsetattr(int , int , const char *, int , int , int , int , int , int , int , int ); extern int scheme_tcsetattr(int , int , const char *, int , int , int , int , int , int , int , int );
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1); S48_DECLARE_GC_PROTECT(1);
int r1; int r1;
@ -82,7 +82,7 @@ s48_value df_scheme_tcsetattr(s48_value g1, s48_value g2, s48_value g3, s48_valu
s48_value df_tcsendbreak(s48_value g1, s48_value g2) s48_value df_tcsendbreak(s48_value g1, s48_value g2)
{ {
extern int tcsendbreak(int , int ); extern int tcsendbreak(int , int );
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1); S48_DECLARE_GC_PROTECT(1);
int r1; int r1;
@ -98,7 +98,7 @@ s48_value df_tcsendbreak(s48_value g1, s48_value g2)
s48_value df_tcdrain(s48_value g1) s48_value df_tcdrain(s48_value g1)
{ {
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1); S48_DECLARE_GC_PROTECT(1);
int r1; int r1;
@ -114,7 +114,7 @@ s48_value df_tcdrain(s48_value g1)
s48_value df_tcflush(s48_value g1, s48_value g2) s48_value df_tcflush(s48_value g1, s48_value g2)
{ {
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1); S48_DECLARE_GC_PROTECT(1);
int r1; int r1;
@ -130,7 +130,7 @@ s48_value df_tcflush(s48_value g1, s48_value g2)
s48_value df_tcflow(s48_value g1, s48_value g2) s48_value df_tcflow(s48_value g1, s48_value g2)
{ {
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1); S48_DECLARE_GC_PROTECT(1);
int r1; int r1;
@ -146,7 +146,7 @@ s48_value df_tcflow(s48_value g1, s48_value g2)
s48_value df_tcsetpgrp(s48_value g1, s48_value g2) s48_value df_tcsetpgrp(s48_value g1, s48_value g2)
{ {
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1); S48_DECLARE_GC_PROTECT(1);
int r1; int r1;
@ -162,7 +162,7 @@ s48_value df_tcsetpgrp(s48_value g1, s48_value g2)
s48_value df_tcgetpgrp(s48_value g1, s48_value mv_vec) s48_value df_tcgetpgrp(s48_value g1, s48_value mv_vec)
{ {
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(2); S48_DECLARE_GC_PROTECT(2);
pid_t r1; pid_t r1;
@ -179,7 +179,7 @@ s48_value df_tcgetpgrp(s48_value g1, s48_value mv_vec)
s48_value df_open_ctty(s48_value g1, s48_value g2, s48_value mv_vec) s48_value df_open_ctty(s48_value g1, s48_value g2, s48_value mv_vec)
{ {
extern int open_ctty(const char *, int ); extern int open_ctty(const char *, int );
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(2); S48_DECLARE_GC_PROTECT(2);
int r1; int r1;
@ -196,7 +196,7 @@ s48_value df_open_ctty(s48_value g1, s48_value g2, s48_value mv_vec)
s48_value df_isatty(s48_value g1) s48_value df_isatty(s48_value g1)
{ {
extern int isatty(int ); extern int isatty(int );
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1); S48_DECLARE_GC_PROTECT(1);
int r1; int r1;
@ -212,7 +212,7 @@ s48_value df_isatty(s48_value g1)
s48_value df_ttyname(s48_value g1, s48_value mv_vec) s48_value df_ttyname(s48_value g1, s48_value mv_vec)
{ {
extern char *ttyname(int ); extern char *ttyname(int );
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(2); S48_DECLARE_GC_PROTECT(2);
char *r1; char *r1;
@ -229,7 +229,7 @@ s48_value df_ttyname(s48_value g1, s48_value mv_vec)
s48_value df_scm_ctermid(s48_value mv_vec) s48_value df_scm_ctermid(s48_value mv_vec)
{ {
extern char *scm_ctermid(void); extern char *scm_ctermid(void);
s48_value ret1; s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(2); S48_DECLARE_GC_PROTECT(2);
char *r1; char *r1;
@ -243,7 +243,7 @@ s48_value df_scm_ctermid(s48_value mv_vec)
return ret1; return ret1;
} }
s48_value s48_init_tty(void) void s48_init_tty(void)
{ {
S48_EXPORT_FUNCTION(df_scheme_tcgetattr); S48_EXPORT_FUNCTION(df_scheme_tcgetattr);
S48_EXPORT_FUNCTION(df_scheme_tcgetattrB); S48_EXPORT_FUNCTION(df_scheme_tcgetattrB);
@ -258,6 +258,4 @@ s48_value s48_init_tty(void)
S48_EXPORT_FUNCTION(df_isatty); S48_EXPORT_FUNCTION(df_isatty);
S48_EXPORT_FUNCTION(df_ttyname); S48_EXPORT_FUNCTION(df_ttyname);
S48_EXPORT_FUNCTION(df_scm_ctermid); S48_EXPORT_FUNCTION(df_scm_ctermid);
return S48_UNSPECIFIC;
} }