clone url: git://git.m455.casa/fa
esperbuild/espersrc/fennel-0.7.0/test/linter.fnl
1 | (local l (require :test.luaunit)) |
2 | (local fennel (require :fennel)) |
3 | (local linter (fennel.dofile "src/linter.fnl" {:env :_COMPILER})) |
4 |
|
5 | (fn test-used [] |
6 | "A test for the locals shadowing bug described in |
7 | https://todo.sr.ht/~technomancy/fennel/12" |
8 | (let [src "(fn [abc] (let [abc abc] abc))" |
9 | (ok? msg) (pcall fennel.compile-string src {:plugins [linter]})] |
10 | (l.assertTrue ok? msg))) |
11 |
|
12 | {: test-used} |