projects
/
pdp10-muddle.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Machine-Independent MDL for TOPS-20 and VAX.
[pdp10-muddle.git]
/
mim
/
development
/
mim
/
vax
/
nvs
/
f.mud
1
<USE "VS100">
2
<INCLUDE "VSUDEFS" "VSUTYPES">
3
4
<DEFINE F ("OPT" (CHN .CH) "AUX" EV)
5
<REPEAT ()
6
<COND (<AND <TYPE? <SET EV <CHANNEL-OP .CHN READ-BYTE-IMMEDIATE>>
7
MOUSE-EVENT>
8
<==? <ME-KIND .EV> ,ME-LEFT-PRESSED>>
9
<RETURN <CHANNEL-OP .CHN MOUSE-RESIZE-WINDOW ,MOUSE-LEFT>>)>>>