Update of /cvsroot/scsh/scsh-0.6/scsh
In directory usw-pr-cvs1:/tmp/cvs-serv2752
Modified Files:
flock.c network.c select.c syscalls.c tty.c
Log Message:
Snapshot of cig generated files.
Index: flock.c
===================================================================
RCS file: /cvsroot/scsh/scsh-0.6/scsh/flock.c,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -r1.5 -r1.6
*** flock.c 1999/11/04 16:00:27 1.5
--- flock.c 2001/01/09 15:57:06 1.6
***************
*** 22,26 ****
{
extern int set_lock(int , int , int , int , int , int );
! s48_value ret1;
S48_DECLARE_GC_PROTECT(1);
int r1;
--- 22,26 ----
{
extern int set_lock(int , int , int , int , int , int );
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1);
int r1;
***************
*** 38,49 ****
{
extern int get_lock(int , int , int , int , int , int , int *, int *, int
*, int *, int *);
! s48_value ret1;
S48_DECLARE_GC_PROTECT(2);
int r1;
! int r2;
! int r3;
! int r4;
! int r5;
! int r6;
--- 38,49 ----
{
extern int get_lock(int , int , int , int , int , int , int *, int *, int
*, int *, int *);
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(2);
int r1;
! int r2 = 0;
! int r3 = 0;
! int r4 = 0;
! int r5 = 0;
! int r6 = 0;
***************
*** 61,69 ****
}
! s48_value s48_init_flock(void)
{
S48_EXPORT_FUNCTION(df_set_lock);
S48_EXPORT_FUNCTION(df_get_lock);
-
- return S48_UNSPECIFIC;
}
--- 61,67 ----
}
! void s48_init_flock(void)
{
S48_EXPORT_FUNCTION(df_set_lock);
S48_EXPORT_FUNCTION(df_get_lock);
}
Index: network.c
===================================================================
RCS file: /cvsroot/scsh/scsh-0.6/scsh/network.c,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -r1.8 -r1.9
*** network.c 2001/01/01 17:55:36 1.8
--- network.c 2001/01/09 15:57:06 1.9
***************
*** 96,99 ****
S48_EXPORT_FUNCTION(scheme_proto_num2proto_info);
S48_EXPORT_FUNCTION(scheme_proto_name2proto_info);
-
}
--- 96,98 ----
Index: select.c
===================================================================
RCS file: /cvsroot/scsh/scsh-0.6/scsh/select.c,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -r1.6 -r1.7
*** select.c 2001/01/01 17:55:36 1.6
--- select.c 2001/01/09 15:57:06 1.7
***************
*** 55,63 ****
}
! s48_value s48_init_select(void)
{
S48_EXPORT_FUNCTION(df_select_copyback);
S48_EXPORT_FUNCTION(df_select_filter);
-
- return S48_UNSPECIFIC;
}
--- 55,61 ----
}
! void s48_init_select(void)
{
S48_EXPORT_FUNCTION(df_select_copyback);
S48_EXPORT_FUNCTION(df_select_filter);
}
Index: syscalls.c
===================================================================
RCS file: /cvsroot/scsh/scsh-0.6/scsh/syscalls.c,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -r1.10 -r1.11
*** syscalls.c 2001/01/01 17:55:36 1.10
--- syscalls.c 2001/01/09 15:57:06 1.11
***************
*** 811,815 ****
}
! s48_value s48_init_syscalls(void)
{
S48_EXPORT_FUNCTION(scheme_exec);
--- 811,815 ----
}
! void s48_init_syscalls(void)
{
S48_EXPORT_FUNCTION(scheme_exec);
***************
*** 888,892 ****
S48_EXPORT_FUNCTION(df_errno_msg);
S48_EXPORT_FUNCTION(scm_crypt);
!
! return S48_UNSPECIFIC;
}
--- 888,893 ----
S48_EXPORT_FUNCTION(df_errno_msg);
S48_EXPORT_FUNCTION(scm_crypt);
! S48_EXPORT_FUNCTION(scm_openlog);
! S48_EXPORT_FUNCTION(scm_syslog);
! S48_EXPORT_FUNCTION(scm_closelog);
}
Index: tty.c
===================================================================
RCS file: /cvsroot/scsh/scsh-0.6/scsh/tty.c,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -r1.6 -r1.7
*** tty.c 1999/11/04 16:00:27 1.6
--- tty.c 2001/01/09 15:57:06 1.7
***************
*** 23,35 ****
{
extern int scheme_tcgetattr(int , char *, int *, int *, int *, int *, int
*, int *);
! s48_value ret1;
S48_DECLARE_GC_PROTECT(2);
int r1;
! int r2;
! int r3;
! int r4;
! int r5;
! int r6;
! int r7;
--- 23,35 ----
{
extern int scheme_tcgetattr(int , char *, int *, int *, int *, int *, int
*, int *);
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(2);
int r1;
! int r2 = 0;
! int r3 = 0;
! int r4 = 0;
! int r5 = 0;
! int r6 = 0;
! int r7 = 0;
***************
*** 51,55 ****
{
extern int scheme_tcgetattrB(int , char *, s48_value );
! s48_value ret1;
S48_DECLARE_GC_PROTECT(1);
int r1;
--- 51,55 ----
{
extern int scheme_tcgetattrB(int , char *, s48_value );
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1);
int r1;
***************
*** 67,71 ****
{
extern int scheme_tcsetattr(int , int , const char *, int , int , int ,
int , int , int , int , int );
! s48_value ret1;
S48_DECLARE_GC_PROTECT(1);
int r1;
--- 67,71 ----
{
extern int scheme_tcsetattr(int , int , const char *, int , int , int ,
int , int , int , int , int );
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1);
int r1;
***************
*** 83,87 ****
{
extern int tcsendbreak(int , int );
! s48_value ret1;
S48_DECLARE_GC_PROTECT(1);
int r1;
--- 83,87 ----
{
extern int tcsendbreak(int , int );
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1);
int r1;
***************
*** 99,103 ****
{
! s48_value ret1;
S48_DECLARE_GC_PROTECT(1);
int r1;
--- 99,103 ----
{
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1);
int r1;
***************
*** 115,119 ****
{
! s48_value ret1;
S48_DECLARE_GC_PROTECT(1);
int r1;
--- 115,119 ----
{
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1);
int r1;
***************
*** 131,135 ****
{
! s48_value ret1;
S48_DECLARE_GC_PROTECT(1);
int r1;
--- 131,135 ----
{
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1);
int r1;
***************
*** 147,151 ****
{
! s48_value ret1;
S48_DECLARE_GC_PROTECT(1);
int r1;
--- 147,151 ----
{
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1);
int r1;
***************
*** 163,167 ****
{
! s48_value ret1;
S48_DECLARE_GC_PROTECT(2);
pid_t r1;
--- 163,167 ----
{
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(2);
pid_t r1;
***************
*** 180,184 ****
{
extern int open_ctty(const char *, int );
! s48_value ret1;
S48_DECLARE_GC_PROTECT(2);
int r1;
--- 180,184 ----
{
extern int open_ctty(const char *, int );
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(2);
int r1;
***************
*** 197,201 ****
{
extern int isatty(int );
! s48_value ret1;
S48_DECLARE_GC_PROTECT(1);
int r1;
--- 197,201 ----
{
extern int isatty(int );
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(1);
int r1;
***************
*** 213,217 ****
{
extern char *ttyname(int );
! s48_value ret1;
S48_DECLARE_GC_PROTECT(2);
char *r1;
--- 213,217 ----
{
extern char *ttyname(int );
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(2);
char *r1;
***************
*** 230,234 ****
{
extern char *scm_ctermid(void);
! s48_value ret1;
S48_DECLARE_GC_PROTECT(2);
char *r1;
--- 230,234 ----
{
extern char *scm_ctermid(void);
! s48_value ret1 = S48_FALSE;
S48_DECLARE_GC_PROTECT(2);
char *r1;
***************
*** 244,248 ****
}
! s48_value s48_init_tty(void)
{
S48_EXPORT_FUNCTION(df_scheme_tcgetattr);
--- 244,248 ----
}
! void s48_init_tty(void)
{
S48_EXPORT_FUNCTION(df_scheme_tcgetattr);
***************
*** 259,263 ****
S48_EXPORT_FUNCTION(df_ttyname);
S48_EXPORT_FUNCTION(df_scm_ctermid);
-
- return S48_UNSPECIFIC;
}
--- 259,261 ----
|