about summary refs log tree commit diff stats
path: root/doc/Makefile
blob: 8716885843390caa484a06eec83efb75b5c315e6 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
.POSIX:
.DELETE_ON_ERROR:

# Outputs other than Gemini aren't required

GEMINI := breaking_rules.gmi bane.20.cdr15.gmi

.PHONY: all
all: $(GEMINI)
# lkbib.txt can be made manually as needed

# Write gfm.
# Beyond that, YAGNI.

# None of setting GROFF_NO_SGR, using the "-c" option,
# or piping through ul worked.
# GROFF_NO_SGR=1 groff -Tutf8 -R -ms -k -Kutf8 -c macros.ms lkbib.ms | ul > $@
lkbib.txt: macros.ms lkbib.ms refs.i
	groff -Tutf8 -R -ms -k -Kutf8 macros.ms lkbib.ms > $@

%.gmi: %.md
	md2gemini -m -l copy $^ > $@

refs.i: refs
	indxbib $^

.PHONY: clean
clean:
	$(RM) $(GEMINI) lkbib.txt

.PHONY: push
push: $(GEMINI)
	scp -6 $^ dbane@republic.circumlunar.space:/usr/home/dbane/gemini/lsp_doc
20:number <- copy 0 # refcount 21:number <- copy 5 # length # actual start of this recipe default-space:address:shared:array:location <- copy 10/unsafe 0:address:shared:array:location/names:dummy <- copy 20/unsafe # later layers will explain the /names: property 1:number <- copy 32 1:number/space:1 <- copy 33 ] def dummy [ # just for the /names: property above ] # chain space: 10 + /*skip refcount*/1 + /*skip length*/1 +mem: storing 20 in location 12 # store to default space: 10 + /*skip refcount*/1 + /*skip length*/1 + /*index*/1 +mem: storing 32 in location 13 # store to chained space: /*contents of location 12*/20 + /*skip refcount*/1 + /*skip length*/1 + /*index*/1 +mem: storing 33 in location 23 //: If you think of a space as a collection of variables with a common //: lifetime, surrounding allows managing shorter lifetimes inside a longer //: one. :(replace{} "int space_base(const reagent& x)") int space_base(const reagent& x) { int base = current_call().default_space ? (current_call().default_space+/*skip refcount*/1) : 0; return space_base(x, space_index(x), base); } int space_base(const reagent& x, int space_index, int base) { if (space_index == 0) return base; int result = space_base(x, space_index-1, get_or_insert(Memory, base+/*skip length*/1))+/*skip refcount*/1; return result; } int space_index(const reagent& x) { for (int i = 0; i < SIZE(x.properties); ++i) { if (x.properties.at(i).first == "space") { if (!x.properties.at(i).second || x.properties.at(i).second->right) raise << maybe(current_recipe_name()) << "/space metadata should take exactly one value in " << x.original_string << '\n' << end(); return to_integer(x.properties.at(i).second->value); } } return 0; } :(scenario permit_space_as_variable_name) def main [ space:number <- copy 0 ]