blob: 3ccc6d0d7e43d48097671464a9fc0e687196b9d4 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
include <mii.h>
include "symtab.h"
# STSIZE -- Compute the file storage space in chars required to store the
# symbol table, e.g., in a subsequent call to STSAVE.
int procedure stsize (stp)
pointer stp # symbol table descriptor
int size
int miipksize()
begin
size = miipksize (LEN_SYMTAB + ST_INDEXLEN(stp) + ST_STABLEN(stp),
MII_LONG) + miipksize (ST_SBUFLEN(stp), MII_BYTE)
return (size)
end
|