Merge branch 'master' into unicode-12.1.0
commit
1dc2ed36fb
|
@ -30,7 +30,7 @@ IN: simple-flat-file
|
|||
utf8 file-lines process-codetable-lines >biassoc ;
|
||||
|
||||
: split-; ( line -- array )
|
||||
";" split [ [ blank? ] trim ] map! ;
|
||||
";" split [ [ blank? ] trim ] map! ; inline
|
||||
|
||||
: load-data-file ( filename -- data )
|
||||
utf8 file-lines drop-comments [ split-; ] map! ;
|
||||
|
|
Loading…
Reference in New Issue