mirror of
https://git.sr.ht/~crc_/retroforth
synced 2024-11-16 19:48:56 +01:00
101 lines
2.5 KiB
Text
Executable file
101 lines
2.5 KiB
Text
Executable file
#!/usr/bin/env retro
|
|
|
|
This is used to assemble the Markdown copy of the RETRO Handbook.
|
|
|
|
The individual chapters are in the `book/` directory. This is set
|
|
using the `BOOK-BASE` constant.
|
|
|
|
~~~
|
|
'doc/book/ 'BOOK-BASE s:const
|
|
'chapters/ 'OUT-BASE s:const
|
|
~~~
|
|
|
|
The chapters are specified it the `TOC`, a named array. These are
|
|
the file names, they will be included in order. I am structuring
|
|
it using separate file to make the actual editing process easier
|
|
for me.
|
|
|
|
~~~
|
|
{
|
|
'general/introduction
|
|
'general/copyrights
|
|
'building/obtaining
|
|
'building/unix
|
|
'building/windows
|
|
'building/alternatives
|
|
'building/advanced
|
|
'general/starting
|
|
'general/basic-interactions
|
|
'general/retro-unu
|
|
'general/quick-tutorial
|
|
'general/syntax
|
|
'toolchain/info/additional-tools
|
|
'toolchain/info/retro-compiler
|
|
'toolchain/man/retro
|
|
'toolchain/man/retro-describe
|
|
'toolchain/man/retro-document
|
|
'toolchain/man/retro-embedimage
|
|
'toolchain/man/retro-extend
|
|
'toolchain/man/retro-locate
|
|
'toolchain/man/retro-muri
|
|
'toolchain/man/retro-tags
|
|
'techniques/naming-conventions
|
|
'techniques/return-stack
|
|
'techniques/stack-diagrams
|
|
'techniques/arrays
|
|
'techniques/assembly
|
|
'techniques/buffer
|
|
'techniques/characters
|
|
'techniques/definitions
|
|
'techniques/dictionary
|
|
'techniques/floating-point
|
|
'techniques/files
|
|
'techniques/loops
|
|
'techniques/numbers
|
|
'techniques/pointers
|
|
'techniques/quotes
|
|
'techniques/sockets
|
|
'techniques/scripting
|
|
'techniques/strings
|
|
'techniques/using-combinators
|
|
'techniques/word-classes
|
|
'techniques/checking-the-version
|
|
'techniques/errors
|
|
'techniques/lexical-scope
|
|
'techniques/the-stacks
|
|
'internals/nga
|
|
'internals/interface-layers
|
|
'internals/io
|
|
'internals/image
|
|
'tech-notes/historical-papers
|
|
'tech-notes/metacompilation
|
|
'tech-notes/self-hosting
|
|
'tech-notes/prefixes
|
|
'tech-notes/kernel-words
|
|
'tech-notes/ngaro-to-nga
|
|
'tech-notes/retro11-retrospective
|
|
'tech-notes/security
|
|
'tech-notes/underscores-in-names
|
|
'tech-notes/code-it-yourself
|
|
'general/deprecation
|
|
'glossary/using
|
|
'glossary/glossary
|
|
} 'TOC const
|
|
~~~
|
|
|
|
|
|
~~~
|
|
'Out var
|
|
|
|
:import BOOK-BASE over OUT-BASE '>%s%s.html_retro_example/export-as-html.retro_%s%s s:format unix:system ;
|
|
:/n ASCII:LF @Out file:write ;
|
|
:add-to-book here [ @Out file:write ] s:for-each ;
|
|
:process-files [ import $. c:put ] a:for-each nl ;
|
|
:open 'doc/RETRO-Book.md file:open<for-writing> !Out ;
|
|
:close @Out file:close ;
|
|
:assemble open process-files close ;
|
|
~~~
|
|
|
|
~~~
|
|
TOC assemble
|
|
~~~
|