aboutsummaryrefslogtreecommitdiff
path: root/sys/gio/stdgraph/stglkcur.x
blob: 6152534b49e7e8f9804035968e3155d0f9240d16 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.

include	<gset.h>
include	"stdgraph.h"

# STG_LOCKCURSOR -- Lock the logical cursor number.  Called interactively by
# cursor mode in response to a ":.cursor N" command by the user.  When the
# cursor is not locked the logical cursor may be selected under program
# control.

procedure stg_lockcursor (new_cursor)

int	new_cursor		# desired new logical cursor
include	"stdgraph.com"

begin
	g_cursor = new_cursor
end