evoke.e


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

~ cat labels.e elf.e execution.e evoke.e | ./quine > evoke && chmod 755 evoke && ./evoke

~ (output memory start, current output point
~  -- output memory start, current output point)
~
~ Everything directly called by all-contents has this same interface.
~
: all-contents
  elf-file-header
  elf-program-header
  cold-start
  warm-start
  output-docol
  0 L!' final-word-name
  current-offset L!' total-size
  ;

' all-contents entry-to-execution-token label-loop
swap sys-write bye