mirror of
https://github.com/PDP-10/its.git
synced 2026-04-19 01:18:29 +00:00
43 lines
676 B
SYSTEMD
Executable File
43 lines
676 B
SYSTEMD
Executable File
|
||
.lif z %defin
|
||
.title **** support
|
||
.sbttl **** support: Definitions, Macros and Code
|
||
|
||
.iif z %defin, .nlist ;don't list definitions and macros if not
|
||
;defining them
|
||
|
||
.if nz %defin ;only define symbols when we are supposed to
|
||
|
||
.if p1
|
||
.sbttl -- Definitions
|
||
|
||
|
||
.endc p1
|
||
|
||
****
|
||
.sbttl -- Macros
|
||
****
|
||
|
||
.endc %defin
|
||
|
||
.iif z %defin, .list ;start listing again
|
||
|
||
.iif nz %defin, .nlist ;don't list code if only doing definitions
|
||
|
||
.if z %defin ;only do code if not defining symbols
|
||
|
||
.sbttl -- Code
|
||
****
|
||
|
||
.endc %defin
|
||
|
||
.iif nz %defin, .list ;start listing as usual
|
||
|
||
|
||
;; local modes:
|
||
;; mode:midas
|
||
;; auto fill mode:
|
||
;; fill column:75
|
||
;; comment column:32
|
||
;; end:
|