twc/ludus
4
0
Fork 0
Code Issues 32 Pull Requests Packages Projects 8 Releases Wiki Activity

Fix copypasta error

Browse Source
This commit is contained in:
Scott Richmond 2022-06-19 14:57:44 -04:00
parent c3c5c390e5
commit cdfcd1249e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/ludus/parser.clj
View File

@ -518,7 +518,7 @@
(let [ms (add-member members current_member)] (let [ms (add-member members current_member)]
(if (not-any? #(= (::ast/type %) ::ast/splat) (drop-last ms)) (if (not-any? #(= (::ast/type %) ::ast/splat) (drop-last ms))
(assoc (advance parser) ::ast (assoc (advance parser) ::ast
{::ast/type ::ast/tuple {::ast/type ::ast/list
:token (current origin) :token (current origin)
:length (count ms) :length (count ms)
:members ms}) :members ms})