1 REM Sapphire options macro library -- © 1995 Straylight
8 IF opt__l THEN !(opt__l+O%-P%+4)=P%-opt__l
21 !(opt__l+O%-P%)=!(opt__l+O%-P%) OR f%
26 FNopt__f(optFlag_last)
29 !(opt__l+O%-P%+4)=P%-opt__l
32 DEF FNoptions_string(o%,n$,s%)
34 FNoption(o%,optType_string,n$)
39 DEF FNoptions_integer(o%,n$,b%)
40 IF FNoption(o%,optType_integer,n$)
41 IF b% THEN [opt 4:dcd b%:]
45 IF FNoption(0,optType_literal,"")
46 IF FNopt__f(optFlag_ignore)
49 DEF FNoptions_enum(o%,n$)=FNoption(o%,optType_enum,n$)
51 DEF FNoptions_bool(o%,n$,f%)
53 FNoption(o%,optType_bool,n$)
58 DEF FNoptions_version(o%,n$)=FNoption(o%,optType_version,n$)