Files
TeslaRel410/sda4/BRIEF/MACROS/STARTUP.M
T
CydandClaude Fable 5 db7745fcd0 sda4: commit the Glaze developer hard-drive dump
Un-ignored: the dev drive is the ground truth the restoration and
emulator work constantly reference (DPL3/LIBDPL + VRENDER i860 renderer
source, BT/RP live+dev game trees, VGL_LABS pod boot, scene/audio
content). Kept in-repo for the pod-owner community.

Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
2026-07-04 19:41:15 -05:00

103 lines
2.3 KiB
Objective-C

;**
;** BRIEF -- Basic Reconfigurable Interactive Editing Facility
;**
;** Written by Dave Nanian and Michael Strickman.
;**
;**
;** startup.m:
;**
;** This macro file is automatically loaded at the start of each editing
;** session. If you want to change the default configuration of BRIEF,
;** you will have to modify this file. The built-in key assignments are
;** listed in the file sample.m.
;**
;** Revision history:
;** -----------------
#include "keyboard.h"
#include "misc.h"
;**
;** The following macro is invoked once, after the first buffer has been
;** loaded at the start of each editing session.
;**
(macro startup
(
;**
;** First, we call the "keyboard" macro, included above. This
;** macro defines all of the BRIEF commands and keystrokes that are
;** implemented as macros, and tells BRIEF which files they can be
;** found in.
;**
(keyboard)
;**
;** Here we load the language package. If there's no BPACKAGES
;** environment variable, this load in unnecessary.
;**
(if (strlen (inq_environment "BPACKAGES"))
(load_macro "language")
)
(register_macro 3 "_do_beep") ;** Beep for invalid keystrokes.
)
)
;** This macro, which is called when a file with a .c extension is read
;** into a buffer, sets the tabs.
;**
;** Note that the (tabs) macro primitive replicates the distance of the
;** last tab stop until the end of the line.
(macro .c
(tabs 4 7)
)
;** The following macros are called when files with their names as
;** extensions are read into buffers.
(macro .m
(.c) ;** Tabs are the same as a c file.
)
(macro .h
(.c) ;** Tabs are the same as a c file.
)
(macro .asm
(tabs 9 17)
)
;**
;** The next macro is called if the extension of the file does not match
;** any of the previous macros (".h", ".c", ".m", ".asm").
;**
(macro default
(.asm) ;** By default, use assembler-style tabs.
)
;**
;** _do_beep:
;**
;** This macro calls the beep primitive -- beep cannot be registered.
;**
(macro _do_beep
(beep)
)
;**
;** _exit:
;**
;** Performs the same function as exit, but does not register as
;** a context-sensitive help macro. No name beginning with _ does.
;**
(macro _exit
(exit)
)