---
bootstrap/fennel.lua | 4 ++--src/fennel/compiler.fnl | 2 +-src/fennel/specials.fnl | 2 +-src/fennel/utils.fnl | 2 +-src/fennel/view.fnl | 2 +-test/macro.fnl | 2 +-
6 files changed, 7 insertions(+), 7 deletions(-)
diff --git a/bootstrap/fennel.lua b/bootstrap/fennel.lua
index 5f57854..be304c3 100644
--- a/bootstrap/fennel.lua
@@ -95,7 +95,7 @@ local utils = (function()
return to
end
- -- Like pairs, but if the table has an __index metamethod, it will recurisvely+ -- Like pairs, but if the table has an __index metamethod, it will recursively -- traverse upwards, skipping duplicates, to iterate all inherited properties
local function allpairs(t)
assert(type(t) == 'table', 'allpairs expects a table')
@@ -1409,7 +1409,7 @@ local compiler = (function()
-- just check based on plen, because some forms (such as
-- include) insert new chunks at the top of the parent chunk
-- rather than just at the end; this loop checks for this
- -- occurance and updates plen to be the index of the last+ -- occurrence and updates plen to be the index of the last -- thing in the parent before compiling the new value.
for pi = plen, #parent do
if parent[pi] == plast then plen = pi end
diff --git a/src/fennel/compiler.fnl b/src/fennel/compiler.fnl
index 1d7cb47..27dddbb 100644
--- a/src/fennel/compiler.fnl+++ b/src/fennel/compiler.fnl
@@ -685,7 +685,7 @@ which we have to do if we don't know."
;; "local " onto the front of it. However, we can't just check
;; based on plen, because some forms (such as include) insert new
;; chunks at the top of the parent chunk rather than just at the
- ;; end; this loop checks for this occurance and updates plen to be+ ;; end; this loop checks for this occurrence and updates plen to be ;; the index of the last thing in the parent before compiling the
;; new value.
(for [pi plen (length parent)]
diff --git a/src/fennel/specials.fnl b/src/fennel/specials.fnl
index 53eea21..c804fbb 100644
--- a/src/fennel/specials.fnl+++ b/src/fennel/specials.fnl
@@ -1424,7 +1424,7 @@ Deprecated.")
(opts.fallback modexpr true))
(include-circular-fallback mod modexpr opts.fallback ast)
(. utils.root.scope.includes mod) ; check cache
- ;; Find path to Fennel or Lua source; prefering Fennel+ ;; Find path to Fennel or Lua source; preferring Fennel (match (search-module mod)
fennel-path (include-path ast opts fennel-path mod true)
_ (let [lua-path (search-module mod package.path)]
diff --git a/src/fennel/utils.fnl b/src/fennel/utils.fnl
index 8f92171..32f0eaa 100644
--- a/src/fennel/utils.fnl+++ b/src/fennel/utils.fnl
@@ -1,5 +1,5 @@
;; This module contains mostly general-purpose table-related functionality that
-;; you might expect to see in a standard library in most langugaes, as well as+;; you might expect to see in a standard library in most languages, as well as;; the definitions of several core compiler types. It could be split into two
;; distinct modules along those lines.
diff --git a/src/fennel/view.fnl b/src/fennel/view.fnl
index f72eb02..d6d8b14 100644
--- a/src/fennel/view.fnl+++ b/src/fennel/view.fnl
@@ -196,7 +196,7 @@
(fn utf8-len [x]
(accumulate [n 0 _ (string.gmatch x "[%z\001-\127\192-\247]")] (+ n 1)))
-;; an alternative to `utils.comment?` to avoid a depedency cycle.+;; an alternative to `utils.comment?` to avoid a dependency cycle.(fn comment? [x]
(if (= :table (type x))
(let [fst (. x 1)]
diff --git a/test/macro.fnl b/test/macro.fnl
index 983c3d5..39e04c4 100644
--- a/test/macro.fnl+++ b/test/macro.fnl
@@ -509,7 +509,7 @@
(+ 20 20)))
(fn test-case-try []
- ;; ensure we do not unify in a sucess path+ ;; ensure we do not unify in a success path ;; these can be sense checked by running match-try with fresh bindings at
;; each step
(== (case-try 10
--
2.34.1