about summary refs log tree commit diff stats
path: root/lambda-to-mu.mu
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2016-10-20 15:04:01 -0700
committerKartik K. Agaram <vc@akkartik.com>2016-10-20 15:04:01 -0700
commite78ff7b070d031c078a38e4729c38ea3f09a0734 (patch)
treef0cef23710f84f97f31f1f6434cbf0104343a6ea /lambda-to-mu.mu
parent52d0bbf6b30ec041ed2f12572d6ddc03ecfe981b (diff)
downloadmu-e78ff7b070d031c078a38e4729c38ea3f09a0734.tar.gz
3526
Diffstat (limited to 'lambda-to-mu.mu')
-rw-r--r--lambda-to-mu.mu6
1 files changed, 3 insertions, 3 deletions
diff --git a/lambda-to-mu.mu b/lambda-to-mu.mu
index d7220b1d..6c358d9f 100644
--- a/lambda-to-mu.mu
+++ b/lambda-to-mu.mu
@@ -186,7 +186,7 @@ def parse in:&:stream:char -> out:&:cell, in:&:stream:char [
   {
     break-if pair?
     # atom
-    b:&:buffer <- new-buffer 30
+    buf:&:buffer <- new-buffer 30
     {
       done?:bool <- end-of-stream? in
       break-if done?
@@ -197,10 +197,10 @@ def parse in:&:stream:char -> out:&:cell, in:&:stream:char [
       done? <- space? c
       break-if done?
       c <- read in
-      b <- append b, c
+      buf <- append buf, c
       loop
     }
-    s:text <- buffer-to-array b
+    s:text <- buffer-to-array buf
     out <- new-atom s
   }
   {