blob: ddd18d3ad7a4080895af95e3c0ab6500c001786b (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
include "zdisplay.h"
# ZOPNIM -- Open an image display frame which is addressable as
# a binary file.
procedure zopnim (devinfo, mode, chan)
char devinfo[ARB] # packed devinfo string
int mode # access mode
int chan
int iischan[2] # Kludge
begin
call iisopn (devinfo, mode, iischan)
chan = iischan[1]
end
|
