1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
|
#if(0)
FTANGLE v1.60,
created with UNIX on "Thursday, September 24, 1998 at 16:12."
COMMAND LINE: "Web/ftangle Web/termcap0 -A -# --F -= 1.62/Web/termcap0.c"
RUN TIME: "Friday, September 25, 1998 at 8:02."
WEB FILE: "Web/termcap0.web"
CHANGE FILE: (none)
#endif
#include "os.h"
typedef char outer_char;
#include "a_type.h"
int tgetent FCN((buffer,name))
outer_char*buffer C0("")
CONST outer_char*name C1("")
{
*buffer= '\0';
return 0;
}
int tgetflag FCN((id))
CONST outer_char*id C1("")
{
return 0;
}
int tgetnum FCN((id))
CONST outer_char*id C1("")
{
return-1;
}
outer_char*tgetstr FCN((id,pp))
CONST outer_char*id C0("")
outer_char**pp C1("")
{
return NULL;
}
outer_char*tgoto FCN((cm,destcol,destline))
CONST outer_char*cm C0("")
int destcol C0("")
int destline C1("")
{
return(outer_char*)"OOPS";
}
SRTN tputs FCN((cp,affcnt,outc))
outer_char*cp C0("")
int affcnt C0("")
int(*outc)PROTO((int))C1("")
{
while(*cp)
(*outc)(*cp++);
}
|
