M.Z.
This commit is contained in:
@ -106,7 +106,6 @@ int mycTime(int date) {
|
|||||||
#ifdef F_CHAR
|
#ifdef F_CHAR
|
||||||
/* compile only when fortran c interface stuff is defined */
|
/* compile only when fortran c interface stuff is defined */
|
||||||
|
|
||||||
|
|
||||||
int F_FUN(myc_now)(void) { return mycNow(); }
|
int F_FUN(myc_now)(void) { return mycNow(); }
|
||||||
int F_FUN(myc_date)(int *time) { return mycDate(*time); }
|
int F_FUN(myc_date)(int *time) { return mycDate(*time); }
|
||||||
int F_FUN(myc_time)(int *date) { return mycTime(*date); }
|
int F_FUN(myc_time)(int *date) { return mycTime(*date); }
|
||||||
|
@ -49,6 +49,7 @@ typedef int sys_adr_len; /* argument of accept and gethostbyadr */
|
|||||||
|
|
||||||
#define sys_ctrl_init() 0
|
#define sys_ctrl_init() 0
|
||||||
|
|
||||||
|
|
||||||
#else
|
#else
|
||||||
|
|
||||||
/* other machines are not supported */
|
/* other machines are not supported */
|
||||||
|
@ -3,7 +3,7 @@
|
|||||||
|
|
||||||
#include "coc_client.h"
|
#include "coc_client.h"
|
||||||
/*
|
/*
|
||||||
tecc.h: tecs client interface routines
|
tecs_cli.h: tecs client interface routines
|
||||||
|
|
||||||
M. Zolliker March 2000
|
M. Zolliker March 2000
|
||||||
*/
|
*/
|
||||||
|
Reference in New Issue
Block a user