sys/gio/gplcancel.x


1
2
3
4
5
6
7
8
9
10
11
12
13

# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.

include	<gio.h>

# GPL_CANCEL -- Cancel any buffered polyline output.

procedure gpl_cancel()

include	"gpl.com"

begin
	op = 1
end