blob: e7d29dd7b12ed0ba1ab6eaedddc7b4a0d88b3217 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
include "sgi.h"
# SGI_CLOSEWS -- Close the named workstation. Flush the output.
# The spool file is closed only on the next plot or at gktclose time.
# If the spool file is closed here, APPEND mode would not work.
procedure sgi_closews (devname, n)
short devname[ARB] # device name (not used)
int n # length of device name
include "sgi.com"
begin
call sgk_flush (g_out)
end
|
