Add fennel loader

.busted

@@ -1,5 +1,8 @@
 return {
 	_all = {
 		lpath = "?.lua;?/init.lua"
-	}
+	};
+	core = {
+		recursive = false
+	};
 }

glass/fennel.lua

@@ -0,0 +1,18 @@
+--- Loader for Fennel files
+-- @module glass.fennel
+
+local fennel = require "fennel"
+local read = require 'glass.raw'
+
+--- Loads and compiles a Fennel file and runs it.
+-- Returns the result of running the Fennel file.
+-- If running the code immediately is not desired,
+-- it has to be returned as a function.
+-- @return The result of the Fennel file after running it
+-- @function load
+return function(file)
+	local success, raw = read(file..'.fnl')
+	if success then
+		return true, fennel.eval(raw)
+	end
+end

spec/fennel/fennel_loader_spec.moon

@@ -0,0 +1,6 @@
+describe 'fennel loader', ->
+	before_each -> export loader = require 'glass.fennel'
+	it 'loads Fennel files', ->
+		success, result = loader 'spec/fixtures/test'
+		assert.true success
+		assert.same { foo: 'bar', tab: {} }, result

spec/fixtures/test.fnl

@@ -0,0 +1,2 @@
+{"foo" "bar"
+ "tab" []}