modern: More whitespace cleanup and rewrite all files except functors!
parent
e4f64e80bf
commit
fb6defd60f
|
|
@ -37,4 +37,4 @@ M: crc16 checksum-bytes
|
|||
M: crc16 checksum-lines
|
||||
init-crc16
|
||||
[ [ (crc16) ] each char: \n (crc16) ] each
|
||||
finish-crc16 ; inline
|
||||
finish-crc16 ; inline
|
||||
|
|
|
|||
|
|
@ -323,4 +323,4 @@ ERROR: mismatched-terminator n string slice ;
|
|||
: lex-tests ( -- assoc ) all-tests-paths lex-paths ;
|
||||
|
||||
: lex-all ( -- assoc )
|
||||
lex-roots lex-docs lex-tests 3append ;
|
||||
lex-roots lex-docs lex-tests 3append ;
|
||||
|
|
|
|||
|
|
@ -70,4 +70,4 @@ M: array write-literal [ write-literal ] each ;
|
|||
] map 1array
|
||||
|
||||
{ "<VOCAB-ROOT:" "factorcode-core" "https://factorcode.org/git/factor.git" "core/" }
|
||||
{ ";VOCAB-ROOT>" } surround "resource:core-parsed.factor" utf8 [ ... ] with-file-writer ;
|
||||
{ ";VOCAB-ROOT>" } surround "resource:core-parsed.factor" utf8 [ ... ] with-file-writer ;
|
||||
|
|
|
|||
|
|
@ -218,4 +218,3 @@ ERROR: subseq-expected-but-got-eof n string expected ;
|
|||
dup length 1 = [
|
||||
-1 modify-to [ 1 - ] 2dip
|
||||
] unless ;
|
||||
|
||||
|
|
|
|||
|
|
@ -15,4 +15,3 @@ IN: stream.extras
|
|||
: write1-flush ( str -- ) output-stream get stream-write1-flush ; inline
|
||||
: write-flush ( str -- ) output-stream get stream-write-flush ; inline
|
||||
: print-flush ( str -- ) output-stream get stream-print-flush ; inline
|
||||
|
||||
|
|
|
|||
|
|
@ -30,4 +30,3 @@ SYMBOL: github-token
|
|||
github-username get
|
||||
github-token get
|
||||
sync-organization-with-credentials ;
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue