blob: 86474d25a8ab3e53d85e5f37e8a1f5e2c725a9ac (
plain) (
blame)
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
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
include <mach.h>
include <fio.h>
include "zdisplay.h"
include "iis.h"
# IISSTT -- IIS status.
# [OBSOLETE - NO LONGER USED (see zsttim)]
procedure iisstt (chan, what, lvalue)
int chan[ARB], what
long lvalue
begin
switch (what) {
case FSTT_FILSIZE:
lvalue = IIS_FILSIZE
case FSTT_BLKSIZE:
lvalue = IIS_BLKSIZE
case FSTT_OPTBUFSIZE:
lvalue = IIS_OPTBUFSIZE
case FSTT_MAXBUFSIZE:
lvalue = IIS_MAXBUFSIZE
default:
lvalue = ERR
}
end
|
