blob: 9d3372a9c0addbc488ac430e9cfe922631cbdbba (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
include "window.h"
# CLEAROK -- Set the clear flag for a window
#
# B.Simon 01-Oct-90 Original
procedure clearok (win, flag)
int win # i: Window descriptor
bool flag # i: Flag value
#--
include "window.com"
pointer pwin
int btoi()
begin
pwin = warray[win]
WIN_CLEAR(pwin) = btoi (flag)
end
|
