diff --git a/basis/simple-flat-file/simple-flat-file.factor b/basis/simple-flat-file/simple-flat-file.factor index 4fb68e2cf9..6e3cd4edfa 100644 --- a/basis/simple-flat-file/simple-flat-file.factor +++ b/basis/simple-flat-file/simple-flat-file.factor @@ -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! ;