Files
LithosAnanke/v4/include/v4/rom_entries.h
T
Claude 3bd81097e1 chore(license): an SPDX header on every source file that had none (LicenseRef-Starship-1.0) [skip ci]
The header scan (Captain Bob, 2026-11-10): 788 source files -- 351 with the
SL-1.0 header, 12 with the old name (docs/working/experiments, kept by
ruling), 31 under someone else's licence (tools/kconfig, Linux's, GPL-2.0:
kept), and 394 with none. Ruled: the SPDX form; capsules (.4th, .f18) and
proofs (.thy) left for a ruling of their own (mkcapsule's 64x16 block format,
content-addressed capsules).

253 files now begin
    SPDX-License-Identifier: LicenseRef-Starship-1.0
    Copyright (c) 2023-2026 Robert A. James
as a /* */ block (C, headers, assembly, linker scripts) or # lines (scripts,
Makefiles, Kconfig; below a shebang or a coding line); tools/mkcapsule.c,
which had the copyright line, gets the SPDX line only.

Not touched: docs/working/ (archive and old campaign material, as the
ruling kept the experiments); v4/system/post_cases.c (generated by
v4/tools/mkpost.py, "do not edit" -- the generator has the header).

Comments only: the kernel builds on amd64, aarch64, riscv64; make -C v4
test-32: 39 programs, 0 failures; every changed script parses.

Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_01GE3SDvQn5EoxdGufk84zz2
2026-11-10 04:12:49 +00:00

35 lines
1.5 KiB
C

/* SPDX-License-Identifier: LicenseRef-Starship-1.0
* Copyright (c) 2023-2026 Robert A. James
*/
/* rom_entries.h -- the ROMs' shared entries (docs/v4.0.0/MACHINE.md 2.2).
*
* Both ROMs, the host node's and a mesh node's, begin with these entries, in
* this order: entry i is at V4_ROM_BASE + i, a jump to the routine. A
* payload calls an entry, never an address inside the ROM. This is the one
* list: tools/mkmap.c makes of it the (MATH-ENTRIES) macro both ROMs' entry
* tables begin with (capsules/v4/rom/main.f18, mesh.f18) and the constants
* ROM-UM* ... the system's source calls them by (tests/host_map.h).
*
* X(INDEX, ROUTINE, FORTH, EFFECT): ROUTINE is the ROM's name for the code
* (capsules/v4/rom/math.f18), FORTH the system's word that calls it, EFFECT
* its stack effect. An entry is added only at the end.
*/
#ifndef V4_ROM_ENTRIES_H
#define V4_ROM_ENTRIES_H
#define V4_ROM_MATH_ENTRIES(X) \
X(0, "(UM*)", "UM*", "( u1 u2 -- ulo uhi )") \
X(1, "(UM/MOD)", "UM/MOD", "( ulo uhi ud -- urem uquot )") \
X(2, "(D+)", "D+", "( d1 d2 -- d3 )") \
X(3, "(DNEGATE)", "DNEGATE", "( d -- -d )") \
X(4, "(Q.*)", "Q.*", "( a b -- c )") \
X(5, "(Q./)", "Q./", "( a b -- q )")
#define V4_ROM_MATH_COUNT 6u
/* The host ROM's own entries follow: the assembler's twelve routines, then
* (ROM), where the host machine starts (capsules/v4/rom/main.f18). */
#define V4_ROM_START (V4_ROM_MATH_COUNT + 12u)
#endif