diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2016-07-24 15:58:55 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2016-07-24 16:03:16 -0700 |
commit | 46450fe870dba311f9b296ab38bfba290494da3f (patch) | |
tree | 94a7fd97b8a2d8feedae4180d3856f4c41efd933 /lambda-to-mu.mu | |
parent | e81420e6a4f0b13122938db7e137151ca88b96eb (diff) | |
download | mu-46450fe870dba311f9b296ab38bfba290494da3f.tar.gz |
3149
Diffstat (limited to 'lambda-to-mu.mu')
-rw-r--r-- | lambda-to-mu.mu | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lambda-to-mu.mu b/lambda-to-mu.mu index e09a078f..acd38270 100644 --- a/lambda-to-mu.mu +++ b/lambda-to-mu.mu @@ -230,9 +230,9 @@ def parse in:address:stream -> out:address:cell, in:address:stream [ read in # skip ')' break +end-pair:label } - first:address:cell, in <- parse in - new-curr:address:cell <- new-pair first, 0/nil - curr <- set-rest curr, new-curr + next:address:cell, in <- parse in + next-curr:address:cell <- new-pair next, 0/nil + curr <- set-rest curr, next-curr curr <- rest curr loop } |