| /* !! noecho */ |
/* !! noecho */ |
| n = key(); |
n = key(); |
| |
|
| |
key? -- n fig key_q |
| |
fflush(stdout); |
| |
n = key_query; |
| |
|
| cr -- fig |
cr -- fig |
| puts(""); |
puts(""); |
| |
|
| pclose wfileid -- wior own |
pclose wfileid -- wior own |
| wior=pclose((FILE *)wfileid); |
wior=pclose((FILE *)wfileid); |
| |
|
| |
time&date -- nyear nmonth nday nhour nmin nsec ansi time_and_date |
| |
struct timeval time1; |
| |
struct timezone zone1; |
| |
struct tm *ltime; |
| |
gettimeofday(&time1,&zone1); |
| |
ltime=localtime(&time1.tv_sec); |
| |
nyear =ltime->tm_year+1900; |
| |
nmonth=ltime->tm_mon; |
| |
nday =ltime->tm_mday; |
| |
nhour =ltime->tm_hour; |
| |
nmin =ltime->tm_min; |
| |
nsec =ltime->tm_sec; |
| |
|
| |
ms n -- ansi |
| |
struct timeval timeout; |
| |
timeout.tv_sec=n/1000; |
| |
timeout.tv_usec=1000*(n%1000); |
| |
(void)select(0,0,0,0,&timeout); |
| |
|
| allocate u -- a_addr wior memory |
allocate u -- a_addr wior memory |
| a_addr = (Cell *)malloc(u); |
a_addr = (Cell *)malloc(u); |
| wior = a_addr==NULL; /* !! define a return code */ |
wior = a_addr==NULL; /* !! define a return code */ |
