diff --git a/alfons.lua b/alfons.lua
index e69de29..c4910d9 100644
--- a/alfons.lua
+++ b/alfons.lua
@@ -0,0 +1,2142 @@
+do
+local _ENV = _ENV
+package.preload[ "alfons.env" ] = function( ... ) local arg = _G.arg;
+local style
+style = require("ansikit.style").style
+local setfenv = setfenv or require("alfons.setfenv")
+local path = require("path")
+local fs = fs or require("path.fs")
+local env = require("path.env")
+local fsinfo = require("path.info")
+local unpack = unpack or table.unpack
+local ENVIRONMENT
+ENVIRONMENT = {
+  _VERSION = _VERSION,
+  assert = assert,
+  error = error,
+  pcall = pcall,
+  xpcall = xpcall,
+  tonumber = tonumber,
+  tostring = tostring,
+  select = select,
+  type = type,
+  pairs = pairs,
+  ipairs = ipairs,
+  next = next,
+  unpack = unpack,
+  require = require,
+  print = print,
+  style = style,
+  io = io,
+  math = math,
+  string = string,
+  table = table,
+  os = os,
+  fs = fs,
+  path = path,
+  env = env,
+  fsinfo = fsinfo
+}
+local loadEnv
+loadEnv = function(content, env)
+  local fn
+  local _exp_0 = _VERSION
+  if "Lua 5.1" == _exp_0 then
+    local err
+    fn, err = loadstring(content)
+    if not (fn) then
+      return nil, "Could not load Alfonsfile content (5.1): " .. tostring(err)
+    end
+    setfenv(fn, env)
+  elseif "Lua 5.2" == _exp_0 or "Lua 5.3" == _exp_0 or "Lua 5.4" == _exp_0 then
+    local err
+    fn, err = load(content, "Alfons", "t", env)
+    if not (fn) then
+      return nil, "Could not load Alfonsfile content (5.2+): " .. tostring(err)
+    end
+  end
+  return fn
+end
+return {
+  ENVIRONMENT = ENVIRONMENT,
+  loadEnv = loadEnv
+}
+end
+end
+
+do
+local _ENV = _ENV
+package.preload[ "alfons.file" ] = function( ... ) local arg = _G.arg;
+local safeOpen
+safeOpen = function(path, mode)
+  local a, b = io.open(path, mode)
+  return a and a or {
+    error = b
+  }
+end
+local readMoon
+readMoon = function(file)
+  local content
+  do
+    local _with_0 = safeOpen(file, "r")
+    if _with_0.error then
+      return nil, "Could not open " .. tostring(file) .. ": " .. tostring(_with_0.error)
+    end
+    local to_lua
+    to_lua = require("moonscript.base").to_lua
+    local err
+    content, err = to_lua(_with_0:read("*a"))
+    if not (content) then
+      return nil, "Could not read or parse " .. tostring(file) .. ": " .. tostring(err)
+    end
+    _with_0:close()
+  end
+  return content
+end
+local readFile
+readFile = function(file)
+  local content
+  do
+    local _with_0 = safeOpen(file, "r")
+    if _with_0.error then
+      return nil, "Could not open " .. tostring(file) .. ": " .. tostring(_with_0.error)
+    end
+    content = _with_0:read("*a")
+    if not (content) then
+      return nil, "Could not read " .. tostring(file) .. ": " .. tostring(content)
+    end
+    _with_0:close()
+  end
+  return content
+end
+local readLua = readFile
+local readTeal
+readTeal = function(file)
+  local content
+  do
+    local _with_0 = safeOpen(file, "r")
+    if _with_0.error then
+      return nil, "Could not open " .. tostring(file) .. ": " .. tostring(_with_0.error)
+    end
+    local init_env, gen
+    do
+      local _obj_0 = require("tl")
+      init_env, gen = _obj_0.init_env, _obj_0.gen
+    end
+    local gwe = init_env(true, false)
+    content = gen((_with_0:read("*a")), gwe)
+    if not (content) then
+      return nil, "Could not read " .. tostring(file) .. ": " .. tostring(content)
+    end
+    _with_0:close()
+  end
+  return content
+end
+return {
+  readMoon = readMoon,
+  readLua = readLua,
+  readTeal = readTeal,
+  readFile = readFile
+}
+end
+end
+
+do
+local _ENV = _ENV
+package.preload[ "alfons.getopt" ] = function( ... ) local arg = _G.arg;
+local getopt
+getopt = function(argl)
+  local args = {
+    commands = { }
+  }
+  local flags = {
+    stop = false,
+    command = false,
+    wait = false
+  }
+  local push
+  push = function(o, v)
+    if flags.command then
+      args[flags.command][o] = v
+    else
+      args[o] = v
+    end
+  end
+  for _index_0 = 1, #argl do
+    local _continue_0 = false
+    repeat
+      local arg = argl[_index_0]
+      if arg == "--" then
+        flags.stop = true
+      end
+      if flags.stop then
+        table.insert(args, arg)
+        _continue_0 = true
+        break
+      end
+      if flags.wait then
+        push(flags.wait, arg)
+        flags.wait = false
+        _continue_0 = true
+        break
+      end
+      if not (arg:match("^%-%-?")) then
+        args[arg] = { }
+        flags.command = arg
+        table.insert(args.commands, arg)
+        _continue_0 = true
+        break
+      end
+      do
+        local flag = arg:match("^%-(%w)$")
+        if flag then
+          flags.wait = flag
+          _continue_0 = true
+          break
+        end
+      end
+      do
+        local flagl = arg:match("^%-(%w+)$")
+        if flagl then
+          for chr in flagl:gmatch(".") do
+            push(chr, true)
+          end
+          _continue_0 = true
+          break
+        end
+      end
+      if arg:match("^%-%-?([a-zA-Z0-9%-_]+)=(.+)$") then
+        local opt, value = arg:match("^%-%-?([a-zA-Z0-9%-_]+)=(.+)")
+        push((opt:gsub("%-", "_")), value)
+        _continue_0 = true
+        break
+      end
+      do
+        local opt = arg:match("^%-%-([a-zA-Z0-9%-_]+)$")
+        if opt then
+          flags.wait = opt:gsub("%-", "_")
+        end
+      end
+      _continue_0 = true
+    until true
+    if not _continue_0 then
+      break
+    end
+  end
+  if flags.wait then
+    push(flags.wait, true)
+  end
+  return args
+end
+return {
+  getopt = getopt
+}
+end
+end
+
+do
+local _ENV = _ENV
+package.preload[ "alfons.help" ] = function( ... ) local arg = _G.arg;
+local style
+style = require("ansikit.style").style
+local map, reduce
+do
+  local _obj_0 = require("alfons.provide")
+  map, reduce = _obj_0.map, _obj_0.reduce
+end
+local unpack = unpack or table.unpack
+local Node
+Node = function(type, content, options)
+  local node = {
+    type = type,
+    content = content
+  }
+  if options then
+    for k, v in pairs(options) do
+      node[k] = v
+    end
+  end
+  return node
+end
+local Paragraph
+Paragraph = function(content)
+  return Node('paragraph', content)
+end
+local Columns
+Columns = function(options, content)
+  return Node('columns', content, options)
+end
+local Row
+Row = function(content)
+  return Node('row', content)
+end
+local Cell
+Cell = function(content, options)
+  return Node('cell', content, options)
+end
+local Cells
+Cells = function(arr)
+  return map(arr, function(cell)
+    return Cell(cell[2], cell[1])
+  end)
+end
+local Spacer
+Spacer = function(length)
+  return Node('spacer', '', {
+    length = length
+  })
+end
+local generateHelp
+generateHelp = function(sections, options)
+  if options == nil then
+    options = { }
+  end
+  local final = ""
+  for _index_0 = 1, #sections do
+    local section = sections[_index_0]
+    final = final .. string.rep(' ', options.padding or 0)
+    local _exp_0 = section.type
+    if 'paragraph' == _exp_0 then
+      final = final .. ((style(section.content)) .. '\n')
+    elseif 'spacer' == _exp_0 then
+      final = final .. string.rep('\n', section.length or 1)
+    elseif 'columns' == _exp_0 then
+      local columns = section.content
+      local lengths = { }
+      for row_index, row in ipairs(columns) do
+        for cell_index, cell in ipairs(row.content) do
+          if not (lengths[cell_index]) then
+            lengths[cell_index] = 0
+          end
+          if (string.len(cell.content)) > lengths[cell_index] then
+            lengths[cell_index] = string.len(cell.content)
+          end
+        end
+      end
+      for row_index, row in ipairs(columns) do
+        final = final .. string.rep(' ', section.padding)
+        for cell_index, cell in ipairs(row.content) do
+          local cell_length = (string.len(cell.content))
+          local needed_length = lengths[cell_index]
+          local content = style((cell.color or '') .. (cell.content .. (string.rep(' ', needed_length - cell_length))))
+          final = final .. (content .. '   ')
+        end
+        final = final .. '\n'
+      end
+    end
+  end
+  return final
+end
+return {
+  Node = Node,
+  Paragraph = Paragraph,
+  Spacer = Spacer,
+  Columns = Columns,
+  Row = Row,
+  Cell = Cell,
+  Cells = Cells,
+  generateHelp = generateHelp
+}
+end
+end
+
+do
+local _ENV = _ENV
+package.preload[ "alfons.init" ] = function( ... ) local arg = _G.arg;
+local ENVIRONMENT, loadEnv
+do
+  local _obj_0 = require("alfons.env")
+  ENVIRONMENT, loadEnv = _obj_0.ENVIRONMENT, _obj_0.loadEnv
+end
+local getopt
+getopt = require("alfons.getopt").getopt
+local look
+look = require("alfons.look").look
+local provide = require("alfons.provide")
+local unpack = unpack or table.unpack
+local sanitize, PREFIX, initEnv, runString
+sanitize = function(pattern)
+  if pattern then
+    return pattern:gsub("[%(%)%.%%%+%-%*%?%[%]%^%$]", "%%%0")
+  end
+end
+PREFIX = "alfons.tasks."
+initEnv = function(run, base, genv, modname, pretty)
+  if base == nil then
+    base = ENVIRONMENT
+  end
+  if modname == nil then
+    modname = "main"
+  end
+  if pretty == nil then
+    pretty = false
+  end
+  local env, envmt = { }, { }
+  local tasksmt
+  env.tasks, tasksmt = { }, { }
+  setmetatable(env, envmt)
+  setmetatable(env.tasks, tasksmt)
+  envmt.__index = function(self, k)
+    if genv and k == "__ran" then
+      return (getmetatable(genv[modname])).__ran
+    elseif genv and k == "store" then
+      return (getmetatable(genv)).store
+    else
+      return base[k] or provide[k]
+    end
+  end
+  envmt.__newindex = function(self, k, v)
+    if "function" ~= type(v) then
+      error("Task '" .. tostring(k) .. "' is not a function.")
+    end
+    self.tasks[k] = function(t)
+      if t == nil then
+        t = { }
+      end
+      return run(k, v, t)
+    end
+  end
+  tasksmt.__index = function(self, k)
+    return (rawget(self, k)) or (function()
+      for scope, t in pairs(genv) do
+        for name, task in pairs(t.tasks) do
+          if k == name then
+            return task
+          end
+        end
+      end
+      if pretty then
+        provide.printError("Task '" .. tostring(k) .. "' does not exist.")
+        return os.exit(1)
+      else
+        return error("Task '" .. tostring(k) .. "' does not exist.")
+      end
+    end)()
+  end
+  envmt.__ran = 0
+  return env
+end
+runString = function(content, environment, runAlways, child, genv, rqueue, pretty)
+  if environment == nil then
+    environment = ENVIRONMENT
+  end
+  if runAlways == nil then
+    runAlways = true
+  end
+  if child == nil then
+    child = 0
+  end
+  if genv == nil then
+    genv = { }
+  end
+  if rqueue == nil then
+    rqueue = { }
+  end
+  if pretty == nil then
+    pretty = false
+  end
+  if not ("string" == type(content)) then
+    return nil, "Taskfile content must be a string"
+  end
+  local modname
+  if (not content:match("\n")) and (content:match("^" .. tostring(sanitize(PREFIX)))) then
+    modname = content
+    local contentErr
+    content, contentErr = look(content)
+    if contentErr then
+      return nil, contentErr
+    end
+  else
+    modname = "main"
+  end
+  if genv[modname] then
+    return genv[modname]
+  end
+  local run
+  run = function(name, task, argl)
+    (getmetatable(genv[modname])).__ran = (getmetatable(genv[modname])).__ran + 1
+    local self = setmetatable({ }, {
+      __index = argl
+    })
+    self.name = name
+    self.task = function()
+      return run(name, task, argl)
+    end
+    local callstack = (getmetatable(genv)).store.callstack
+    table.insert(callstack, name)
+    local ret = task(self)
+    table.remove(callstack, #callstack)
+    return ret
+  end
+  if not (getmetatable(genv)) then
+    setmetatable(genv, {
+      store = {
+        callstack = { }
+      }
+    })
+  end
+  local env = initEnv(run, environment, genv, modname, pretty)
+  genv[modname] = env
+  local alf, alfErr = loadEnv(content, env)
+  if alfErr then
+    return nil, "Could not load Taskfile " .. tostring(child) .. ": " .. tostring(alfErr)
+  end
+  return function(...)
+    local argl = {
+      ...
+    }
+    local args = getopt(argl)
+    rawset(env, "args", args)
+    rawset(env, "uses", function(cmdmd)
+      return provide.contains((args.commands or { }), cmdmd)
+    end)
+    rawset(env, "exists", function(wants)
+      for scope, t in pairs(genv) do
+        for name, task in pairs(t.tasks) do
+          if wants == name then
+            return true
+          end
+        end
+      end
+      return false
+    end)
+    rawset(env, "calls", function(cmdmd)
+      local callstack = (getmetatable(genv)).store.callstack
+      local current = callstack[#callstack]
+      local on = false
+      local subcommands = { }
+      local i = 0
+      local _list_0 = args.commands
+      for _index_0 = 1, #_list_0 do
+        local cmd = _list_0[_index_0]
+        i = i + 1
+        if on then
+          if rawget(env.tasks, cmd) then
+            break
+          end
+          subcommands[#subcommands + 1] = cmd
+          args.commands[i] = nil
+        else
+          if cmd == current then
+            on = true
+          end
+        end
+      end
+      do
+        local _accum_0 = { }
+        local _len_0 = 1
+        for i, e in provide.npairs(args.commands) do
+          _accum_0[_len_0] = e
+          _len_0 = _len_0 + 1
+        end
+        args.commands = _accum_0
+      end
+      return subcommands
+    end)
+    local list = alf(args)
+    local tasks = list and (list.tasks and list.tasks or { }) or { }
+    for k, v in pairs(tasks) do
+      env.tasks[k] = function(t)
+        if t == nil then
+          t = { }
+        end
+        return run(k, v, t)
+      end
+    end
+    do
+      local fintask = (rawget(env.tasks, "finalize"))
+      if fintask then
+        rqueue[#rqueue + 1] = fintask
+      end
+    end
+    rawset(env, "load", function(mod)
+      mod = PREFIX .. mod
+      if genv[mod] then
+        return genv[mod]
+      end
+      local subalf, subalfErr = runString(mod, env, runAlways, child + 1, genv, rqueue)
+      if subalfErr then
+        error(subalfErr)
+      end
+      local subenv = subalf(unpack(argl))
+      local tasksmt = getmetatable(env.tasks)
+      tasksmt.__index = function(self, k)
+        return (rawget(self, k)) or (function()
+          for scope, t in pairs(genv) do
+            for name, task in pairs(t.tasks) do
+              if k == name then
+                return task
+              end
+            end
+          end
+          if pretty then
+            provide.printError("Task '" .. tostring(k) .. "' does not exist.")
+            return os.exit(1)
+          else
+            return error("Task '" .. tostring(k) .. "' does not exist.")
+          end
+        end)()
+      end
+      local subtasksmt = getmetatable(subenv.tasks)
+      subtasksmt.__index = function(self, k)
+        return (rawget(self, k)) or (function()
+          for scope, t in pairs(genv) do
+            for name, task in pairs(t.tasks) do
+              if k == name then
+                return task
+              end
+            end
+          end
+          if pretty then
+            provide.printError("Task '" .. tostring(k) .. "' does not exist.")
+            return os.exit(1)
+          else
+            return error("Task '" .. tostring(k) .. "' does not exist.")
+          end
+        end)()
+      end
+    end)
+    if runAlways and (rawget(env.tasks, "always")) then
+      (rawget(env.tasks, "always"))();
+      (getmetatable(genv[modname])).__ran = (getmetatable(genv[modname])).__ran - 1
+    end
+    rawset(env, "finalize", function()
+      for scope, t in pairs(genv) do
+        if (rawget(t.tasks, "default")) and t.__ran < 1 then
+          (rawget(t.tasks, "default"))()
+        end
+      end
+      for i = #rqueue, 1, -1 do
+        rqueue[i]()
+      end
+    end)
+    return env
+  end
+end
+return {
+  runString = runString,
+  initEnv = initEnv
+}
+end
+end
+
+do
+local _ENV = _ENV
+package.preload[ "alfons.look" ] = function( ... ) local arg = _G.arg;
+local readMoon, readLua
+do
+  local _obj_0 = require("alfons.file")
+  readMoon, readLua = _obj_0.readMoon, _obj_0.readLua
+end
+local Path = require("path")
+local sanitize
+sanitize = function(pattern)
+  if pattern == nil then
+    pattern = ""
+  end
+  return pattern:gsub("[%(%)%.%%%+%-%*%?%[%]%^%$]", "%%%0")
+end
+local dirsep, pathsep, wildcard = package.config:match("^(.)\n(.)\n(.)")
+local modsep = "%."
+local swildcard = sanitize(wildcard)
+local makeLook
+makeLook = function(gpath)
+  if gpath == nil then
+    gpath = package.path
+  end
+  local paths
+  do
+    local _accum_0 = { }
+    local _len_0 = 1
+    for path in gpath:gmatch("[^" .. tostring(pathsep) .. "]+") do
+      _accum_0[_len_0] = path
+      _len_0 = _len_0 + 1
+    end
+    paths = _accum_0
+  end
+  local moonpaths
+  do
+    local _accum_0 = { }
+    local _len_0 = 1
+    for path in gpath:gmatch("[^" .. tostring(pathsep) .. "]+") do
+      _accum_0[_len_0] = path:gsub("%.lua$", ".moon")
+      _len_0 = _len_0 + 1
+    end
+    moonpaths = _accum_0
+  end
+  return function(name)
+    local mod = name:gsub(modsep, dirsep)
+    local file = false
+    for _index_0 = 1, #paths do
+      local path = paths[_index_0]
+      local pt = path:gsub(swildcard, mod)
+      if Path.exists(pt) then
+        file = pt
+      end
+    end
+    for _index_0 = 1, #moonpaths do
+      local path = moonpaths[_index_0]
+      local pt = path:gsub(swildcard, mod)
+      if Path.exists(pt) then
+        file = pt
+      end
+    end
+    if file then
+      local read = (file:match("%.lua$")) and readLua or readMoon
+      local content, contentErr = read(file)
+      if content then
+        return content
+      else
+        return nil, contentErr
+      end
+    else
+      return nil, tostring(name) .. " not found."
+    end
+  end
+end
+return {
+  makeLook = makeLook,
+  look = makeLook()
+}
+end
+end
+
+do
+local _ENV = _ENV
+package.preload[ "alfons.parser" ] = function( ... ) local arg = _G.arg;
+local lines, sanitize, map, filter, split, slice, keys
+do
+  local _obj_0 = require("alfons.provide")
+  lines, sanitize, map, filter, split, slice, keys = _obj_0.lines, _obj_0.sanitize, _obj_0.map, _obj_0.filter, _obj_0.split, _obj_0.slice, _obj_0.keys
+end
+local style
+style = require("ansikit.style").style
+local inspect = require("inspect")
+local printerr
+printerr = function(t)
+  return io.stderr:write(t .. "\n")
+end
+local errors
+errors = function(code, msg)
+  printerr(style("%{red}" .. tostring(msg)))
+  return os.exit(code)
+end
+local parseDirective
+parseDirective = function(directive)
+  if not (directive:match("^@")) then
+    return false
+  end
+  local operation = directive:match("^@([a-z]+)")
+  local rest = directive:match("^@[a-z]+%s+(.+)")
+  local _exp_0 = operation
+  if "task" == _exp_0 then
+    local parts = split(rest, '%s+')
+    local name = parts[1]
+    local description = table.concat((slice(parts, 2)), ' ')
+    return "task", name, {
+      description = description,
+      arguments = { }
+    }
+  elseif "flag" == _exp_0 then
+    local parts = split(rest, '%s+')
+    local name, flag = parts[1], parts[2]
+    return (name == '*' and "flag" or "task-flag"), name, flag
+  elseif "argument" == _exp_0 then
+    local parts = split(rest, '%s+')
+    local task = parts[1]
+    local argument_names, argument_values, description = { }, { }, ""
+    local in_argument_names, in_argument_values, in_description = false, false, false
+    for _index_0 = 2, #parts do
+      local part = parts[_index_0]
+      local stripped_part = part:match("([^%[%]%<%>]+)")
+      if not in_argument_names and part:match("^%[") then
+        in_argument_names = true
+      end
+      if not in_argument_values and part:match("^%<") then
+        in_argument_values = true
+      end
+      if in_argument_names then
+        table.insert(argument_names, stripped_part)
+      end
+      if in_argument_values then
+        local part_object = {
+          value = stripped_part
+        }
+        if stripped_part:match('%?$') then
+          part_object = {
+            value = (stripped_part:match("([^%?]+)%?$")),
+            optional = true
+          }
+        end
+        table.insert(argument_values, part_object)
+      end
+      if in_description then
+        description = description .. (part .. " ")
+      end
+      if in_argument_names and part:match("%]$") then
+        in_argument_names = false
+      end
+      if in_argument_values and part:match("%>$") then
+        in_argument_values = false
+        in_description = true
+      end
+    end
+    return "argument", task, {
+      argument_names = argument_names,
+      argument_values = argument_values,
+      description = description
+    }
+  end
+end
+local parseComments
+parseComments = function(content, marker)
+  if marker == nil then
+    marker = '---'
+  end
+  local comment_lines = filter((lines(content)), function(line)
+    return line:match("^%s-" .. tostring(sanitize(marker)) .. "%s+")
+  end)
+  local directives = map(comment_lines, function(line)
+    return line:match(tostring(sanitize(marker)) .. "%s+(.+)")
+  end)
+  local state = {
+    tasks = { },
+    flags = { }
+  }
+  map(directives, function(directive)
+    local operation, key, value = parseDirective(directive)
+    local _exp_0 = operation
+    if "task" == _exp_0 then
+      state.tasks[key] = value
+    elseif "flag" == _exp_0 then
+      return table.insert(state.flags, value)
+    elseif "task-flag" == _exp_0 then
+      if not (state.tasks[key]) then
+        state.tasks[key] = { }
+      end
+      if "table" == type(state.tasks[key].flags) then
+        return table.insert(state.tasks[key].flags, value)
+      else
+        state.tasks[key].flags = {
+          value
+        }
+      end
+    elseif "argument" == _exp_0 then
+      if not (state.tasks[key]) then
+        state.tasks[key] = { }
+      end
+      state.tasks[key].arguments[value.argument_names[1]] = {
+        names = value.argument_names,
+        values = value.argument_values,
+        description = value.description
+      }
+    end
+  end)
+  return state
+end
+return {
+  parseComments = parseComments
+}
+end
+end
+
+do
+local _ENV = _ENV
+package.preload[ "alfons.provide" ] = function( ... ) local arg = _G.arg;
+local style
+style = require("ansikit.style").style
+local listAll, glob, iglob
+do
+  local _obj_0 = require("alfons.wildcard")
+  listAll, glob, iglob = _obj_0.listAll, _obj_0.glob, _obj_0.iglob
+end
+local Path = require("path")
+local fs = require("path.fs")
+local unpack = unpack or table.unpack
+local printerr
+printerr = function(t)
+  return io.stderr:write(t .. "\n")
+end
+local inotify
+do
+  local ok
+  ok, inotify = pcall(function()
+    return require("inotify")
+  end)
+  inotify = ok and inotify or nil
+end
+local contains
+contains = function(t, v)
+  return #(function()
+    local _accum_0 = { }
+    local _len_0 = 1
+    for _index_0 = 1, #t do
+      local vv = t[_index_0]
+      if vv == v then
+        _accum_0[_len_0] = vv
+        _len_0 = _len_0 + 1
+      end
+    end
+    return _accum_0
+  end)() ~= 0
+end
+local prints
+prints = function(...)
+  return printerr(unpack((function(...)
+    local _accum_0 = { }
+    local _len_0 = 1
+    local _list_0 = {
+      ...
+    }
+    for _index_0 = 1, #_list_0 do
+      local arg = _list_0[_index_0]
+      _accum_0[_len_0] = style(arg)
+      _len_0 = _len_0 + 1
+    end
+    return _accum_0
+  end)(...)))
+end
+local printError
+printError = function(text)
+  return printerr(style("%{red}" .. tostring(text)))
+end
+local safeOpen
+safeOpen = function(path, mode)
+  local a, b = io.open(path, mode)
+  return a and a or {
+    error = b
+  }
+end
+local safePopen
+safePopen = function(path, mode)
+  if not (io.popen) then
+    return {
+      error = "io.popen is not available"
+    }
+  end
+  local handle = io.popen(path, mode)
+  return handle or {
+    error = "Could not io.popen " .. tostring(path)
+  }
+end
+local readfile
+readfile = function(file)
+  do
+    local _with_0 = safeOpen(file, "r")
+    if _with_0.error then
+      error(_with_0.error)
+    else
+      local contents = _with_0:read("*a")
+      _with_0:close()
+      return contents
+    end
+    return _with_0
+  end
+end
+local writefile
+writefile = function(file, content)
+  do
+    local _with_0 = safeOpen(file, "w")
+    if _with_0.error then
+      error(_with_0.error)
+    else
+      _with_0:write(content)
+      _with_0:close()
+    end
+    return _with_0
+  end
+end
+local serialize
+serialize = function(t)
+  local full = "return {\n"
+  for k, v in pairs(t) do
+    full = full .. "  ['" .. tostring(k) .. "'] = '" .. tostring(v) .. "',"
+  end
+  full = full .. "}"
+  return full
+end
+local ask
+ask = function(str)
+  io.write(style(str))
+  return io.read()
+end
+local show
+show = function(str)
+  return prints("%{cyan}:%{white} " .. tostring(str))
+end
+local env = setmetatable({ }, {
+  __index = function(self, i)
+    return os.getenv(i)
+  end
+})
+local cmd = os.execute
+local sh = cmd
+local cmdfail
+cmdfail = function(str)
+  local code = cmd(str)
+  if not (code == 0) then
+    return os.exit(code)
+  end
+end
+local shfail = cmdfail
+local cmdread
+cmdread = function(cmd, raw)
+  do
+    local _with_0 = safePopen(cmd, "r")
+    if _with_0.error then
+      error(_with_0.error)
+      return _with_0.error
+    else
+      local contents = _with_0:read("*a")
+      _with_0:close()
+      return contents
+    end
+    return _with_0
+  end
+end
+local shread = cmdread
+local basename
+basename = function(file)
+  return file:match("(.+)%..+")
+end
+local filename = Path.stem
+local extension = Path.suffix
+local pathname = Path.parent
+local isAbsolute
+isAbsolute = function(path)
+  return path:match("^/")
+end
+local wildcard = iglob
+local iwildcard
+iwildcard = function(paths)
+  local all = { }
+  for _index_0 = 1, #paths do
+    local path = paths[_index_0]
+    for globbed in iglob(path) do
+      table.insert(all, globbed)
+    end
+  end
+  local i, n = 0, #all
+  return function()
+    i = i + 1
+    if i <= n then
+      return all[i]
+    end
+  end
+end
+local isEmpty
+isEmpty = function(path)
+  if not (Path.isdir(path)) then
+    return false
+  end
+  return 0 == #(listAll(path))
+end
+local delete
+delete = function(loc)
+  if not (Path.exists(loc)) then
+    return 
+  end
+  if Path.isfile(loc or isEmpty(loc)) then
+    return fs.remove(loc)
+  else
+    for node in fs.dir(loc) do
+      local _continue_0 = false
+      repeat
+        if node:match("%.%.") then
+          _continue_0 = true
+          break
+        end
+        delete(node)
+        _continue_0 = true
+      until true
+      if not _continue_0 then
+        break
+      end
+    end
+    return fs.remove(loc)
+  end
+end
+local copy
+copy = function(fr, to)
+  if not (Path.exists(fr)) then
+    error("copy $ " .. tostring(fr) .. " does not exist")
+  end
+  if Path.isdir(fr) then
+    if Path.exists(to) then
+      error("copy $ " .. tostring(to) .. " already exists")
+    end
+    fs.mkdir(to)
+    for node in fs.dir(fr) do
+      copy(node, (Path(to, (Path.name(node)))))
+    end
+  elseif Path.isfile(fr) then
+    return fs.copy(fr, to)
+  end
+end
+local build
+build = function(iter, fn)
+  local times = { }
+  if Path.exists(".alfons") then
+    prints("%{cyan}:%{white} using .alfons")
+    times = dofile(".alfons")
+    do
+      local _tbl_0 = { }
+      for k, v in pairs(times) do
+        _tbl_0[k] = tonumber(v)
+      end
+      times = _tbl_0
+    end
+  end
+  for file in iter do
+    local mtime = fs.mtime(file)
+    if times[file] then
+      if mtime > times[file] then
+        fn(file)
+      end
+      times[file] = mtime
+    else
+      fn(file)
+      times[file] = mtime
+    end
+  end
+  return writefile(".alfons", serialize(times))
+end
+local EVENTS = {
+  access = "IN_ACCESS",
+  change = "IN_ATTRIB",
+  write = "IN_CLOSE_WRITE",
+  shut = "IN_CLOSE_NOWRITE",
+  close = "IN_CLOSE",
+  create = "IN_CREATE",
+  delete = "IN_DELETE",
+  destruct = "IN_DELETE_SELF",
+  modify = "IN_MODIFY",
+  migrate = "IN_MOVE_SELF",
+  move = "IN_MOVE",
+  movein = "IN_MOVED_TO",
+  moveout = "IN_MOVED_FROM",
+  open = "IN_OPEN",
+  all = "IN_ALL_EVENTS"
+}
+local bit_band
+bit_band = function(a, b)
+  local result, bitval = 0, 1
+  while a > 0 and b > 0 do
+    if a % 2 == 1 and b % 2 == 1 then
+      result = result + bitval
+    end
+    bitval = bitval * 2
+    a = math.floor(a / 2)
+    b = math.floor(b / 2)
+  end
+  return result
+end
+local watch
+watch = function(dirs, exclude, evf, pred, fn)
+  if not (inotify) then
+    error("Could not load inotify")
+  end
+  local handle = inotify.init()
+  if evf == "live" then
+    evf = {
+      "write",
+      "movein"
+    }
+  end
+  local cdir = Path.cwd()
+  for i, dir in ipairs(dirs) do
+    if not (isAbsolute(dir)) then
+      dirs[i] = Path(cdir, dir)
+    end
+  end
+  for i, dir in ipairs(exclude) do
+    if not (isAbsolute(dir)) then
+      exclude[i] = Path(cdir, dir)
+    end
+  end
+  for i, dir in ipairs(dirs) do
+    for ii, subdir in ipairs(listAll(dir)) do
+      local _continue_0 = false
+      repeat
+        local doBreak = false
+        for _index_0 = 1, #exclude do
+          local exclusion = exclude[_index_0]
+          if subdir:match("^" .. tostring(exclusion)) then
+            doBreak = true
+          end
+        end
+        if doBreak then
+          _continue_0 = true
+          break
+        end
+        if Path.isdir(subdir) then
+          table.insert(dirs, subdir)
+        end
+        _continue_0 = true
+      until true
+      if not _continue_0 then
+        break
+      end
+    end
+  end
+  prints("%{cyan}:%{white} Watching for:")
+  for _index_0 = 1, #dirs do
+    local dir = dirs[_index_0]
+    prints("  - %{green}" .. tostring(dir))
+  end
+  local events
+  do
+    local _accum_0 = { }
+    local _len_0 = 1
+    for _index_0 = 1, #evf do
+      local ev = evf[_index_0]
+      _accum_0[_len_0] = inotify[EVENTS[ev]]
+      _len_0 = _len_0 + 1
+    end
+    events = _accum_0
+  end
+  local uevf
+  do
+    local _tbl_0 = { }
+    for k, v in pairs(evf) do
+      _tbl_0[k] = v
+    end
+    uevf = _tbl_0
+  end
+  if not (contains(evf, "create")) then
+    table.insert(evf, "create")
+    table.insert(events, inotify.IN_CREATE)
+  end
+  local watchers = { }
+  for _index_0 = 1, #dirs do
+    local dir = dirs[_index_0]
+    watchers[dir] = handle:addwatch(dir, unpack(events))
+  end
+  local reversed
+  do
+    local _tbl_0 = { }
+    for k, v in pairs(watchers) do
+      _tbl_0[v] = k
+    end
+    reversed = _tbl_0
+  end
+  while true do
+    local evts = handle:read()
+    if not (evts) then
+      break
+    end
+    for _index_0 = 1, #evts do
+      local _continue_0 = false
+      repeat
+        local ev = evts[_index_0]
+        local full = Path(reversed[ev.wd], (ev.name or ""))
+        if (Path.isdir(full)) and (bit_band(ev.mask, inotify.IN_CREATE)) and not watchers[full] then
+          prints("%{cyan}:%{white} Added to watchlist: %{green}" .. tostring(full))
+          watchers[full] = handle:addwatch(full, unpack(events))
+          reversed[watchers[full]] = full
+        end
+        local actions = { }
+        for action, evt in pairs(EVENTS) do
+          local _continue_0 = false
+          repeat
+            if action == "all" then
+              _continue_0 = true
+              break
+            end
+            if 0 ~= bit_band(ev.mask, inotify[evt]) then
+              if contains(uevf, action) then
+                table.insert(actions, action)
+              end
+            end
+            _continue_0 = true
+          until true
+          if not _continue_0 then
+            break
+          end
+        end
+        if #actions == 0 then
+          _continue_0 = true
+          break
+        end
+        if not (pred(full, actions)) then
+          _continue_0 = true
+          break
+        end
+        prints("%{cyan}:%{white} Triggered %{magenta}" .. tostring(table.concat(actions, ', ')) .. "%{white}: %{yellow}" .. tostring(full))
+        fn(full, actions)
+        _continue_0 = true
+      until true
+      if not _continue_0 then
+        break
+      end
+    end
+  end
+  return handle:close()
+end
+local npairs
+npairs = function(t)
+  local keys
+  do
+    local _accum_0 = { }
+    local _len_0 = 1
+    for k, v in pairs(t) do
+      if "number" == type(k) then
+        _accum_0[_len_0] = k
+        _len_0 = _len_0 + 1
+      end
+    end
+    keys = _accum_0
+  end
+  table.sort(keys)
+  local i = 0
+  local n = #keys
+  return function()
+    i = i + 1
+    if i <= n then
+      return keys[i], t[keys[i]]
+    end
+  end
+end
+local lines
+lines = function(str)
+  local _accum_0 = { }
+  local _len_0 = 1
+  for line in str:gmatch("[^\r\n]+") do
+    _accum_0[_len_0] = line
+    _len_0 = _len_0 + 1
+  end
+  return _accum_0
+end
+local split
+split = function(str, re, plain, n)
+  local i1, ls = 1, { }
+  if not re then
+    re = '%s+'
+  end
+  if re == '' then
+    return {
+      str
+    }
+  end
+  while true do
+    local i2, i3 = string.find(str, re, i1, plain)
+    if not i2 then
+      local last = string.sub(str, i1)
+      if last ~= '' then
+        table.insert(ls, last)
+      end
+      if #ls == 1 and ls[1] == '' then
+        return { }
+      else
+        return ls
+      end
+    end
+    table.insert(ls, string.sub(str, i1, i2 - 1))
+    if n and #ls == n then
+      ls[#ls] = string.sub(str, i1)
+      return ls
+    end
+    i1 = i3 + 1
+  end
+end
+local filter
+filter = function(arr, predicate)
+  local _accum_0 = { }
+  local _len_0 = 1
+  for k, v in ipairs(arr) do
+    if predicate(v, k) then
+      _accum_0[_len_0] = v
+      _len_0 = _len_0 + 1
+    end
+  end
+  return _accum_0
+end
+local map
+map = function(arr, predicate)
+  local _accum_0 = { }
+  local _len_0 = 1
+  for k, v in ipairs(arr) do
+    _accum_0[_len_0] = predicate(v, k)
+    _len_0 = _len_0 + 1
+  end
+  return _accum_0
+end
+local reduce
+reduce = function(arr, predicate, initial)
+  local accumulator = initial or arr[1]
+  local start = initial and 0 or 1
+  for i = start, i < #arr do
+    accumulator = predicate(accumulator, arr[i])
+  end
+  return accumulator
+end
+local slice
+slice = function(arr, start, _end)
+  if not start and not _end then
+    return arr
+  end
+  if start and not _end then
+    local _accum_0 = { }
+    local _len_0 = 1
+    for _index_0 = start, #arr do
+      local v = arr[_index_0]
+      _accum_0[_len_0] = v
+      _len_0 = _len_0 + 1
+    end
+    return _accum_0
+  end
+  if not start and _end then
+    local _accum_0 = { }
+    local _len_0 = 1
+    local _max_0 = _end
+    for _index_0 = 1, _max_0 < 0 and #arr + _max_0 or _max_0 do
+      local v = arr[_index_0]
+      _accum_0[_len_0] = v
+      _len_0 = _len_0 + 1
+    end
+    return _accum_0
+  end
+  local _accum_0 = { }
+  local _len_0 = 1
+  local _max_0 = _end
+  for _index_0 = start, _max_0 < 0 and #arr + _max_0 or _max_0 do
+    local v = arr[_index_0]
+    _accum_0[_len_0] = v
+    _len_0 = _len_0 + 1
+  end
+  return _accum_0
+end
+contains = function(arr, value)
+  for _index_0 = 1, #arr do
+    local v = arr[_index_0]
+    if v == value then
+      return true
+    end
+  end
+end
+local keys
+keys = function(tbl)
+  local _accum_0 = { }
+  local _len_0 = 1
+  for k, v in pairs(tbl) do
+    _accum_0[_len_0] = k
+    _len_0 = _len_0 + 1
+  end
+  return _accum_0
+end
+local sanitize
+sanitize = function(pattern)
+  if pattern == nil then
+    pattern = ""
+  end
+  return pattern:gsub("[%(%)%.%%%+%-%*%?%[%]%^%$]", "%%%0")
+end
+return {
+  contains = contains,
+  prints = prints,
+  printError = printError,
+  readfile = readfile,
+  writefile = writefile,
+  serialize = serialize,
+  cmd = cmd,
+  cmdfail = cmdfail,
+  sh = sh,
+  shfail = shfail,
+  cmdread = cmdread,
+  shread = shread,
+  wildcard = wildcard,
+  iwildcard = iwildcard,
+  glob = glob,
+  basename = basename,
+  filename = filename,
+  extension = extension,
+  pathname = pathname,
+  build = build,
+  watch = watch,
+  env = env,
+  ask = ask,
+  show = show,
+  npairs = npairs,
+  listAll = listAll,
+  safeOpen = safeOpen,
+  safePopen = safePopen,
+  isEmpty = isEmpty,
+  delete = delete,
+  copy = copy,
+  lines = lines,
+  split = split,
+  filter = filter,
+  map = map,
+  reduce = reduce,
+  slice = slice,
+  keys = keys,
+  contains = contains,
+  sanitize = sanitize
+}
+end
+end
+
+do
+local _ENV = _ENV
+package.preload[ "alfons.setfenv" ] = function( ... ) local arg = _G.arg;
+return setfenv or function(fn, env)
+  local i = 1
+  while true do
+    local name = debug.getupvalue(fn, i)
+    if name == "_ENV" then
+      debug.upvaluejoin(fn, i, (function()
+        return env
+      end), 1)
+    elseif not name then
+      break
+    end
+    i = i + 1
+  end
+  return fn
+end
+end
+end
+
+do
+local _ENV = _ENV
+package.preload[ "alfons.tasks.fetch" ] = function( ... ) local arg = _G.arg;
+return {
+  tasks = {
+    fetch = function(self)
+      local http = require("http.request")
+      local headers, stream = assert((http.new_from_uri(self.url)):go())
+      local body = assert(stream:get_body_as_string())
+      if "200" ~= headers:get(":status") then
+        return error(body)
+      else
+        return body
+      end
+    end
+  }
+}
+end
+end
+
+do
+local _ENV = _ENV
+package.preload[ "alfons.tasks.teal" ] = function( ... ) local arg = _G.arg;
+return {
+  tasks = {
+    always = function(self)
+      load("fetch")
+      if not (store.teal_auto == true) then
+        tasks.install()
+        return tasks.typings({
+          modules = store.typings
+        })
+      end
+    end,
+    install = function(self)
+      if exists("teal_preinstall") then
+        prints("%{cyan}Teal:%{white} Running pre-install hook.")
+        tasks.teal_preinstall()
+      end
+      prints("%{cyan}Teal:%{white} Installing dependencies.")
+      local _list_0 = store.dependencies
+      for _index_0 = 1, #_list_0 do
+        local dep = _list_0[_index_0]
+        prints("%{green}+ " .. tostring(dep))
+        sh("luarocks install " .. tostring(dep))
+      end
+      if exists("teal_postinstall") then
+        prints("%{cyan}Teal:%{white} Running post-install hook.")
+        return tasks.teal_postinstall()
+      end
+    end,
+    build = function(self)
+      if exists("teal_prebuild") then
+        prints("%{cyan}Teal:%{white} Running pre-build hook.")
+        tasks.teal_prebuild()
+      end
+      prints("%{cyan}Teal:%{white} Building project.")
+      sh("tl build")
+      if exists("teal_postbuild") then
+        prints("%{cyan}Teal:%{white} Running post-build hook.")
+        return tasks.teal_postbuild()
+      end
+    end,
+    typings = function(self)
+      local json = require("dkjson")
+      local fetchdefs
+      fetchdefs = function(mod)
+        prints("%{cyan}Teal:%{white} Fetching type definitions for " .. tostring(mod) .. ".")
+        local unjson = tasks.fetch({
+          url = "https://api.github.com/repos/teal-language/teal-types/contents/types/" .. tostring(mod)
+        })
+        local files = json.decode(unjson)
+        for _index_0 = 1, #files do
+          local _continue_0 = false
+          repeat
+            local file = files[_index_0]
+            if not (file.type == "file") then
+              _continue_0 = true
+              break
+            end
+            local name = file.name
+            local def = tasks.fetch({
+              url = "https://raw.githubusercontent.com/teal-language/teal-types/master/types/" .. tostring(mod) .. "/" .. tostring(name)
+            })
+            writefile(name, def)
+            _continue_0 = true
+          until true
+          if not _continue_0 then
+            break
+          end
+        end
+      end
+      local mod = self.m or self.module
+      local mods = self.modules
+      if mod then
+        return fetchdefs(mod)
+      elseif mods then
+        local _list_0 = mods
+        for _index_0 = 1, #_list_0 do
+          local md = _list_0[_index_0]
+          fetchdefs(md)
+        end
+      end
+    end
+  }
+}
+end
+end
+
+do
+local _ENV = _ENV
+package.preload[ "alfons.version" ] = function( ... ) local arg = _G.arg;
+return {
+  VERSION = "5.2"
+}
+end
+end
+
+do
+local _ENV = _ENV
+package.preload[ "alfons.wildcard" ] = function( ... ) local arg = _G.arg;
+local Path = require("path")
+local fs = require("path.fs")
+local listAll
+listAll = function(dir)
+  local _accum_0 = { }
+  local _len_0 = 1
+  for node in fs.scandir(dir) do
+    _accum_0[_len_0] = node
+    _len_0 = _len_0 + 1
+  end
+  return _accum_0
+end
+local fromGlob
+fromGlob = function(glob)
+  local sanitize
+  sanitize = function(pattern)
+    if pattern then
+      return pattern:gsub("[%(%)%.%%%+%-%*%?%[%]%^%$]", "%%%0")
+    end
+  end
+  local saglob = sanitize(glob)
+  do
+    local _with_0 = saglob
+    local mid = _with_0:gsub("%%%*%%%*", ".*")
+    mid = mid:gsub("%%%*", "[^/]*")
+    mid = mid:gsub("%%%?", ".")
+    return tostring(mid) .. "$"
+  end
+end
+local matchGlob
+matchGlob = function(glob, path)
+  return nil ~= path:match(glob)
+end
+local glob
+glob = function(path, all)
+  if all == nil then
+    all = { }
+  end
+  if not (path:match("%*")) then
+    return path
+  end
+  local currentpath = "."
+  local fullpath = path
+  local correctpath = ""
+  for i = 1, #fullpath do
+    if (fullpath:sub(i, i)) == (currentpath:sub(i, i)) then
+      correctpath = correctpath .. currentpath:sub(i, i)
+    end
+  end
+  local toglob = fromGlob(fullpath)
+  local _list_0 = listAll(correctpath)
+  for _index_0 = 1, #_list_0 do
+    local node = _list_0[_index_0]
+    if node:match(toglob) then
+      table.insert(all, node)
+    end
+  end
+  return all
+end
+local iglob
+iglob = function(path)
+  local globbed = glob(path)
+  local i = 0
+  local n = #globbed
+  return function()
+    i = i + 1
+    if i <= n then
+      return globbed[i]
+    end
+  end
+end
+return {
+  listAll = listAll,
+  fromGlob = fromGlob,
+  matchGlob = matchGlob,
+  glob = glob,
+  iglob = iglob
+}
+end
+end
+
+local VERSION
+VERSION = require("alfons.version").VERSION
+local style
+style = require("ansikit.style").style
+local Path = require("path")
+local unpack = unpack or table.unpack
+local printerr
+printerr = function(t)
+  return io.stderr:write(t .. "\n")
+end
+local prints
+prints = function(...)
+  return printerr(unpack((function(...)
+    local _accum_0 = { }
+    local _len_0 = 1
+    local _list_0 = {
+      ...
+    }
+    for _index_0 = 1, #_list_0 do
+      local arg = _list_0[_index_0]
+      _accum_0[_len_0] = style(arg)
+      _len_0 = _len_0 + 1
+    end
+    return _accum_0
+  end)(...)))
+end
+local printError
+printError = function(text)
+  return printerr(style("%{red}" .. tostring(text)))
+end
+local errors
+errors = function(code, msg)
+  printerr(style("%{red}" .. tostring(msg)))
+  return os.exit(code)
+end
+local removeColorCodes
+removeColorCodes = function(str)
+  return str:gsub("%%{[a-z ]-}", "")
+end
+local getopt
+getopt = require("alfons.getopt").getopt
+local args = getopt({
+  ...
+})
+local ZSH_LIST_TASKS = not not args.zsh_list
+local BASH_LIST_TASKS = not not args.bash_list
+local LIST_TASKS = ZSH_LIST_TASKS or BASH_LIST_TASKS or not not args.list
+local ZSH_LIST_OPTIONS = args.zsh_list_options
+local BASH_LIST_OPTIONS = args.bash_list_options
+local LIST_OPTIONS = ZSH_LIST_OPTIONS or BASH_LIST_OPTIONS or args.list_options
+local ZSH_GET_OPTION_TYPE = args.zsh_get_option_type
+local GET_OPTION_TYPE = ZSH_GET_OPTION_TYPE or args.get_option_type
+local COMPLETING = LIST_TASKS or LIST_OPTIONS or GET_OPTION_TYPE
+local HELP = args.help
+if not (COMPLETING) then
+  prints("%{bold blue}Alfons " .. tostring(VERSION))
+end
+local FILE
+do
+  if args.f then
+    FILE = args.f
+  elseif args.file then
+    FILE = args.file
+  elseif Path.exists("Alfons.lua") then
+    FILE = "Alfons.lua"
+  elseif Path.exists("Alfons.moon") then
+    FILE = "Alfons.moon"
+  elseif Path.exists("Alfons.tl") then
+    FILE = "Alfons.tl"
+  else
+    FILE = errors(1, "No Taskfile found.")
+  end
+end
+local LANGUAGE
+do
+  if FILE:match("moon$") then
+    LANGUAGE = "moon"
+  elseif FILE:match("lua$") then
+    LANGUAGE = "lua"
+  elseif FILE:match("tl$") then
+    LANGUAGE = "teal"
+  elseif args.type then
+    LANGUAGE = args.type
+  else
+    LANGUAGE = errors(1, "Cannot resolve format for Taskfile.")
+  end
+end
+if not (COMPLETING) then
+  printerr("Using " .. tostring(FILE) .. " (" .. tostring(LANGUAGE) .. ")")
+end
+local readMoon, readLua, readTeal
+do
+  local _obj_0 = require("alfons.file")
+  readMoon, readLua, readTeal = _obj_0.readMoon, _obj_0.readLua, _obj_0.readTeal
+end
+local content, contentErr
+local _exp_0 = LANGUAGE
+if "moon" == _exp_0 then
+  content, contentErr = readMoon(FILE)
+elseif "lua" == _exp_0 then
+  content, contentErr = readLua(FILE)
+elseif "teal" == _exp_0 then
+  content, contentErr = readTeal(FILE)
+else
+  content, contentErr = errors(1, "Cannot resolve format '" .. tostring(LANGUAGE) .. "' for Taskfile.")
+end
+if not (content) then
+  errors(1, contentErr)
+end
+local runString
+runString = require("alfons.init").runString
+local alfons, alfonsErr = runString(content, nil, true, 0, { }, { }, true)
+if not (alfons) then
+  errors(1, alfonsErr)
+end
+local env = alfons(...)
+local contains
+contains = require("alfons.provide").contains
+if ZSH_LIST_TASKS then
+  local readFile
+  readFile = require("alfons.file").readFile
+  local parseComments
+  parseComments = require("alfons.parser").parseComments
+  local raw_content = readFile(FILE)
+  local state = parseComments(raw_content)
+  local tasks
+  do
+    local _accum_0 = { }
+    local _len_0 = 1
+    for task_name, task in pairs(state.tasks) do
+      if not (task.flag and contains(task.flag, 'hide')) then
+        _accum_0[_len_0] = tostring(task_name) .. ":" .. tostring(removeColorCodes(task.description or ''))
+        _len_0 = _len_0 + 1
+      end
+    end
+    tasks = _accum_0
+  end
+  for _index_0 = 1, #tasks do
+    local task = tasks[_index_0]
+    print(task)
+  end
+  local undocumented_tasks
+  do
+    local _accum_0 = { }
+    local _len_0 = 1
+    for k, v in pairs(env.tasks) do
+      if not state.tasks[k] then
+        _accum_0[_len_0] = k
+        _len_0 = _len_0 + 1
+      end
+    end
+    undocumented_tasks = _accum_0
+  end
+  for _index_0 = 1, #undocumented_tasks do
+    local task = undocumented_tasks[_index_0]
+    local sanitized_task = removeColorCodes(task)
+    print(sanitized_task)
+  end
+  os.exit()
+end
+if LIST_TASKS then
+  local readFile
+  readFile = require("alfons.file").readFile
+  local parseComments
+  parseComments = require("alfons.parser").parseComments
+  local raw_content = readFile(FILE)
+  local state = parseComments(raw_content)
+  local tasks
+  do
+    local _accum_0 = { }
+    local _len_0 = 1
+    for task_name, task in pairs(state.tasks) do
+      if not (task.flag and contains(task.flag, 'hide')) then
+        _accum_0[_len_0] = tostring(task_name) .. " "
+        _len_0 = _len_0 + 1
+      end
+    end
+    tasks = _accum_0
+  end
+  for _index_0 = 1, #tasks do
+    local task = tasks[_index_0]
+    io.write(task)
+  end
+  local undocumented_tasks
+  do
+    local _accum_0 = { }
+    local _len_0 = 1
+    for k, v in pairs(env.tasks) do
+      if not state.tasks[k] then
+        _accum_0[_len_0] = k
+        _len_0 = _len_0 + 1
+      end
+    end
+    undocumented_tasks = _accum_0
+  end
+  for _index_0 = 1, #undocumented_tasks do
+    local task = undocumented_tasks[_index_0]
+    io.write(task .. ' ')
+  end
+  os.exit()
+end
+if LIST_OPTIONS then
+  local readFile
+  readFile = require("alfons.file").readFile
+  local parseComments
+  parseComments = require("alfons.parser").parseComments
+  local list_options = ZSH_LIST_OPTIONS or LIST_OPTIONS
+  if 'string' ~= type(list_options) then
+    errors(2, "Error: --list-options must be used with a task name.")
+  end
+  local raw_content = readFile(FILE)
+  local state = parseComments(raw_content)
+  local task = state.tasks[list_options]
+  if not task or (task.flags and contains(task.flags, "hide")) then
+    errors(2, "Error: Task '" .. tostring(list_options) .. "' does not exist.")
+  end
+  local formatOptionName
+  formatOptionName = function(name)
+    return ((string.len(name)) > 1) and ('--' .. name) or ('-' .. name)
+  end
+  local formatOptionValues
+  formatOptionValues = function(option)
+    return (table.concat(((function()
+      local _accum_0 = { }
+      local _len_0 = 1
+      local _list_0 = option.values
+      for _index_0 = 1, #_list_0 do
+        local value = _list_0[_index_0]
+        _accum_0[_len_0] = value.value
+        _len_0 = _len_0 + 1
+      end
+      return _accum_0
+    end)()), ' '))
+  end
+  for option_name, option in pairs(task.arguments) do
+    local _list_0 = option.names
+    for _index_0 = 1, #_list_0 do
+      local name = _list_0[_index_0]
+      if ZSH_LIST_OPTIONS then
+        print(tostring(formatOptionName(name)) .. "\\:'" .. tostring(removeColorCodes(option.description)) .. "'")
+      else
+        io.write((formatOptionName(name)) .. ' ')
+      end
+    end
+  end
+end
+local ZSH_OPTION_TYPES = {
+  file = '_files',
+  path = '_path_files',
+  user = '_users',
+  group = '_groups'
+}
+if GET_OPTION_TYPE then
+  local readFile
+  readFile = require("alfons.file").readFile
+  local parseComments
+  parseComments = require("alfons.parser").parseComments
+  local task_name, raw_option = GET_OPTION_TYPE:match("([^;]+)::([^;]+)")
+  local option = raw_option:gsub('%-', '')
+  if 'string' ~= type(GET_OPTION_TYPE) then
+    errors(2, "Error: --get-option-type must be used with a task name and option in the format `task;option`.")
+  end
+  local raw_content = readFile(FILE)
+  local state = parseComments(raw_content)
+  local task = state.tasks[task_name]
+  if not task or (task.flags and contains(task.flags, "hide")) then
+    errors(2, "Error: Task '" .. tostring(task_name) .. "' does not exist.")
+  end
+  for argument_name, argument in pairs(task.arguments) do
+    if contains(argument.names, option) then
+      local _list_0 = argument.values
+      for _index_0 = 1, #_list_0 do
+        local value = _list_0[_index_0]
+        print(ZSH_OPTION_TYPES[value] or "")
+      end
+    end
+  end
+  os.exit()
+end
+if HELP then
+  local readFile
+  readFile = require("alfons.file").readFile
+  local parseComments
+  parseComments = require("alfons.parser").parseComments
+  local Paragraph, Spacer, Columns, Row, Cells, generateHelp
+  do
+    local _obj_0 = require("alfons.help")
+    Paragraph, Spacer, Columns, Row, Cells, generateHelp = _obj_0.Paragraph, _obj_0.Spacer, _obj_0.Columns, _obj_0.Row, _obj_0.Cells, _obj_0.generateHelp
+  end
+  local raw_content = readFile(FILE)
+  local state = parseComments(raw_content)
+  local Option
+  Option = function(command, description)
+    return (Row(Cells({
+      {
+        {
+          color = '%{bold green}'
+        },
+        command
+      },
+      {
+        { },
+        description
+      }
+    })))
+  end
+  local Task
+  Task = function(command, description)
+    return (Row(Cells({
+      {
+        {
+          color = '%{bold cyan}'
+        },
+        command
+      },
+      {
+        { },
+        description
+      }
+    })))
+  end
+  local formatOptions
+  formatOptions = function(option)
+    return (table.concat(((function()
+      local _accum_0 = { }
+      local _len_0 = 1
+      local _list_0 = option.names
+      for _index_0 = 1, #_list_0 do
+        local name = _list_0[_index_0]
+        _accum_0[_len_0] = ((string.len(name)) > 1) and ('--' .. name) or ('-' .. name)
+        _len_0 = _len_0 + 1
+      end
+      return _accum_0
+    end)()), ' ')) .. ' ' .. (table.concat(((function()
+      local _accum_0 = { }
+      local _len_0 = 1
+      local _list_0 = option.values
+      for _index_0 = 1, #_list_0 do
+        local option_value = _list_0[_index_0]
+        _accum_0[_len_0] = option_value.optional and "[" .. tostring(option_value.value) .. "]" or "<" .. tostring(option_value.value) .. ">"
+        _len_0 = _len_0 + 1
+      end
+      return _accum_0
+    end)()), ' '))
+  end
+  local help_message = {
+    (Paragraph('Built-in options:')),
+    (Columns({
+      padding = 2
+    }, {
+      (Option('--help [task]', 'Displays this help message, or for a specific task')),
+      (Option('--file -f <file>', 'Loads a custom Taskfile')),
+      (Option('--list', 'Lists all the tasks available for the loaded Taskfile')),
+      (Option('--list-options <task>', 'Lists all the options available to a task'))
+    }))
+  }
+  if state.flags.hide then
+    print(generateHelp(help_message))
+    os.exit()
+  end
+  local extra_message = { }
+  if HELP ~= true then
+    local task = state.tasks[HELP]
+    if not task or (task.flags and contains(task.flags, "hide")) then
+      errors(2, "Error: Task '" .. tostring(HELP) .. "' does not exist.")
+    end
+    help_message = {
+      (Paragraph("%{bold cyan}" .. tostring(HELP) .. "  %{reset}-  " .. tostring(task.description))),
+      (Columns({
+        padding = 2
+      }, ((function()
+        local _accum_0 = { }
+        local _len_0 = 1
+        for option_name, option in pairs(task.arguments) do
+          _accum_0[_len_0] = Option((formatOptions(option)), option.description)
+          _len_0 = _len_0 + 1
+        end
+        return _accum_0
+      end)())))
+    }
+  end
+  if HELP == true then
+    local all_tasks
+    do
+      local _accum_0 = { }
+      local _len_0 = 1
+      for k, v in pairs(env.tasks) do
+        _accum_0[_len_0] = k
+        _len_0 = _len_0 + 1
+      end
+      all_tasks = _accum_0
+    end
+    local undocumented_tasks
+    do
+      local _accum_0 = { }
+      local _len_0 = 1
+      for k, v in pairs(env.tasks) do
+        if not state.tasks[k] then
+          _accum_0[_len_0] = k
+          _len_0 = _len_0 + 1
+        end
+      end
+      undocumented_tasks = _accum_0
+    end
+    extra_message = {
+      (Spacer()),
+      (Paragraph('Loaded tasks:     (Use %{magenta}`alfons --help task`%{reset} to know more about said task)')),
+      (Columns({
+        padding = 2
+      }, (function()
+        local _accum_0 = { }
+        local _len_0 = 1
+        for task_name, task in pairs(state.tasks) do
+          if not (task.flags and contains(task.flags, 'hide')) then
+            _accum_0[_len_0] = (Task(task_name, task.description))
+            _len_0 = _len_0 + 1
+          end
+        end
+        return _accum_0
+      end)())),
+      (Spacer()),
+      (Paragraph('Undocumented tasks:')),
+      (Paragraph("  %{cyan}" .. tostring(table.concat(undocumented_tasks, '  '))))
+    }
+  end
+  for _index_0 = 1, #extra_message do
+    local section = extra_message[_index_0]
+    table.insert(help_message, section)
+  end
+  print(generateHelp(help_message))
+  os.exit()
+end
+local _list_0 = args.commands
+for _index_0 = 1, #_list_0 do
+  local command = _list_0[_index_0]
+  env.tasks[command](args[command])
+  if rawget(env.tasks, "teardown") then
+    local _ = (rawget(env.tasks, "teardown"))
+  end
+end
+return env.finalize()