diff options
| author | Eduardo Julian | 2021-08-09 23:02:01 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2021-08-09 23:02:01 -0400 |
| commit | 464b6e8f5e6c62f58fa8c7ff61ab2ad215e98bd1 (patch) | |
| tree | 1ae9d95956cee4251cd29a3e24c246c4360d567d /lux-r/source/luxc/lang/synthesis/variable.lux | |
| parent | f621a133e6e0a516c0586270fea8eaffb4829d82 (diff) | |
Improved single-line comment syntax (from "##" to "...").
Diffstat (limited to 'lux-r/source/luxc/lang/synthesis/variable.lux')
| -rw-r--r-- | lux-r/source/luxc/lang/synthesis/variable.lux | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lux-r/source/luxc/lang/synthesis/variable.lux b/lux-r/source/luxc/lang/synthesis/variable.lux index f6a45b02e..932cb3dcb 100644 --- a/lux-r/source/luxc/lang/synthesis/variable.lux +++ b/lux-r/source/luxc/lang/synthesis/variable.lux @@ -89,10 +89,10 @@ ))] (s.to-list tracker))) -## (def: (optimize-register-use current-arity [pathS bodyS]) -## (-> ls.Arity [ls.Path ls.Synthesis] [ls.Path ls.Synthesis]) -## (let [bound (bound-vars pathS) -## unused (unused-vars current-arity bound bodyS) -## adjusted (adjust-vars unused bound)] -## [(|> pathS (clean-pattern adjusted) simplify-pattern) -## (clean-expression adjusted bodyS)])) +... (def: (optimize-register-use current-arity [pathS bodyS]) +... (-> ls.Arity [ls.Path ls.Synthesis] [ls.Path ls.Synthesis]) +... (let [bound (bound-vars pathS) +... unused (unused-vars current-arity bound bodyS) +... adjusted (adjust-vars unused bound)] +... [(|> pathS (clean-pattern adjusted) simplify-pattern) +... (clean-expression adjusted bodyS)])) |