diff --git a/src/fennel-ls/compiler.fnl b/src/fennel-ls/compiler.fnl index 5af6fc0..f39edb7 100644 --- a/src/fennel-ls/compiler.fnl +++ b/src/fennel-ls/compiler.fnl @@ -241,10 +241,15 @@ identifiers are declared / referenced in which places." (= 1 (msg:find "malformed multisym")) (= 1 (msg:find "expected at least one pattern/body pair")) (= 1 (msg:find "module not found")) - (when (and (sequence? ?ast) - (= 1 (% (length ?ast ) 2)) - (= 1 (msg:find "expected even number of name/value bindings"))) + (when (and (= 1 (msg:find "expected even number of name/value bindings")) + (sequence? ?ast) + (= 1 (% (length ?ast) 2))) (table.insert ?ast (sym :nil)) + true) + (when (and (= 1 (msg:find "expected a function, macro, or special to call")) + (sequence? ?ast) + (= (length ?ast) 0)) + (table.insert ?ast (sym :do)) true)))