static char sccsid
[] = "@(#)tb.c 4.3 %G%";
/* tb.c: check which entries exist, also storage allocation */
used
[c
]=lused
[c
]=rused
[c
]=0;
if (instead
[i
] || fullbot
[i
]) continue;
if (k
== '-' || k
== '=') continue;
rused
[c
]|= real(table
[i
][c
].rcol
);
if( !real(table
[i
][c
].rcol
))
used
[c
] |= real(table
[i
][c
].col
);
lused
[c
] |= real(table
[i
][c
].col
);
used
[c
] |= real(table
[i
][c
].col
);
if (!point(s
)) return(1);
return(spvecs
[spcount
++]);
error("Too many characters in table");
spvecs
[spcount
++]= pp
= calloc(MAXCHS
+200,1);
error("no space for characters");
if (tpcount
<0 || thisvec
+n
> tpvecs
[tpcount
]+MAXCHS
)
tpvecs
[tpcount
] = calloc(MAXCHS
,1);
thisvec
= tpvecs
[tpcount
];
error("no space for vectors");
for(q
=tp
; q
<thisvec
; q
++)
/* give back unwanted space in some vectors */