en:pfw:library
Differences
This shows you the differences between two versions of the page.
Both sides previous revisionPrevious revisionNext revision | Previous revision | ||
en:pfw:library [2024-09-04 13:04] – [The viewer] willem | en:pfw:library [2024-09-04 13:16] (current) – [The viewer] willem | ||
---|---|---|---|
Line 276: | Line 276: | ||
</ | </ | ||
- | ===== The viewer ===== | + | ===== A viewer |
+ | |||
+ | This viewer shows 16 or less lines at a time. | ||
+ | It stops at a <09> character, prints a divider line and waits for user input. | ||
+ | When the spacebar was hit, it goes on displaying the next chapter. | ||
+ | Any other key leaves the viewer. | ||
<code forth> | <code forth> | ||
( A library consists of 09 {tab}, 0D {cr} and ASCII chars ) | ( A library consists of 09 {tab}, 0D {cr} and ASCII chars ) | ||
( ranging from blank to ~ others chars are not allowed ) | ( ranging from blank to ~ others chars are not allowed ) | ||
- | v: inside also definitions | + | \ Show the library source code of a chapter |
: .LINE ( a1 -- a2 ch ) begin c@+ dup BL < 0= while emit repeat ; | : .LINE ( a1 -- a2 ch ) begin c@+ dup BL < 0= while emit repeat ; | ||
- | : .DIVIDER | + | : .DIVIDER |
: LIBTYPE | : LIBTYPE | ||
Line 295: | Line 300: | ||
repeat | repeat | ||
- | v: extra definitions | + | : VIEW ( " |
- | : VIEW ( ccc -- ) bl-word count lib-find libtype ; | + | |
- | v: fresh</ | + | </ |
===== A sample library source ===== | ===== A sample library source ===== | ||
This examples shows how many different code parts can be used inside the library.\\ | This examples shows how many different code parts can be used inside the library.\\ |
en/pfw/library.1725447851.txt.gz · Last modified: 2024-09-04 13:04 by willem