]> gitweb.factorcode.org Git - factor.git/commitdiff
factor: fix a few renames
authorDoug Coleman <doug.coleman@gmail.com>
Fri, 24 Dec 2021 15:23:56 +0000 (09:23 -0600)
committerDoug Coleman <doug.coleman@gmail.com>
Fri, 24 Dec 2021 15:23:56 +0000 (09:23 -0600)
basis/io/pipes/unix/unix-tests.factor
basis/ui/gadgets/panes/panes.factor
extra/brainfuck/brainfuck.factor

index b0d1f36dbe0a6c4c68374afa58ba8eba7a932085..a3e8d8c46058ccd04c6d7959e34e62c624cc552d 100644 (file)
@@ -9,7 +9,7 @@ io.encodings io namespaces sequences splitting ;
         [
             input-stream [ utf8 <decoder> ] change
             output-stream [ utf8 <encoder> ] change
-            input-stream get stream-contents split-lines reverse [ print ] each f
+            input-stream get stream-lines reverse [ print ] each f
         ]
         "grep ."
     } run-pipeline
index 9779e68deed4551efcb2267e9b722befed25d739..ec471d2a35aaf96e3ed4266d173fa4a9211e2489 100644 (file)
@@ -129,7 +129,7 @@ M: pane-stream stream-write1
     '[
         dup length 3639 >
         [ 3639 over last-grapheme-from cut-slice ] [ f ] if
-        swap "" like ?split-lines @ dup
+        swap "" like split-lines @ dup
     ] loop drop ; inline
 
 M: pane-stream stream-write
index a2e17aee850ca8926ac72b3e8e22389aa3408e12..865a02b1853b5ff8a307039fefdaba1abc93043c 100644 (file)
@@ -82,7 +82,7 @@ PRIVATE>
 
 : brainfuck-main ( -- )
     command-line get [
-        contents (run-brainfuck)
+        read-contents (run-brainfuck)
     ] [
         [ binary file-contents (run-brainfuck) ] each
     ] if-empty ;