~mdw
/
ssr
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
828fda1b9072082a695ed06ce6d25f3c754ec507
[ssr]
/
StraySrc
/
Libraries
/
Sapphire
/
bsh
/
libOpts.bas
1
REM Sapphire libOpts macro library -- © 1994 Straylight
2
3
DEF FNlibOpts_test=0
4
5
DEF FNlibOpt(n$)
6
IF FNalign
7
lo__l=lo__l
8
IF lo__l THEN !(lo__l+O%-P%-4)=P%-lo__l
9
[ opt 4
10
equs n$
11
dcd 0
12
.lo__l
13
]
14
=0
15
16
DEF FNlibOpts_end
17
IF FNalign
18
!(lo__l+O%-P%-4)=P%-lo__l
19
[ opt 4
20
dcd -1
21
]
22
=0