patch glossary tool to allow larger words.tsv source data set
FossilOrigin-Name: 981044535d7838de23111d2734a6ffb5867e4907d55a847536bb300688b6c1ed
This commit is contained in:
parent
3aa560c9dc
commit
a61e1f7637
1 changed files with 10 additions and 7 deletions
|
@ -254,7 +254,10 @@ There are five primary roles:
|
||||||
:matched? (-f) field:name TARGET s:eq? ;
|
:matched? (-f) field:name TARGET s:eq? ;
|
||||||
---reveal---
|
---reveal---
|
||||||
:find-and-display-entry
|
:find-and-display-entry
|
||||||
'doc/words.tsv [ s:keep !SourceLine matched? [ display-result ] if ] file:for-each-line ;
|
'doc/words.tsv
|
||||||
|
[ &Heap
|
||||||
|
[ s:keep !SourceLine matched? [ display-result ] if ] v:preserve
|
||||||
|
] file:for-each-line ;
|
||||||
}}
|
}}
|
||||||
~~~
|
~~~
|
||||||
|
|
||||||
|
@ -491,15 +494,15 @@ a separator bar between each entry.
|
||||||
:horizontal-line #72 [ $- c:put ] times nl nl ;
|
:horizontal-line #72 [ $- c:put ] times nl nl ;
|
||||||
:export-glossary
|
:export-glossary
|
||||||
'doc/words.tsv
|
'doc/words.tsv
|
||||||
[ s:keep !SourceLine display-result horizontal-line ] file:for-each-line ;
|
[ &Heap [ s:keep !SourceLine display-result horizontal-line ] v:preserve ] file:for-each-line ;
|
||||||
|
|
||||||
:export-concise
|
:export-concise
|
||||||
'doc/words.tsv
|
'doc/words.tsv
|
||||||
[ s:keep !SourceLine display-concise-result ] file:for-each-line ;
|
[ &Heap [ s:keep !SourceLine display-concise-result ] v:preserve ] file:for-each-line ;
|
||||||
|
|
||||||
:export-concise-stack
|
:export-concise-stack
|
||||||
'doc/words.tsv
|
'doc/words.tsv
|
||||||
[ s:keep !SourceLine display-concise-result<stack-only> ] file:for-each-line ;
|
[ &Heap [ s:keep !SourceLine display-concise-result<stack-only> ] v:preserve ] file:for-each-line ;
|
||||||
|
|
||||||
~~~
|
~~~
|
||||||
|
|
||||||
|
@ -507,8 +510,8 @@ a separator bar between each entry.
|
||||||
|
|
||||||
~~~
|
~~~
|
||||||
:export-html
|
:export-html
|
||||||
'doc/words.tsv [ s:keep !SourceLine
|
'doc/words.tsv [ &Heap [ s:keep !SourceLine
|
||||||
display-result<HTML> '<hr/> s:put nl ] file:for-each-line ;
|
display-result<HTML> '<hr/> s:put nl ] v:preserve ] file:for-each-line ;
|
||||||
~~~
|
~~~
|
||||||
|
|
||||||
#### TSV
|
#### TSV
|
||||||
|
|
Loading…
Reference in a new issue