main.lua

DEBUG = not fengari
package.path = "scripts/?.lua"
js = nil
if fengari then
  js = require "js"
end

local line_number_start, line_number_end
local compile_file
local _cache = {}

-- Aliases for lookup speed
local find, match, sub, byte, format = string.find, string.match, string.sub, string.byte, string.format
local concat = table.concat
local co_resume, co_create, yield = coroutine.resume, coroutine.create, coroutine.yield

-- Defined here to pick up compile_file and line_number
function error_lexer(msg)
  if type(msg) ~= "table" then
    msg = {msg = msg}
  end
  local err_msg
  if line_number_start == line_number_end then
    err_msg = format("%s:%s: %s", compile_file, line_number_start, msg.msg)
  else
    err_msg = format("%s:%s-%s: %s", compile_file, line_number_start, line_number_end, msg.msg)
  end
  msg.msg = err_msg  -- OK to modify arg because we're erroring away
  error(msg)
end

function assert_parser(test, line, msg, ...)
  if test then
    return test
  end

  -- Have to convert the positions from 1-based to 0-based, which is what is
  -- expected upstream.
  local pos = {...}
  for i = 1, #pos do
    pos[i] = pos[i] - 1
  end
  error_lexer({msg = msg, line = line, markers = pos})
end

for _, lib in ipairs {"base64", "lexer-functions", "lexer-operators", "lexer-tokens", "lexer-debug", "lexer", "stdlib"} do
  if DEBUG then
    dofile(package.path:gsub("?", lib))
  else
    require(lib)
  end
end

do
  local assert_old = assert

  local function assert_lexer(test, msg)
    if not test then
      error_lexer(msg)
    end

    return test
  end

  function pcallCompile(...)
    local status, ret = pcall(compile, ...)
    if status then
      return status, ret
    end
    local data
    if type(ret) == "userdata" then
      -- Fengari has bugs where it can return a native JS exception object
      ret = js.tostring(ret)
    end
    if type(ret) == "table" then
      data = ret
    else
      data = {msg = ret}
    end
    data.file = ...
    return false, data
  end

  function lua_main(func, arg1, arg2, arg3)
    local status, ret
    if func == "compile" then
      assert = assert_lexer
      local exported = {}
      for i = 1, #arg1 do
        local pair = arg1[i]
        status, ret = pcallCompile(pair.name, pair.text, arg2, arg3)
        if not status then
          assert = assert_old
          return status, ret
        end
        exported[i] = ret
      end
      assert = assert_old
      return true, exported
    elseif func == "import" then
      status, ret = pcall(import, arg1)
      if status then
        return true, ret[1], ret[2]
      end
    elseif func == "unittest" then
      status, ret = pcall(unittest)
    else
      assert(false, "BUG REPORT: unknown lua_main function: " .. func)
    end
    return status, ret
  end
end

local function cache(line, variables)
  local key = {}

  for _, v in pairs(variables) do
    key[#key+1] = format("%s.%s.%s.%s", v.scope, v.type, v.name, v.value)
  end

  table.sort(key)
  key[#key+1] = line
  key = concat(key, "¤")

  if not _cache[key] then
    _cache[key] = lexer(line, variables)
  end

  return _cache[key]
end

local parseMacro
local function handleOpenBrace(pattern, macroLine, pos, result, depth, opts)
  while true do
    local _, npos, res, pChar = find(macroLine, "^([^" .. pattern .. "]*)([" .. pattern .. "])", pos)
    result[#result+1] = res or sub(macroLine, pos)
    pos = (npos or #macroLine) + 1
    if pChar ~= "{" then
      return pChar, macroLine, pos
    end
    local orig_start = line_number_start
    line_number_start = line_number_end
    macroLine, pos = parseMacro(macroLine, pos, result, depth + 1, opts)
    line_number_start = orig_start
  end
end

-- Skip "offset" characters at the end and then trim a preceding newline iff
-- there is only whitespace between it and the last char.
-- This is used to trim the trailing newline on multiline macro defs and
-- calls, so that
-- {macro(
--     arg1,
--     arg2,
--     arg3)}
-- and
-- {macro(
--     arg1,
--     arg2,
--     arg3
-- )}
-- evaluate the same.
local function trimEndNl(str, offset)
  str = sub(str, 1, -1 + offset)
  local start = find(str, "\n[\t \v-\r]*$")
  if start then
    return sub(str, 1, start - 1)
  end
  return str
end

-- Returns the pair (macroLine, pos) containing the new line and parsing position.
-- The line is typically the same, but may have been advanced.
parseMacro = function(macroLine, pos, output, depth, opts)
  assert_parser(depth < 100, macroLine, "macro expansion depth reached " .. depth ..  ", probable infinite loop in:")
  local result = {}
  local macroName

  local function evalMacro(macro_obj, ...)
    local args = {...}
    if #macro_obj.args ~= #args then
      assert_parser(
        false,
        macroLine,
        format("macro call {%s} has wrong number of args, expected %s but got %s", macroName, #macro_obj.args, #args),
        pos - 1)
    end
    if macro_obj.raw then
      output[#output+1] = macro_obj.raw
    elseif macro_obj.func then
      output[#output+1] = macro_obj.func(...)
    else
      local tmp_args = {}
      for i = 1, #args do
        tmp_args[macro_obj.args[i]] = {raw=args[i], args={}}
      end
      local posm = 1
      local text = macro_obj.text
      while posm <= #text do
        local nposm = find(text, "{", posm, true)
        output[#output+1] = sub(text, posm, (nposm or 0) - 1)
        if not nposm then
          break end
        local orig_start = line_number_start
        line_number_start = line_number_end
        text, posm = parseMacro(text, nposm + 1, output, depth + 1, {
          macros=opts.macros,
          arg_macros=tmp_args,
          get_input=function() end,
          no_eval=opts.no_eval,
        })
        line_number_start = orig_start
      end
    end
  end

  local pChar
  pChar, macroLine, pos = handleOpenBrace("{(}\n", macroLine, pos, result, depth, opts)
  if not pChar or pChar == "\n" then
    -- End of line. Unterminated macro is just returned as a literal text,
    -- which is copied to the output buffer. We have to add the { that
    -- *wasn't* included as part of our parsed text.
    local off = #output + 1
    output[off] = "{"
    for i = 1, #result do
      output[off + i] = result[i]
    end
    if pChar == "\n" then
      -- Rewind because we have to parse this as part of the stream still
      pos = pos - 1
    end
    return macroLine, pos
  end
  -- pChar is "}" or "(", either way we have the complete macro name.
  macroName = concat(result)
  result = {}
  local macro_obj = opts.arg_macros[macroName] or opts.macros[macroName]
  assert_parser(opts.no_eval or macro_obj, macroLine, "macro does not exist: {" .. macroName .. "}", pos - 1)
  if pChar == "}" then
    if opts.no_eval then
      output[#output+1] = "{" .. macroName .. "}"
    else
      evalMacro(macro_obj)
    end
    return macroLine, pos
  end
  -- pChar is "(", we are parsing paramaters
  local args = {}
  local nesting = 1
  -- Cache this to handle the no_eval case where we don't have a macro_obj
  local rawarg = macro_obj and macro_obj.rawarg
  while true do
    -- The rawarg parsing mode does not count matching parens and always has
    -- only a single arg. The same code handles both modes, we simply don't go
    -- down the branches to handle parens by never matching those characters.
    pChar, macroLine, pos = handleOpenBrace(rawarg and "{}" or "{(,)}", macroLine, pos, result, depth, opts)
    if not pChar then
      -- End of line. Get more input, since non-simple macros can span lines.
      local nextline = opts.get_input()
      assert_parser(nextline, macroLine, "unexpected EOF getting args for {" .. macroName .. "}", #macroLine + 1)
      macroLine = nextline
      pos = 1
    else
      if pChar == "}" then
        if not rawarg and nesting > 0 then
          assert_parser(
            false,
            macroLine,
            format("%s unclosed parenthesis inside macro {%s}", nesting, macroName),
            pos - 1)
        end
        -- The empty macroName here implies the {(} macro, or at least the
        -- beginning of it. It doesn't close in the usual way.
        if macroName == "" then
          local arg = concat(result)
          assert_parser(#arg == 0, macroLine, "{(} macro has extra junk in it", pos - 2)
          if opts.no_eval then
            output[#output+1] = "{(}"
          else
            evalMacro(opts.macros["("])
          end
        else
          if rawarg then
            if byte(macroLine, pos - 2, pos - 2) ~= 0x29 then
              -- Not an error, for rawarg continue until we find ")}"
              result[#result+1] = "}"
              goto continue
            end
          end
          local arg = concat(result)
          if not rawarg then
            assert_parser(sub(arg, -1) == ")", macroLine, "trailing junk after macro call {" .. macroName .. "}", pos - 2)
          end
          arg = trimEndNl(arg, -1)  -- Also trims the closing paren off
          if byte(arg, 1, 1) == 0xa and not opts.no_eval then
            -- If a new param (open paren or comma) is immediately followed by
            -- newline, we want to swallow the initial newline.
            arg = sub(arg, 2)
          end
          args[#args+1] = arg
          if opts.no_eval then
            output[#output+1] = "{" .. macroName .. "(" .. concat(args, ",") .. ")}"
          else
            evalMacro(macro_obj, table.unpack(args))
          end
        end
        return macroLine, pos
      elseif pChar == "(" then
        assert_parser(nesting > 0, macroLine, "tried to re-open macro args calling {" .. macroName .. "}", pos - 1)
        nesting = nesting + 1
        result[#result+1] = "("
      elseif pChar == "," then
        if nesting == 1 then
          local arg = concat(result)
          if byte(arg, 1, 1) == 0xa and not opts.no_eval then
            -- If a new param (open paren or comma) is immediately followed by
            -- newline, we want to swallow the initial newline.
            arg = sub(arg, 2)
          end
          args[#args+1] = arg
          result = {}
        else
          result[#result+1] = ","
        end
      elseif pChar == ")" then
        assert_parser(nesting > 0, macroLine, "extra closing parens calling {" .. macroName .. "}", pos - 1)
        nesting = nesting - 1
        result[#result+1] = ")"
        -- We always add the paren to args here. This allows both the rawarg
        -- and regular code to follow the same path for adding the final
        -- arg. This also means that any text that comes *after* this paren
        -- will get added to the last arg, but that's an error we check for.
      else
        assert_parser(false, macroLine, "BUG_REPORT: unhandled case in parseMacro {" .. macroName .. "}", pos - 1)
      end
      ::continue::
    end
  end
end

-- Whitelist of functions and tables that are allowed in the lua() macro. We
-- store this as a string, so that we can bind the names properly.
local globals_whitelist = {}
for k in string.gmatch([[assert
error
getmetatable
ipairs
load
next
pairs
pcall
print
rawequal
rawget
rawlen
rawset
select
setmetatable
tonumber
tostring
type
_VERSION
xpcall
coroutine
string
utf8
table
math]], "%g+") do globals_whitelist[#globals_whitelist+1] = k end

local os_whitelist = {'clock', 'date', 'difftime', 'time'}

local function filter_table(table_in, whitelist)
  res = {}
  for i = 1, #whitelist do
    local k = whitelist[i]
    local v = table_in[k]
    if type(v) == 'table' then
      local new_tab = {}
      for k2, v2 in pairs(v) do
        new_tab[k2] = v2
      end
      v = new_tab
    end
    res[k] = v
  end
  return res
end

local function clone_global()
  local new_g = filter_table(_G, globals_whitelist)
  new_g.os = filter_table(_G.os, os_whitelist)
  new_g._G = new_g
  return new_g
end

local function is_empty(line)
  return find(line, "^%s*$") or find(line, "^%s*;.*$")
end

local json_escape_table = {["\\"]=[[\\]], ['"']=[[\"]]}
for i = 0, 31 do
  json_escape_table[string.char(i)] = format([[\u%04x]], i)
end
json_escape_table["\b"] = [[\b]]
json_escape_table["\f"] = [[\f]]
json_escape_table["\n"] = [[\n]]
json_escape_table["\r"] = [[\r]]
json_escape_table["\t"] = [[\t]]

local line_encode_table = {}
local utf_decode_table = {}
for k, v in pairs(json_escape_table) do
  line_encode_table[k] = v
end
for i = 0x80, 0xff do
  line_encode_table[string.char(i)] = utf8.char(i)
  utf_decode_table[utf8.char(i)] = string.char(i)
end

-- importFunc takes a string (filename) and returns a pair of (status, string)
-- (the content of the imported file on success, an error message on failure).
function compile(name, input, options, importFunc)
  local variables, impulses, conditions, actions = {}, {}, {}, {}
  local budget, use_budget
  local env = clone_global()
  local macros, native_create_get_line
  local set_native_compile_file = function() end
  if native_macros and options.fastMacro then
    native_create_get_line, set_native_compile_file = native_macros(env)
  else
    macros = {
      -- This entry is also used for {(} since that looks like an argument-macro
      -- with no name, depending on how it is parsed. An expression like {{(}}
      -- will parse one way for the inner macro and another (using the later
      -- entry) for the outer macro, since the substituted paren doesn't act
      -- like a delimiter and instead forms part of the name of a simple macro.
      [""] = {args = {}, raw = "{}", rawarg = true},
      ["["] = {args = {}, raw = "{"},
      ["]"] = {args = {}, raw = "}"},
      ["("] = {args = {}, raw = "("},
      [")"] = {args = {}, raw = ")"},
      [","] = {args = {}, raw = ","},
      len = {args = {"#"}, rawarg = true, func = function(arg_body)
        return tostring(#arg_body)
      end},
      lua = {args = {"#"}, rawarg = true, func = function(lua_text)
        local chunk, err = load(lua_text, lua_text, "t", env)
        assert(chunk, err)
        local status, result = pcall(chunk)
        if status then
          return tostring(result or "")
        end
        error_lexer(result)
      end},
    }
  end
  local imported = {}
  local ret = {}

  local function import(filename, input, isImport)
    if imported[filename] then
      return {}
    end
    imported[filename] = true
    line_number_end = 0
    compile_file = filename

    local lines = {}
    local labelCache = {}

    local function create_get_line(__, input)
      local input_it = string.gmatch(input, "([^\n]*(\n?))")

      -- Handles stripping backslashes and tracking line-numbers
      local function get_input_line()
        local inp, last = input_it()
        if not inp then
          return end
        line_number_end = line_number_end + 1
        if last ~= "\n" or byte(inp, -2) ~= 0x5c then
          return inp end
        return sub(inp, 1, -3)
      end

      local in_macro_def = false
      local parse_macro_opts = {
        macros = macros,
        arg_macros = {},
        get_input = get_input_line,
        no_eval = false,
      }

      -- Handles incremental macro expansion
      -- There is feedback between this function and the next stage, via in_macro_def.
      -- This is because this function parses macros, but the next stage handles
      -- macro definitions. It *must* be arranged this way, because macro
      -- definitions can be started from within (the expanded text of) a macro.
      -- Why? Because I like making things hard for myself.
      -- Since macros aren't parsed when defining a macro, this (earlier) stage
      -- needs feedback from the later stage to know when it is or isn't
      -- expanding macros. This function passes all the text needed to make that
      -- determination (right up to the opening "{"), and then the next part
      -- sets the flag appropriately so that parsing can proceed.
      local get_chunk
      do
        local pos, line
        get_chunk = function()
          if not line or pos > #line then
            pos = 1
            line = get_input_line()
          end
          if not line then
            return nil, line_number_end
          end
          local npos = find(line, "{", pos + 1, true)
          if not npos then
            npos = #line + 1
          end
          local start = line_number_end
          if in_macro_def or byte(line, pos, pos) ~= 0x7b then  -- {
            local ret = sub(line, pos, npos - 1)
            pos = npos
            return ret, start
          else
            local output = {}
            local orig_start = line_number_start
            line_number_start = start
            line, pos = parseMacro(line, pos + 1, output, 1, parse_macro_opts)
            line_number_start = orig_start
            return concat(output), start
          end
        end
      end

      local line, next_start, pos
      local output = {}
      local function read_until(pattern)
        while true do
          if not line then
            return end
          local npos = find(line, pattern, pos)
          if npos then
            output[#output+1] = sub(line, pos, npos - 1)
            pos = npos
            return byte(line, pos, pos)
          end
          output[#output+1] = sub(line, pos)
          line, next_start = get_chunk()
          pos = 1
        end
      end

      return function()
        repeat
          local _, npos, rest
          in_macro_def = false
          if not line then
            line, next_start = get_chunk()
            pos = 1
          end
          line_number_start = next_start
          local pChar = read_until("[^\t \v-\r]")
          if not pChar then
            return nil, line_number_start, line_number_end
          end
          in_macro_def = (pChar == 0x23)  -- #
          output = {}
          if not in_macro_def then
            read_until("\n")
            pos = pos + 1
          else
            -- We're not sure what type of macro def we have yet, so we can
            -- only parse as far as we're sure will remain in the def.
            -- At the same time, we need enough to be *able* to match the
            -- macro pattern and recognize the type. Looking at the minimum
            -- of "to newline" and "to closing brace" meets this condition.
            pChar = read_until("[\n{]")
            -- We need the character that we stopped on, as well. Being at the
            -- end of the input is a valid case here.
            if pChar then
              output[#output+1] = string.char(pChar)
            end
            pos = pos + 1
            local result = concat(output)
            local _, apos, name = find(result, TOKEN.identifier.pattern, 2)
            assert_parser(name, result, "macro definition: #name <text> or #name(args...) <text> or #name(args...)={<text>}", 2)
            apos = apos + 1
            local macro_args = match(result, "^%([%w%._$\x80-\xff%s,]+%)", apos) or ""
            apos = apos + #macro_args
            local macro_type = sub(result, apos, apos + 1)
            if macro_type ~= "={" then
              macro_type = sub(macro_type, 1, 1)
              apos = apos + 1
              assert_parser(find(" \t\v\f\r", macro_type, 1, true), result, "macro definition: #name <text> or #name(args...) <text> or #name(args...)={<text>}", 2)
            else
              apos = apos + 2
            end
            local args = {}
            local arg_begin = 2
            local macro = {args = args, rawarg = false}
            while arg_begin <= #macro_args do
              local apos = find(macro_args, ",", arg_begin, true)
              if not apos then
                apos = #macro_args
              end
              local arg_string = sub(macro_args, arg_begin, apos - 1)
              local arg = match(arg_string, "^%s*([%a_$\x80-\xff][%w._\x80-\xff]*)%s*$")
              assert_parser(arg, result, "bad macro function argument name: " .. arg_string, #name + 2 + arg_begin)
              if byte(arg, 1, 1) == 0x24 then  -- $
                macro.rawarg = true
                arg = sub(arg, 2)
              end
              assert_parser(#arg > 0, result, "empty macro function argument name", #name + 2 + arg_begin)
              assert_parser(
                not macro.rawarg or #args == 0,
                result,
                "$rawarg parsing has multiple arguments: " .. arg,
                #name + 2 + arg_begin)
              for i=1, #args do
                if arg == args[i] then
                  assert_parser(false, result, "duplicate function argument name: " .. arg, #name + 2 + arg_begin)
                end
              end
              args[#args+1] = arg
              arg_begin = apos + 1
            end
            assert_parser(not macros[name], result, "macro already exists: " .. name, 2)
            output = {sub(result, apos)}
            -- Now that we have checked the header info and know the type, read the full body.
            if macro_type ~= "={" then
              if pChar ~= 0xa then  -- \n
                pChar = read_until("\n")
              end
              pos = pos + 1
              -- For compatibility with previous implementations of this code,
              -- the non-braced version trims whitespace at the end of the body.
              -- To keep significant whitespace, use the braced form.
              macro.text = concat(output):gsub("%s+$", "")
            else
              local opts = {
                macros = macros,
                arg_macros = {},
                get_input = function()
                  local r
                  r, next_start = get_chunk()
                  return r
                end,
                no_eval = true,
              }
              pChar = nil
              while pChar ~= "}" do
                pChar, line, pos = handleOpenBrace("{}", line, pos, output, 1, opts)
                if not pChar then
                  -- End of line. Get more input, since the point of the
                  -- multiline macro def is to span lines.
                  local nextline
                  nextline, next_start = get_chunk()
                  if not nextline then
                    local res = concat(output)
                    assert_parser(
                      false,
                      res,
                      "unexpected EOF looking for end of multiline macro {" .. name .. "}",
                      #res + 1)
                  end
                  line = nextline
                  pos = 1
                end
              end
              result = concat(output)
              result = trimEndNl(result, 0)
              if byte(result, 1, 1) == 0xa then  -- \n
                -- If the openeing brace is immediately followed by
                -- newline, we want to swallow the initial newline.
                result = sub(result, 2)
              end
              macro.text = result
              -- Leftover text forms the beginning of a new syntactic line
            end
            macros[name] = macro
          end
          if line and pos > #line then
            line = nil
          end
        until not in_macro_def
        return concat(output):gsub("%s+$", ""), line_number_start, line_number_end
      end -- get_line
    end -- create_get_line

    local get_line = native_create_get_line and native_create_get_line(compile_file, input) or create_get_line(compile_file, input)

    while true do
      local line
      line, line_number_start, line_number_end = get_line()
      if not line then
        break
      end

      if find(line, "^:") then
        local token = line:match("^:" .. TOKEN.identifier.patternAnywhere)
        if token == "const" then
          local _, type, name, value = line:sub(2):match("^(%a+) (%a+) " .. TOKEN.identifier.patternAnywhere .. " (.+)$")
          assert(type, "constant definition: const [int/double/string/bool/vector] name value")
          assert(({bool=true, int=true, double=true, string=true, vector=true})[type], "constant types are 'int', 'double', 'string', 'bool', and 'vector'")
          if (type == "int" or type == "double") then
            local x = tonumber(value)
            assert(x, "Can't convert '" .. value .. "' to a number")
            local vtype = math.type(x) == "integer" and "int" or "double"
            assert(vtype == type, "bad argument, " .. type .. " expected, got " .. vtype .. " " .. value)
            value = x
          elseif (type == "bool") then
            assert(value:match"^true$" or value:match"^false$", "bool values are 'true' or 'false'")
            if value:match"^true$" then
              value = true
            else
              value = false
            end
          elseif (type == "string") then
            value = value:match"^%b''$" or value:match'^%b""$'
            assert(value, "strings must be enclosed in either single quotes or double quotes")
            value = value:sub(2,-2)
          elseif type == "vector" then
            local matches = table.pack(value:match"^vec%((.+),(.+)%)$")
            assert(matches.n > 1, "vector constants must use vec(x, y) syntax")
            local x = tonumber(matches[1])
            assert(x, "Can't convert '" .. matches[1] .. "' to a number")
            local y = tonumber(matches[2])
            assert(y, "Can't convert '" .. matches[2] .. "' to a number")
            value = {x = x, y = y}
          end
          assert(not variables[name], "variable/label/constant already exists: " .. name)
          variables[name] = {name = name, scope = "constant", type = type, value = value}
        elseif token == "import" then
          local import_name = line:match("^:%a+ +(.+)")
          assert(import_name, "import directive: :import file")
          local status, import_result = importFunc(import_name)
          assert(status, "Import failed: " .. import_result)
          local saved = {line_number_start, line_number_end, compile_file}
          import(import_name, import_result, true)
          -- These got stomped by the import, re-set them
          line_number_start, line_number_end, compile_file = table.unpack(saved)
          set_native_compile_file(compile_file)
        elseif token == "global" or token == "local" then
          local scope, type, name = line:sub(2):gsub(" *;.*", ""):match("^(%a+) +(%a+) +" .. TOKEN.identifier.patternAnywhere .."$")
          assert(scope, "variable definition: [global/local] [bool/int/double/string/vector] name")

          assert(({bool=true, int=true, double=true, string=true, vector=true})[type], "variable types are 'bool', 'int', 'double', 'string', and 'vector'")
          assert(not variables[name], "variable/label already exists: " .. name)
          variables[name] = {name = name, scope = scope, type = type}
        elseif token == "name" then
          local name = line:match("^:%a+ +(.+)")
          assert(name, "name directive: :name script_name")
          compile_file = name
          set_native_compile_file(name)
        elseif token == "budget_cap" then
          local cost = line:match("^:budget_cap +(.+)")
          if cost and cost ~= "max" then
            cost = tonumber(cost)
            if cost then
              assert(-2147483648 <= cost and cost < 2147483648,
                "budget_cap must fit in an integer (-2^31 <= cost < 2^31), got " .. cost)
            end
          end
          assert(cost, "budget_cap directive: :budget_cap [max/<integer>]")
          budget = cost
        elseif token == "use_budget" then
          use_budget = line:match("^:use_budget +(.+)")
          assert(use_budget == "true" or use_budget == "false" or use_budget == "default",
            "use_budget directive: :use_budget [true/false/default]")
        else
          assert(false, "Unrecognized directive :" .. (token or line:sub(2)))
        end
      else
        line = line
        :gsub(TOKEN.identifier.pattern .. ":", function(name)
          assert(not variables[name] or labelCache[name], "variable/label already exists: " .. name)
          variables[name] = {name = name, scope = "local", type = "int", label = 0}
          table.insert(labelCache, name)
          return ""
        end)

        if not is_empty(line) then
          assert_parser(not isImport, line,
          "Imported files can't produce output, they must only contain variable and macro declarations")
          table.insert(lines, {text = line, num_start = line_number_start, num_end = line_number_end, label = labelCache})
          labelCache = {}
        end
      end
    end
    -- anything left in the label cache points to the end of the script
    for _, label in ipairs (labelCache) do
      variables[label].label = 99
    end

    return lines
  end  -- function import

  import("__stdlib__", STDLIB, true)
  local lines = import(name, input, false)

  for _, line in ipairs (lines) do
    line_number_start = line.num_start
    line_number_end = line.num_end
    local node = cache(line.text, variables)

    if node and node.func then
      if node.func.ret == "void" then
        table.insert(actions, node)

        if #(line.label) > 0 then
          for _, label in ipairs (line.label) do
            variables[label].label = #actions
          end
        end
      else
        assert(#(line.label) == 0, "labels cannot be placed before impulses/conditions")

        if node.func.ret == "impulse" then
          table.insert(impulses, node)
        else
          table.insert(conditions, node)
        end
      end
    end
  end

  local function ins(frmt, val)
    ret[#ret+1] = string.pack(frmt, val)
  end

  local function prefix_code(size)
    while size >= 0x80 do
      ret[#ret+1] = string.pack("B", 0x80 + (size & 0x7F))
      size = size >> 7
    end
    ret[#ret+1] = string.pack("B", size)
  end

  local function encode(node)
    if node.func then
      if node.func.name == "label" then
        local var = node.args[1].value
        assert(variables[var] and variables[var].label, "why are you calling the label function manually?")
        encode{type = "number", value = variables[var].label}
        return
      end

      prefix_code(#node.func.name)
      ret[#ret+1] = node.func.name

      for _, arg in ipairs (node.args) do
        encode(arg)
      end
    else
      ins("s1", "constant")

      if node.type == "bool" then
        ins("b", 1)
        ins("b", node.value and 1 or 0)
      elseif node.type == "number" then
        if math.type(node.value) == "integer" then
          ins("b", 2)
          ins("i4", node.value)
        else
          ins("b", 3)
          ins("d", node.value)
        end
      elseif node.type == "string" then
        ins("b", 4)
        prefix_code(#node.value)
        ret[#ret+1] = node.value
      elseif node.type == "vector" then
        ins("b", 5)
        ins("f", node.value.x)
        ins("f", node.value.y)
      elseif node.type == "operator" then
        ins("b", 4)

        if node.value == "%" then
          node.value = "mod"
        elseif node.value == "^" then
          node.value = "pow"
        elseif node.value == "//" then
          node.value = "log"
        elseif node.value == "%&" then
          node.value = "and"
        elseif node.value == "%^" then
          node.value = "xor"
        elseif node.value == "%|" then
          node.value = "or"
        end

        ins("s1", node.value)
      else
        assert(false, "BUG REPORT: unknown compile type: " .. node.type)
      end
    end
  end

  local gsub = string.gsub
  local function json_encode(node)
    local current_pos = #ret
    encode(node)
    for i = current_pos+1, #ret do
      -- Need to JSON-escape control characters, backslash and double-quote,
      -- and also UTF-8 encode high-byte chars
      ret[i] = gsub(ret[i], '[\0-\x1f\\"\x80-\xff]', line_encode_table)
    end
  end

  local function json_escape(str)
    ret[#ret+1] = gsub(str, '[\0-\x1f\\"]', json_escape_table)
  end

  local package_name, script_name = compile_file:match("([^:]*):(.*)")
  if not script_name then
    script_name = compile_file
  end

  if options.format ~= "v2" then
    prefix_code(#compile_file)
    ret[#ret+1] = compile_file

    for _, tbl in ipairs {impulses, conditions, actions} do
      ins("i4", #tbl)

      for _, line in ipairs (tbl) do
        encode(line)
      end
    end

    ret = base64.encode(table.concat(ret))
  else
    for num, pair in ipairs({
      {name="actions", tbl=actions},
      {name="conditions", tbl=conditions},
      {name="impulses", tbl=impulses}
    }) do
      ret[#ret+1] = num == 1 and [[{"]] or [[],"]]
      ret[#ret+1] = pair.name
      ret[#ret+1] = [[":[]]
      for num, line in ipairs(pair.tbl) do
        if num ~= 1 then
          ret[#ret+1] = [[,]]
        end
        ret[#ret+1] = [["]]
        if pair.name == "impulses" then
          ret[#ret+1] = line.func.name  -- Impulses are no-arg functions with straight ASCII names
        else
          json_encode(line)
        end
        ret[#ret+1] = [["]]
      end
    end
    ret[#ret+1] = [[],"name":"]]
    json_escape(script_name)
    ret[#ret+1] = [[","package":"]]
    json_escape(package_name or "")
    ret[#ret+1] = [["]]
    if budget then
      ret[#ret+1] = [[,"budget":]]
      -- No quotes because budget is a number in the JSON
      ret[#ret+1] = budget == "max" and "-1" or string.format("%d", budget)
    end
    if use_budget ~= "default" and (use_budget or budget) then
      ret[#ret+1] = [[,"useBudget":]]
      -- No quotes because useBudget is a boolean in the JSON
      ret[#ret+1] = use_budget or "true"
    end
    ret[#ret+1] = [[}]]

    ret = table.concat(ret)
  end

  package_name = package_name and package_name:sub(1, 24) .. ":" or ""
  script_name = script_name:sub(1, 24)
  return {
    name = package_name .. script_name,
    type = "script",
    impulses = #impulses,
    conditions = #conditions,
    actions = #actions,
    code = ret,
  }
end

function import(input)
  local data
  local pos = 1

  local variables = {}
  local num_vars = 0
  local ret = {}

  local function read(frmt)
    local ret, new = string.unpack(frmt, data, pos)
    pos = new
    return ret
  end

  local function stripParens(text)
    text = tostring(text)
    if byte(text, 1, 1) == 40 and byte(text, -1) == 41 then  -- "(" + ")"
      text = text:sub(2, -2)
    end
    return text
  end

  local function parse()
    local func = read"s1"

    if func == "constant" then
      local type = read"b"

      if type == 1 then
        return read"b" == 1 and "true" or "false"
      elseif type == 2 then
        return tostring(read"i4")
      elseif type == 3 then
        local val = read"d"
        if val == 1/0 then return "(1./0.)" end
        if val == -1/0 then return "(-1./0.)" end
        if val ~= val then return "(0./0.)" end
        return tostring(val)
      elseif type == 4 then
        local pos, len = 0, 0

        repeat
          local b = read"B"
          len = len + ((b & 0x7F) << 7*pos)
          pos = pos + 1
        until b & 0x80 == 0

        local str = read("c" .. len)
        -- This must be a single gsub so that we don't re-match substituted curlies or backslashes
        str = str:gsub("[\0-\x1f\\{}]", function(chr)
          local repl = ({
            ["\b"] = "\\b",
            ["\f"] = "\\f",
            ["\n"] = "\\n",
            ["\r"] = "\\r",
            ["\t"] = "\\t",
            ["\v"] = "\\v",
            ["\\"] = "\\\\",
            ["{"] = "{[}",
            ["}"] = "{]}",
          })[chr]
          if repl then return repl end
          return string.format("\\x%02x", string.byte(chr))
        end)
        local sq, dq = str:match"'", str:match'"'

        if not dq then
          return '"' .. str .. '"'
        elseif dq and not sq then
          return "'" .. str .. "'"
        end

        return '"' .. str:gsub('"', "\\x22") .. '"'
      elseif type == 5 then
        return string.format("vec(%s, %s)", read"f", read"f")
      else
        assert(false, "BUG REPORT: unknown constant type: " .. type)
      end
    else
      local func = assert(FUNCTION[func], "BUG REPORT: unknown function: " .. func)
      local args = {}
      local dynamicOperator = false

      for i, arg in ipairs (func.args) do
        args[#args+1] = parse()

        if arg.type:match"^op_" then
          dynamicOperator = true
          if byte(args[i], 1, 1) == 34 then  -- '"'
            local transformed = args[i]:sub(2, -2)
            :gsub("^=$", "==")
            :gsub("mod", "%%")
            :gsub("pow", "^")
            :gsub("log", "//")
            :gsub("and", "%%&")
            :gsub("xor", "%%^")
            :gsub("or",  "%%|")

            if OPERATOR[transformed] then
              args[i] = transformed
              dynamicOperator = false
            end
          end
        end
      end

      local scope, type, func_name = func.name:match"(%a+)%.(%w+)%.(%a+)"

      if (scope == "global" or scope == "local") and byte(args[1], 1, 1) == 34 then
        local var = args[1]:sub(2,-2)

        if var == var:match(TOKEN.identifier.pattern) then
          if type == "vec2" then
            type = "vector"
          end
          local key = string.format(":%s %s %s", scope, type, var)
          if not variables[var] then
            variables[var] = key
            num_vars = num_vars + 1
          end

          -- Only use sugared form if this matches the previous definition
          if variables[var] == key then
            return func_name == "set" and string.format("%s = %s", var, stripParens(args[2])) or var
          end
        end
      elseif not dynamicOperator and (func.name:sub(1,10) == "arithmetic" or func.name:sub(1,10) == "comparison") then
        return string.format("(%s)", table.concat(args, " "))
      elseif func.name == "concat" then
        return string.format("(%s . %s)", table.unpack(args))
      end

      local type, func_name = func.name:match"(%a+)%.(%a+)" -- rnd, min, max
      local func_short = func.short

      if func.name:match"^ternary" then
        func_short = "if"
      elseif (type == "int" or type == "double") and (func_name == "rnd" or func_name == "min" or func_name == "max") then
        func_short = func_name
      end

      for k, v in ipairs (args) do
        args[k] = stripParens(v)
      end

      return string.format("%s(%s)", func_short, table.concat(args, ", "))
    end
  end

  local function ins(val)
    local text = stripParens(val)
    ret[#ret+1] = text
  end

  local function oldFormat()
    data = base64.decode(input)
    local name = read"s1"

    for i = 1, 3 do
      local sz = read"I4"
      assert(sz >= 0, string.format("Bad import: Section %d had negative count %d", i, sz))
      for j = 1, sz do
        ins(parse())
      end

      ins""
    end

    assert(pos - 1 == #data, string.format("Bad import: Extra characters after parsing from %d-%d (%s)", pos - 1, #data, string.sub(data, pos)))

    table.insert(ret, 1, "")

    for _, var in pairs (variables) do
      table.insert(ret, 1, var)
    end

    return name
  end

  local function modernFormat()
    local script_name = input.name
    local package_name = input.package
    -- Split packages make our life harder. We need to prefix the script with ":" if it contains a
    -- ":" but otherwise has no package. Note that if the *package* contains a ":", this will be
    -- lost in translation.
    local name = (package_name and package_name ~= "") and
      (package_name .. ":" .. script_name) or
      (script_name:find(":", 1, true) and ":" or "") .. script_name

    ret[1] = ":name " .. name
    -- This complicated set of conditions supports the following goals:
    -- If useBudget is false or missing *and* budget is 0 or missing, don't include any directives.
    --   (This is the default/compatibility case for old scripts.)
    --   The export will only match the import if both directives were missing, but this is deemed
    --   acceptable, since we don't want to clutter scripts up with irrelevant junk for this common case.
    --   The default values are false/0, so functionally it comes out the same.
    -- If useBudget is true, we must include something. Generally it is the budget cap, but in the special case
    --   of a missing budget, we set :use_budget instead so the export matches the import.
    -- If budget is positive, we set the directives so the export will match the import.
    if input.budget and (input.budget ~= 0 or input.useBudget) then
      ret[#ret+1] = ":budget_cap " .. (input.budget == -1 and "max" or string.format("%d", input.budget))
    end
    if not input.useBudget and input.budget and input.budget ~= 0 then
      ret[#ret+1] = ":use_budget " .. (input.useBudget == nil and "default" or "false")
    end
    if input.useBudget and input.budget == nil then
      ret[#ret+1] = ":use_budget true"
    end
    ins""
    local variable_slot = #ret

    for i, tbl in ipairs({input.impulses, input.conditions, input.actions}) do
      for _, line in ipairs(tbl) do
        if i == 1 then
          ins(line .. "()")  -- Impulses are straight ASCII
        else
          -- High-bit chars are UTF8-encoded, have to undo that
          data = line:gsub("[\xC2\xC3].", utf_decode_table)
          pos = 1
          ins(parse())
          if pos - 1 ~= #data then
            error(string.format("Bad import: Extra characters after parsing from %d-%d (%s)", pos - 1, #data, string.sub(data, pos)))
          end
        end
      end

      ins""
    end

    local shift_amount = num_vars + 1
    for i = #ret, variable_slot, -1 do
      ret[i + shift_amount] = ret[i]
    end
    ret[variable_slot] = ""

    for _, var in pairs (variables) do
      variable_slot = variable_slot + 1
      ret[variable_slot] = var
    end

    return name
  end

  local name = type(input) == "string" and oldFormat() or modernFormat()
  ret = table.concat(ret, "\n"):gsub("\n\n+", "\n\n"):gsub("^\n+", ""):gsub("\n+$", "")
  return {name, ret}
end

function unittest()
  local import_tests = {
"C2dsb2JhbF90aWVyAQAAAAVrZXkuMQAAAAABAAAADmdsb2JhbC5pbnQuc2V0CGNvbnN0YW50BAR0aWVyDmFyaXRobWV0aWMuaW50DmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BANtb2QIY29uc3RhbnQCCgAAAAhjb25zdGFudAQBKwhjb25zdGFudAIBAAAA",
"EEdMT0JBTF9DT1VOVGRvd24BAAAABWtleS4yAAAAAAYAAAAOZ2VuZXJpYy5nb3RvaWYIY29uc3RhbnQCAwAAABFjb21wYXJpc29uLmRvdWJsZRFnbG9iYWwuZG91YmxlLmdldAhjb25zdGFudAQFY291bnQIY29uc3RhbnQEATwIY29uc3RhbnQDAAAAAAAA8D8QbG9jYWwuZG91YmxlLnNldAhjb25zdGFudAQDcG93DGRvdWJsZS5mbG9vchFhcml0aG1ldGljLmRvdWJsZQhjb25zdGFudAN7FK5H4XqEvwhjb25zdGFudAQBKxFhcml0aG1ldGljLmRvdWJsZRFnbG9iYWwuZG91YmxlLmdldAhjb25zdGFudAQFY291bnQIY29uc3RhbnQEA2xvZwhjb25zdGFudAMAAAAAAAAkQA1sb2NhbC5pbnQuc2V0CGNvbnN0YW50BANpbmMOYXJpdGhtZXRpYy5pbnQIY29uc3RhbnQCCgAAAAhjb25zdGFudAQDcG93A2QyaRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BANwb3cQbG9jYWwuZG91YmxlLnNldAhjb25zdGFudAQDdG1wEWFyaXRobWV0aWMuZG91YmxlEWdsb2JhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAVjb3VudAhjb25zdGFudAQBLQNpMmQNbG9jYWwuaW50LmdldAhjb25zdGFudAQDaW5jDmdlbmVyaWMuZ290b2lmCGNvbnN0YW50AmMAAAARY29tcGFyaXNvbi5kb3VibGUQbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQDdG1wCGNvbnN0YW50BAE8CGNvbnN0YW50AwAAAAAAAPA/EWdsb2JhbC5kb3VibGUuc2V0CGNvbnN0YW50BAVjb3VudBBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAN0bXA=",
"DkdMT0JBTF9DT1VOVFVQAQAAAAVrZXkuMwAAAAAGAAAADmdlbmVyaWMuZ290b2lmCGNvbnN0YW50AmMAAAARY29tcGFyaXNvbi5kb3VibGURZ2xvYmFsLmRvdWJsZS5nZXQIY29uc3RhbnQEBWNvdW50CGNvbnN0YW50BAE+CGNvbnN0YW50AwAAAACIKmFBDmdlbmVyaWMuZ290b2lmCGNvbnN0YW50AgQAAAARY29tcGFyaXNvbi5kb3VibGURZ2xvYmFsLmRvdWJsZS5nZXQIY29uc3RhbnQEBWNvdW50CGNvbnN0YW50BAE8CGNvbnN0YW50AwAAAAAAAPA/EGxvY2FsLmRvdWJsZS5zZXQIY29uc3RhbnQEA3Bvdwxkb3VibGUuZmxvb3IRYXJpdGhtZXRpYy5kb3VibGUIY29uc3RhbnQDexSuR+F6hD8IY29uc3RhbnQEASsRYXJpdGhtZXRpYy5kb3VibGURZ2xvYmFsLmRvdWJsZS5nZXQIY29uc3RhbnQEBWNvdW50CGNvbnN0YW50BANsb2cIY29uc3RhbnQDAAAAAAAAJEANbG9jYWwuaW50LnNldAhjb25zdGFudAQDaW5jDmFyaXRobWV0aWMuaW50CGNvbnN0YW50AgoAAAAIY29uc3RhbnQEA3BvdwNkMmkQbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQDcG93EGxvY2FsLmRvdWJsZS5zZXQIY29uc3RhbnQEA3RtcBFhcml0aG1ldGljLmRvdWJsZRFnbG9iYWwuZG91YmxlLmdldAhjb25zdGFudAQFY291bnQIY29uc3RhbnQEASsDaTJkDWxvY2FsLmludC5nZXQIY29uc3RhbnQEA2luYxFnbG9iYWwuZG91YmxlLnNldAhjb25zdGFudAQFY291bnQQbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQDdG1w",
"E2dsb2JhbF9jaG9vc2VfY3JhZnQBAAAABWtleS40AAAAAAEAAAAOZ2xvYmFsLmludC5zZXQIY29uc3RhbnQEBk9VVFBVVA5hcml0aG1ldGljLmludA5hcml0aG1ldGljLmludA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQGT1VUUFVUCGNvbnN0YW50BANtb2QIY29uc3RhbnQCBQAAAAhjb25zdGFudAQBKwhjb25zdGFudAIBAAAA",
"D0xPQ19TRVRfRkFDVE9SWQEAAAAMb3Blbi5mYWN0b3J5AAAAAAEAAAAOZ2xvYmFsLmludC5zZXQIY29uc3RhbnQECGxvY2F0aW9uCGNvbnN0YW50AgMAAAA=",
"DWZhY3RvcnlfY3JhZnQBAAAABWtleS4wAQAAAA9jb21wYXJpc29uLmJvb2wOY29tcGFyaXNvbi5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQECGxvY2F0aW9uCGNvbnN0YW50BAI9PQhjb25zdGFudAIDAAAACGNvbnN0YW50BAImJg5jb21wYXJpc29uLmludA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQIY3JhZnRpbmcIY29uc3RhbnQEAj09CGNvbnN0YW50AgAAAAADAAAADmdsb2JhbC5pbnQuc2V0CGNvbnN0YW50BAhjcmFmdGluZwhjb25zdGFudAIBAAAAE2dlbmVyaWMuZXhlY3V0ZXN5bmMGY29uY2F0CGNvbnN0YW50BA5mYWN0b3J5X2NyYWZ0XwNpMnMOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBm91dHB1dA5nbG9iYWwuaW50LnNldAhjb25zdGFudAQIY3JhZnRpbmcIY29uc3RhbnQCAAAAAA==",
"D0ZBQ1RPUllfQ1JBRlRfMQAAAAAAAAAACQAAAA5nZW5lcmljLmdvdG9pZghjb25zdGFudAJjAAAADmNvbXBhcmlzb24uaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAE+CGNvbnN0YW50AgUAAAATZ2VuZXJpYy5leGVjdXRlc3luYwhjb25zdGFudAQXZmFjdG9yeV9jcmFmdF8xX2luY2hpcHMOZ2xvYmFsLmludC5zZXQIY29uc3RhbnQEDGNyYWZ0MV9zdGF0ZQhjb25zdGFudAIBAAAAD2dlbmVyaWMuZXhlY3V0ZQhjb25zdGFudAQSZmFjdG9yeV9jcmFmdF8xXzFBE2dlbmVyaWMuZXhlY3V0ZXN5bmMIY29uc3RhbnQEEmZhY3RvcnlfY3JhZnRfMV8xQhNnZW5lcmljLmV4ZWN1dGVzeW5jCGNvbnN0YW50BBFmYWN0b3J5X2NyYWZ0XzFfMhFnZW5lcmljLndhaXR3aGlsZRZmYWN0b3J5Lm1hY2hpbmUuYWN0aXZlCGNvbnN0YW50BAlhc3NlbWJsZXIRZ2VuZXJpYy53YWl0d2hpbGUOY29tcGFyaXNvbi5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEDGNyYWZ0MV9zdGF0ZQhjb25zdGFudAQBPAhjb25zdGFudAIPAAAADWZhY3RvcnkuY3JhZnQIY29uc3RhbnQEBGNoaXAOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIRZ2xvYmFsLmRvdWJsZS5nZXQIY29uc3RhbnQEBWNvdW50",
"F2ZhY3RvcnlfY3JhZnRfMV9pbmNoaXBzAAAAAAAAAAAKAAAADmdlbmVyaWMuZ290b2lmCGNvbnN0YW50AmMAAAAOY29tcGFyaXNvbi5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEAj09CGNvbnN0YW50AgEAAAAQbG9jYWwuZG91YmxlLnNldAhjb25zdGFudAQGdGFyZ2V0EWFyaXRobWV0aWMuZG91YmxlCmRvdWJsZS5taW4RYXJpdGhtZXRpYy5kb3VibGUIY29uc3RhbnQDAAAAAAAAEEAIY29uc3RhbnQEASoRYXJpdGhtZXRpYy5kb3VibGUDaTJkDmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAEtCGNvbnN0YW50AwAAAAAAAPA/CGNvbnN0YW50AwAAAAAAAChACGNvbnN0YW50BAEqEWdsb2JhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAVjb3VudA5nZW5lcmljLmdvdG9pZghjb25zdGFudAJjAAAAEWNvbXBhcmlzb24uZG91YmxlE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEBGNoaXAOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEAS0IY29uc3RhbnQCAQAAAAhjb25zdGFudAQCPj0QbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQGdGFyZ2V0DWxvY2FsLmludC5zZXQIY29uc3RhbnQEBm15dGllcg5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllchBsb2NhbC5kb3VibGUuc2V0CGNvbnN0YW50BAdteWNvdW50EWdsb2JhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAVjb3VudA5nbG9iYWwuaW50LnNldAhjb25zdGFudAQEdGllcg5hcml0aG1ldGljLmludA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQBLQhjb25zdGFudAIBAAAAEWdsb2JhbC5kb3VibGUuc2V0CGNvbnN0YW50BAVjb3VudBFhcml0aG1ldGljLmRvdWJsZRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAZ0YXJnZXQIY29uc3RhbnQEAS0TZmFjdG9yeS5pdGVtcy5jb3VudAhjb25zdGFudAQEY2hpcA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllchNnZW5lcmljLmV4ZWN1dGVzeW5jCGNvbnN0YW50BA9mYWN0b3J5X2NyYWZ0XzEOZ2xvYmFsLmludC5zZXQIY29uc3RhbnQEBHRpZXINbG9jYWwuaW50LmdldAhjb25zdGFudAQGbXl0aWVyEWdsb2JhbC5kb3VibGUuc2V0CGNvbnN0YW50BAVjb3VudBBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAdteWNvdW50",
"EkZBQ1RPUllfY3JhZnRfMV8xYQAAAAABAAAADmNvbXBhcmlzb24uaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAhsb2NhdGlvbghjb25zdGFudAQCPT0IY29uc3RhbnQCAwAAAAkAAAAQbG9jYWwuZG91YmxlLnNldAhjb25zdGFudAQIYm9hcmRfbG8RYXJpdGhtZXRpYy5kb3VibGURZ2xvYmFsLmRvdWJsZS5nZXQIY29uc3RhbnQEBWNvdW50CGNvbnN0YW50BAEqEWFyaXRobWV0aWMuZG91YmxlDGRvdWJsZS5mbG9vchFhcml0aG1ldGljLmRvdWJsZQhjb25zdGFudAMAAAAANGEqQQhjb25zdGFudAQBLxFhcml0aG1ldGljLmRvdWJsZQhjb25zdGFudAMAAAAAAAAkQAhjb25zdGFudAQDcG93A2kyZA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQDbW9kCGNvbnN0YW50AwAAAAAAACRAEGxvY2FsLmRvdWJsZS5zZXQIY29uc3RhbnQECGJvYXJkX2hpEWFyaXRobWV0aWMuZG91YmxlEWdsb2JhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAVjb3VudAhjb25zdGFudAQBKhFhcml0aG1ldGljLmRvdWJsZQxkb3VibGUuZmxvb3IRYXJpdGhtZXRpYy5kb3VibGUIY29uc3RhbnQDAAAAAARQKkEIY29uc3RhbnQEAS8RYXJpdGhtZXRpYy5kb3VibGUIY29uc3RhbnQDAAAAAAAAJEAIY29uc3RhbnQEA3BvdwNpMmQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEA21vZAhjb25zdGFudAMAAAAAAAAkQBFnZW5lcmljLndhaXR3aGlsZRZmYWN0b3J5Lm1hY2hpbmUuYWN0aXZlCGNvbnN0YW50BAdwcmVzc2VyD2ZhY3RvcnkucHJvZHVjZQhjb25zdGFudAQFaW5nb3QOYXJpdGhtZXRpYy5pbnQOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEASoIY29uc3RhbnQCAgAAAAhjb25zdGFudAQBLQhjb25zdGFudAIBAAAAEWFyaXRobWV0aWMuZG91YmxlEWFyaXRobWV0aWMuZG91YmxlEGxvY2FsLmRvdWJsZS5nZXQIY29uc3RhbnQECGJvYXJkX2xvCGNvbnN0YW50BAEtE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEDXBsYXRlLmNpcmN1aXQOYXJpdGhtZXRpYy5pbnQOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEASoIY29uc3RhbnQCAgAAAAhjb25zdGFudAQBLQhjb25zdGFudAIBAAAACGNvbnN0YW50BAEtE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEBXBsYXRlDmFyaXRobWV0aWMuaW50DmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAEqCGNvbnN0YW50AgIAAAAIY29uc3RhbnQEAS0IY29uc3RhbnQCAQAAAAhjb25zdGFudAQHcHJlc3NlchFnZW5lcmljLndhaXR3aGlsZRZmYWN0b3J5Lm1hY2hpbmUuYWN0aXZlCGNvbnN0YW50BAdwcmVzc2VyDmdsb2JhbC5pbnQuc2V0CGNvbnN0YW50BAxjcmFmdDFfc3RhdGUOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEDGNyYWZ0MV9zdGF0ZQhjb25zdGFudAQBKwhjb25zdGFudAICAAAAD2ZhY3RvcnkucHJvZHVjZQhjb25zdGFudAQFaW5nb3QOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEASoIY29uc3RhbnQCAgAAABFhcml0aG1ldGljLmRvdWJsZRFhcml0aG1ldGljLmRvdWJsZRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAhib2FyZF9oaQhjb25zdGFudAQBLRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BA1wbGF0ZS5jaXJjdWl0DmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAEqCGNvbnN0YW50AgIAAAAIY29uc3RhbnQEAS0TZmFjdG9yeS5pdGVtcy5jb3VudAhjb25zdGFudAQFcGxhdGUOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEASoIY29uc3RhbnQCAgAAAAhjb25zdGFudAQHcHJlc3NlchFnZW5lcmljLndhaXR3aGlsZRZmYWN0b3J5Lm1hY2hpbmUuYWN0aXZlCGNvbnN0YW50BAdwcmVzc2VyDmdsb2JhbC5pbnQuc2V0CGNvbnN0YW50BAxjcmFmdDFfc3RhdGUOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEDGNyYWZ0MV9zdGF0ZQhjb25zdGFudAQBKwhjb25zdGFudAIEAAAA",
"EkZBQ1RPUllfY3JhZnRfMV8xYgAAAAABAAAADmNvbXBhcmlzb24uaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAhsb2NhdGlvbghjb25zdGFudAQCPT0IY29uc3RhbnQCAwAAAAsAAAAQbG9jYWwuZG91YmxlLnNldAhjb25zdGFudAQKY2lyY3VpdF9sbxFhcml0aG1ldGljLmRvdWJsZRFnbG9iYWwuZG91YmxlLmdldAhjb25zdGFudAQFY291bnQIY29uc3RhbnQEASoIY29uc3RhbnQDAAAAAAAAAEAQbG9jYWwuZG91YmxlLnNldAhjb25zdGFudAQKY2lyY3VpdF9oaRFhcml0aG1ldGljLmRvdWJsZRFnbG9iYWwuZG91YmxlLmdldAhjb25zdGFudAQFY291bnQIY29uc3RhbnQEASoRYXJpdGhtZXRpYy5kb3VibGUMZG91YmxlLmZsb29yEWFyaXRobWV0aWMuZG91YmxlCGNvbnN0YW50AwAAAAAgZQtBCGNvbnN0YW50BAEvEWFyaXRobWV0aWMuZG91YmxlCGNvbnN0YW50AwAAAAAAACRACGNvbnN0YW50BANwb3cDaTJkDmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BANtb2QIY29uc3RhbnQDAAAAAAAAJEARZ2VuZXJpYy53YWl0d2hpbGUWZmFjdG9yeS5tYWNoaW5lLmFjdGl2ZQhjb25zdGFudAQIcmVmaW5lcnkPZmFjdG9yeS5wcm9kdWNlCGNvbnN0YW50BAVpbmdvdA5hcml0aG1ldGljLmludA5hcml0aG1ldGljLmludA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQBKghjb25zdGFudAICAAAACGNvbnN0YW50BAEtCGNvbnN0YW50AgEAAAALZG91YmxlLmNlaWwRYXJpdGhtZXRpYy5kb3VibGURYXJpdGhtZXRpYy5kb3VibGURYXJpdGhtZXRpYy5kb3VibGUQbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQKY2lyY3VpdF9sbwhjb25zdGFudAQBLRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BAdjaXJjdWl0DmFyaXRobWV0aWMuaW50DmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAEqCGNvbnN0YW50AgIAAAAIY29uc3RhbnQEAS0IY29uc3RhbnQCAQAAAAhjb25zdGFudAQBLRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BAVjYWJsZQ5hcml0aG1ldGljLmludA5hcml0aG1ldGljLmludA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQBKghjb25zdGFudAICAAAACGNvbnN0YW50BAEtCGNvbnN0YW50AgEAAAAIY29uc3RhbnQEAS8IY29uc3RhbnQDAAAAAAAAAEAIY29uc3RhbnQECHJlZmluZXJ5EWdlbmVyaWMud2FpdHdoaWxlFmZhY3RvcnkubWFjaGluZS5hY3RpdmUIY29uc3RhbnQECHJlZmluZXJ5D2ZhY3RvcnkucHJvZHVjZQhjb25zdGFudAQFaW5nb3QOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEASoIY29uc3RhbnQCAgAAAAtkb3VibGUuY2VpbBFhcml0aG1ldGljLmRvdWJsZRFhcml0aG1ldGljLmRvdWJsZRFhcml0aG1ldGljLmRvdWJsZRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BApjaXJjdWl0X2hpCGNvbnN0YW50BAEtE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEB2NpcmN1aXQOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEASoIY29uc3RhbnQCAgAAAAhjb25zdGFudAQBLRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BAVjYWJsZQ5hcml0aG1ldGljLmludA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQBKghjb25zdGFudAICAAAACGNvbnN0YW50BAEvCGNvbnN0YW50AwAAAAAAAABACGNvbnN0YW50BAhyZWZpbmVyeRFnZW5lcmljLndhaXR3aGlsZRZmYWN0b3J5Lm1hY2hpbmUuYWN0aXZlCGNvbnN0YW50BAlhc3NlbWJsZXIPZmFjdG9yeS5wcm9kdWNlCGNvbnN0YW50BAVjYWJsZQ5hcml0aG1ldGljLmludA5hcml0aG1ldGljLmludA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQBKghjb25zdGFudAICAAAACGNvbnN0YW50BAEtCGNvbnN0YW50AgEAAAARYXJpdGhtZXRpYy5kb3VibGUQbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQKY2lyY3VpdF9sbwhjb25zdGFudAQBLRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BAdjaXJjdWl0DmFyaXRobWV0aWMuaW50DmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAEqCGNvbnN0YW50AgIAAAAIY29uc3RhbnQEAS0IY29uc3RhbnQCAQAAAAhjb25zdGFudAQJYXNzZW1ibGVyEWdlbmVyaWMud2FpdHdoaWxlFmZhY3RvcnkubWFjaGluZS5hY3RpdmUIY29uc3RhbnQECHJlZmluZXJ5EWdlbmVyaWMud2FpdHdoaWxlFmZhY3RvcnkubWFjaGluZS5hY3RpdmUIY29uc3RhbnQECWFzc2VtYmxlcg9mYWN0b3J5LnByb2R1Y2UIY29uc3RhbnQEBWNhYmxlDmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAEqCGNvbnN0YW50AgIAAAARYXJpdGhtZXRpYy5kb3VibGUQbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQKY2lyY3VpdF9oaQhjb25zdGFudAQBLRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BAdjaXJjdWl0DmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAEqCGNvbnN0YW50AgIAAAAIY29uc3RhbnQECWFzc2VtYmxlcg==",

"EUZBQ1RPUllfY3JhZnRfMV8yAAAAAAEAAAAOY29tcGFyaXNvbi5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQECGxvY2F0aW9uCGNvbnN0YW50BAI9PQhjb25zdGFudAIDAAAACgAAABBsb2NhbC5kb3VibGUuc2V0CGNvbnN0YW50BAhib2FyZF9sbxFhcml0aG1ldGljLmRvdWJsZRFnbG9iYWwuZG91YmxlLmdldAhjb25zdGFudAQFY291bnQIY29uc3RhbnQEASoRYXJpdGhtZXRpYy5kb3VibGUMZG91YmxlLmZsb29yEWFyaXRobWV0aWMuZG91YmxlCGNvbnN0YW50AwAAAAA0YSpBCGNvbnN0YW50BAEvEWFyaXRobWV0aWMuZG91YmxlCGNvbnN0YW50AwAAAAAAACRACGNvbnN0YW50BANwb3cDaTJkDmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BANtb2QIY29uc3RhbnQDAAAAAAAAJEAQbG9jYWwuZG91YmxlLnNldAhjb25zdGFudAQIYm9hcmRfaGkRYXJpdGhtZXRpYy5kb3VibGURZ2xvYmFsLmRvdWJsZS5nZXQIY29uc3RhbnQEBWNvdW50CGNvbnN0YW50BAEqEWFyaXRobWV0aWMuZG91YmxlDGRvdWJsZS5mbG9vchFhcml0aG1ldGljLmRvdWJsZQhjb25zdGFudAMAAAAABFAqQQhjb25zdGFudAQBLxFhcml0aG1ldGljLmRvdWJsZQhjb25zdGFudAMAAAAAAAAkQAhjb25zdGFudAQDcG93A2kyZA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQDbW9kCGNvbnN0YW50AwAAAAAAACRAEWdlbmVyaWMud2FpdHdoaWxlDmNvbXBhcmlzb24uaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAxjcmFmdDFfc3RhdGUIY29uc3RhbnQEATwIY29uc3RhbnQCAwAAABFnZW5lcmljLndhaXR3aGlsZRZmYWN0b3J5Lm1hY2hpbmUuYWN0aXZlCGNvbnN0YW50BAhyZWZpbmVyeQ9mYWN0b3J5LnByb2R1Y2UIY29uc3RhbnQEBXBsYXRlDmFyaXRobWV0aWMuaW50DmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAEqCGNvbnN0YW50AgIAAAAIY29uc3RhbnQEAS0IY29uc3RhbnQCAQAAABFhcml0aG1ldGljLmRvdWJsZRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAhib2FyZF9sbwhjb25zdGFudAQBLRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BA1wbGF0ZS5jaXJjdWl0DmFyaXRobWV0aWMuaW50DmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAEqCGNvbnN0YW50AgIAAAAIY29uc3RhbnQEAS0IY29uc3RhbnQCAQAAAAhjb25zdGFudAQIcmVmaW5lcnkRZ2VuZXJpYy53YWl0d2hpbGUOY29tcGFyaXNvbi5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEDGNyYWZ0MV9zdGF0ZQhjb25zdGFudAQBPAhjb25zdGFudAIHAAAAEWdlbmVyaWMud2FpdHdoaWxlFmZhY3RvcnkubWFjaGluZS5hY3RpdmUIY29uc3RhbnQECHJlZmluZXJ5D2ZhY3RvcnkucHJvZHVjZQhjb25zdGFudAQFcGxhdGUOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEASoIY29uc3RhbnQCAgAAABFhcml0aG1ldGljLmRvdWJsZRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAhib2FyZF9oaQhjb25zdGFudAQBLRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BA1wbGF0ZS5jaXJjdWl0DmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAEqCGNvbnN0YW50AgIAAAAIY29uc3RhbnQECHJlZmluZXJ5EWdlbmVyaWMud2FpdHdoaWxlFmZhY3RvcnkubWFjaGluZS5hY3RpdmUIY29uc3RhbnQECHJlZmluZXJ5Dmdsb2JhbC5pbnQuc2V0CGNvbnN0YW50BAxjcmFmdDFfc3RhdGUOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEDGNyYWZ0MV9zdGF0ZQhjb25zdGFudAQBKwhjb25zdGFudAIIAAAA",
"D0ZBQ1RPUllfQ1JBRlRfMgAAAAAAAAAABgAAAA5nbG9iYWwuaW50LnNldAhjb25zdGFudAQMY3JhZnQyX3N0YXRlCGNvbnN0YW50AgEAAAAPZ2VuZXJpYy5leGVjdXRlCGNvbnN0YW50BBZmYWN0b3J5X2NyYWZ0XzJfcGxhdGVzD2dlbmVyaWMuZXhlY3V0ZQhjb25zdGFudAQVZmFjdG9yeV9jcmFmdF8yX2NvaWxzD2dlbmVyaWMuZXhlY3V0ZQhjb25zdGFudAQUZmFjdG9yeV9jcmFmdF8yX3JvZHMRZ2VuZXJpYy53YWl0dW50aWwOY29tcGFyaXNvbi5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEDGNyYWZ0Ml9zdGF0ZQhjb25zdGFudAQCPT0IY29uc3RhbnQCDwAAAA1mYWN0b3J5LmNyYWZ0CGNvbnN0YW50BAVtb3Rvcg5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllchFnbG9iYWwuZG91YmxlLmdldAhjb25zdGFudAQFY291bnQ=",
"FkZBQ1RPUllfQ1JBRlRfMl9wbGF0ZXMAAAAAAAAAAAYAAAAQbG9jYWwuZG91YmxlLnNldAhjb25zdGFudAQGdGFyZ2V0EWFyaXRobWV0aWMuZG91YmxlEWdsb2JhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAVjb3VudAhjb25zdGFudAQBKghjb25zdGFudAMAAAAAAAAQQA5nZW5lcmljLmdvdG9pZghjb25zdGFudAIGAAAAEWNvbXBhcmlzb24uZG91YmxlE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEBXBsYXRlDmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAI+PRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAZ0YXJnZXQRZ2VuZXJpYy53YWl0d2hpbGUWZmFjdG9yeS5tYWNoaW5lLmFjdGl2ZQhjb25zdGFudAQHcHJlc3Nlcg9mYWN0b3J5LnByb2R1Y2UIY29uc3RhbnQEBWluZ290Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyEWFyaXRobWV0aWMuZG91YmxlEGxvY2FsLmRvdWJsZS5nZXQIY29uc3RhbnQEBnRhcmdldAhjb25zdGFudAQBLRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BAVwbGF0ZQ5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQHcHJlc3NlchFnZW5lcmljLndhaXR3aGlsZRZmYWN0b3J5Lm1hY2hpbmUuYWN0aXZlCGNvbnN0YW50BAdwcmVzc2VyDmdsb2JhbC5pbnQuc2V0CGNvbnN0YW50BAxjcmFmdDJfc3RhdGUOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEDGNyYWZ0Ml9zdGF0ZQhjb25zdGFudAQBKwhjb25zdGFudAICAAAA",
"FUZBQ1RPUllfQ1JBRlRfMl9jb2lscwAAAAAAAAAACAAAABBsb2NhbC5kb3VibGUuc2V0CGNvbnN0YW50BApuZWVkX2NvaWxzEWFyaXRobWV0aWMuZG91YmxlEWdsb2JhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAVjb3VudAhjb25zdGFudAQBKghjb25zdGFudAMAAAAAAADwPw5nZW5lcmljLmdvdG9pZghjb25zdGFudAIFAAAAEWNvbXBhcmlzb24uZG91YmxlE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEBWNhYmxlDmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAI+PRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BApuZWVkX2NvaWxzEWdlbmVyaWMud2FpdHdoaWxlFmZhY3RvcnkubWFjaGluZS5hY3RpdmUIY29uc3RhbnQECHJlZmluZXJ5D2ZhY3RvcnkucHJvZHVjZQhjb25zdGFudAQFaW5nb3QOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXILZG91YmxlLmNlaWwRYXJpdGhtZXRpYy5kb3VibGURYXJpdGhtZXRpYy5kb3VibGUQbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQKbmVlZF9jb2lscwhjb25zdGFudAQBLRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BAVjYWJsZQ5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQBLwhjb25zdGFudAMAAAAAAAAAQAhjb25zdGFudAQIcmVmaW5lcnkRZ2VuZXJpYy53YWl0d2hpbGUWZmFjdG9yeS5tYWNoaW5lLmFjdGl2ZQhjb25zdGFudAQIcmVmaW5lcnkPZmFjdG9yeS5wcm9kdWNlCGNvbnN0YW50BAVjYWJsZQ5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllchBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BApuZWVkX2NvaWxzCGNvbnN0YW50BAhyZWZpbmVyeRFnZW5lcmljLndhaXR3aGlsZRZmYWN0b3J5Lm1hY2hpbmUuYWN0aXZlCGNvbnN0YW50BAhyZWZpbmVyeQ5nbG9iYWwuaW50LnNldAhjb25zdGFudAQMY3JhZnQyX3N0YXRlDmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAxjcmFmdDJfc3RhdGUIY29uc3RhbnQEASsIY29uc3RhbnQCBAAAAA==",
"FEZBQ1RPUllfQ1JBRlRfMl9yb2RzAAAAAAAAAAAMAAAAEGxvY2FsLmRvdWJsZS5zZXQIY29uc3RhbnQEC25lZWRfc2NyZXdzCmRvdWJsZS5tYXgIY29uc3RhbnQDAAAAAAAAAAARYXJpdGhtZXRpYy5kb3VibGURZ2xvYmFsLmRvdWJsZS5nZXQIY29uc3RhbnQEBWNvdW50CGNvbnN0YW50BAEtE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEBXNjcmV3Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyEGxvY2FsLmRvdWJsZS5zZXQIY29uc3RhbnQECW5lZWRfcm9kcwpkb3VibGUubWF4CGNvbnN0YW50AwAAAAAAAAAAEWFyaXRobWV0aWMuZG91YmxlEWFyaXRobWV0aWMuZG91YmxlEWFyaXRobWV0aWMuZG91YmxlEWdsb2JhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAVjb3VudAhjb25zdGFudAQBKghjb25zdGFudAMAAAAAAAAAQAhjb25zdGFudAQBKwtkb3VibGUuY2VpbBFhcml0aG1ldGljLmRvdWJsZRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAtuZWVkX3NjcmV3cwhjb25zdGFudAQBLwhjb25zdGFudAMAAAAAAAAQQAhjb25zdGFudAQBLRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BANyb2QOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIOZ2VuZXJpYy5nb3RvaWYIY29uc3RhbnQCBwAAABFjb21wYXJpc29uLmRvdWJsZRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAluZWVkX3JvZHMIY29uc3RhbnQEAj09CGNvbnN0YW50AwAAAAAAAAAAEWdlbmVyaWMud2FpdHdoaWxlFmZhY3RvcnkubWFjaGluZS5hY3RpdmUIY29uc3RhbnQEBnNoYXBlcg9mYWN0b3J5LnByb2R1Y2UIY29uc3RhbnQEBWluZ290Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyC2RvdWJsZS5jZWlsEWFyaXRobWV0aWMuZG91YmxlEGxvY2FsLmRvdWJsZS5nZXQIY29uc3RhbnQECW5lZWRfcm9kcwhjb25zdGFudAQBLwhjb25zdGFudAMAAAAAAAAAQAhjb25zdGFudAQGc2hhcGVyEWdlbmVyaWMud2FpdHVudGlsEWNvbXBhcmlzb24uZG91YmxlE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEA3JvZA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQCPj0RYXJpdGhtZXRpYy5kb3VibGUQbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQLbmVlZF9zY3Jld3MIY29uc3RhbnQEAS8IY29uc3RhbnQDAAAAAAAAEEAOZ2VuZXJpYy5nb3RvaWYIY29uc3RhbnQCCwAAABFjb21wYXJpc29uLmRvdWJsZRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAtuZWVkX3NjcmV3cwhjb25zdGFudAQCPT0IY29uc3RhbnQDAAAAAAAAAAARZ2VuZXJpYy53YWl0d2hpbGUWZmFjdG9yeS5tYWNoaW5lLmFjdGl2ZQhjb25zdGFudAQGY3V0dGVyD2ZhY3RvcnkucHJvZHVjZQhjb25zdGFudAQDcm9kDmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyC2RvdWJsZS5jZWlsEWFyaXRobWV0aWMuZG91YmxlEGxvY2FsLmRvdWJsZS5nZXQIY29uc3RhbnQEC25lZWRfc2NyZXdzCGNvbnN0YW50BAEvCGNvbnN0YW50AwAAAAAAABBACGNvbnN0YW50BAZjdXR0ZXIRZ2VuZXJpYy53YWl0d2hpbGUWZmFjdG9yeS5tYWNoaW5lLmFjdGl2ZQhjb25zdGFudAQGY3V0dGVyEWdlbmVyaWMud2FpdHdoaWxlFmZhY3RvcnkubWFjaGluZS5hY3RpdmUIY29uc3RhbnQEBnNoYXBlcg5nbG9iYWwuaW50LnNldAhjb25zdGFudAQMY3JhZnQyX3N0YXRlDmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAxjcmFmdDJfc3RhdGUIY29uc3RhbnQEASsIY29uc3RhbnQCCAAAAA==",
"D0ZBQ1RPUllfQ1JBRlRfMwAAAAAAAAAABgAAAA5nbG9iYWwuaW50LnNldAhjb25zdGFudAQMY3JhZnQzX3N0YXRlCGNvbnN0YW50AgEAAAATZ2VuZXJpYy5leGVjdXRlc3luYwhjb25zdGFudAQPZmFjdG9yeV9jcmFmdF8yD2dlbmVyaWMuZXhlY3V0ZQhjb25zdGFudAQWZmFjdG9yeV9jcmFmdF8zX3BsYXRlcw9nZW5lcmljLmV4ZWN1dGUIY29uc3RhbnQEFWZhY3RvcnlfY3JhZnRfM19yaW5ncxFnZW5lcmljLndhaXR1bnRpbA5jb21wYXJpc29uLmludA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQMY3JhZnQyX3N0YXRlCGNvbnN0YW50BAI9PQhjb25zdGFudAIHAAAADWZhY3RvcnkuY3JhZnQIY29uc3RhbnQEBHB1bXAOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIRZ2xvYmFsLmRvdWJsZS5nZXQIY29uc3RhbnQEBWNvdW50",
"FkZBQ1RPUllfQ1JBRlRfM19wbGF0ZXMAAAAAAAAAAAsAAAAQbG9jYWwuZG91YmxlLnNldAhjb25zdGFudAQGdGFyZ2V0EWFyaXRobWV0aWMuZG91YmxlEWdsb2JhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAVjb3VudAhjb25zdGFudAQBKghjb25zdGFudAMAAAAAAAAAQA5nZW5lcmljLmdvdG9pZghjb25zdGFudAIGAAAAEWNvbXBhcmlzb24uZG91YmxlE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEBXBsYXRlDmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAI+PRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAZ0YXJnZXQRZ2VuZXJpYy53YWl0d2hpbGUWZmFjdG9yeS5tYWNoaW5lLmFjdGl2ZQhjb25zdGFudAQHcHJlc3Nlcg9mYWN0b3J5LnByb2R1Y2UIY29uc3RhbnQEBWluZ290Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyEWFyaXRobWV0aWMuZG91YmxlEGxvY2FsLmRvdWJsZS5nZXQIY29uc3RhbnQEBnRhcmdldAhjb25zdGFudAQBLRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BAVwbGF0ZQ5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQHcHJlc3NlchFnZW5lcmljLndhaXR3aGlsZRZmYWN0b3J5Lm1hY2hpbmUuYWN0aXZlCGNvbnN0YW50BAdwcmVzc2VyEGxvY2FsLmRvdWJsZS5zZXQIY29uc3RhbnQEBnRhcmdldBFhcml0aG1ldGljLmRvdWJsZRFnbG9iYWwuZG91YmxlLmdldAhjb25zdGFudAQFY291bnQIY29uc3RhbnQEASoIY29uc3RhbnQDAAAAAAAAEEAOZ2VuZXJpYy5nb3RvaWYIY29uc3RhbnQCCwAAABFjb21wYXJpc29uLmRvdWJsZRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BAxwbGF0ZS5ydWJiZXIIY29uc3RhbnQCAQAAAAhjb25zdGFudAQCPj0QbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQGdGFyZ2V0EWdlbmVyaWMud2FpdHdoaWxlFmZhY3RvcnkubWFjaGluZS5hY3RpdmUIY29uc3RhbnQEB3ByZXNzZXIPZmFjdG9yeS5wcm9kdWNlCGNvbnN0YW50BAZydWJiZXIIY29uc3RhbnQCAQAAABFhcml0aG1ldGljLmRvdWJsZRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAZ0YXJnZXQIY29uc3RhbnQEAS0TZmFjdG9yeS5pdGVtcy5jb3VudAhjb25zdGFudAQMcGxhdGUucnViYmVyCGNvbnN0YW50AgEAAAAIY29uc3RhbnQEB3ByZXNzZXIRZ2VuZXJpYy53YWl0d2hpbGUWZmFjdG9yeS5tYWNoaW5lLmFjdGl2ZQhjb25zdGFudAQHcHJlc3Nlcg5nbG9iYWwuaW50LnNldAhjb25zdGFudAQMY3JhZnQzX3N0YXRlDmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAxjcmFmdDNfc3RhdGUIY29uc3RhbnQEASsIY29uc3RhbnQCAgAAAA==",
"FUZBQ1RPUllfQ1JBRlRfM19yaW5ncwAAAAAAAAAACQAAABBsb2NhbC5kb3VibGUuc2V0CGNvbnN0YW50BAZ0YXJnZXQRYXJpdGhtZXRpYy5kb3VibGURZ2xvYmFsLmRvdWJsZS5nZXQIY29uc3RhbnQEBWNvdW50CGNvbnN0YW50BAEqCGNvbnN0YW50AwAAAAAAAABADmdlbmVyaWMuZ290b2lmCGNvbnN0YW50AgkAAAARY29tcGFyaXNvbi5kb3VibGUTZmFjdG9yeS5pdGVtcy5jb3VudAhjb25zdGFudAQEcmluZw5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQCPj0QbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQGdGFyZ2V0DmdlbmVyaWMuZ290b2lmCGNvbnN0YW50AgYAAAARY29tcGFyaXNvbi5kb3VibGUTZmFjdG9yeS5pdGVtcy5jb3VudAhjb25zdGFudAQDcm9kDmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAI+PRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAZ0YXJnZXQRZ2VuZXJpYy53YWl0d2hpbGUWZmFjdG9yeS5tYWNoaW5lLmFjdGl2ZQhjb25zdGFudAQGc2hhcGVyD2ZhY3RvcnkucHJvZHVjZQhjb25zdGFudAQFaW5nb3QOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXILZG91YmxlLmNlaWwRYXJpdGhtZXRpYy5kb3VibGURYXJpdGhtZXRpYy5kb3VibGUQbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQGdGFyZ2V0CGNvbnN0YW50BAEtE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEA3JvZA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQBLwhjb25zdGFudAMAAAAAAAAAQAhjb25zdGFudAQGc2hhcGVyEWdlbmVyaWMud2FpdHdoaWxlFmZhY3RvcnkubWFjaGluZS5hY3RpdmUIY29uc3RhbnQEBnNoYXBlcg9mYWN0b3J5LnByb2R1Y2UIY29uc3RhbnQEA3JvZA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllchFhcml0aG1ldGljLmRvdWJsZRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAZ0YXJnZXQIY29uc3RhbnQEAS0TZmFjdG9yeS5pdGVtcy5jb3VudAhjb25zdGFudAQEcmluZw5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQGc2hhcGVyEWdlbmVyaWMud2FpdHdoaWxlFmZhY3RvcnkubWFjaGluZS5hY3RpdmUIY29uc3RhbnQEBnNoYXBlcg5nbG9iYWwuaW50LnNldAhjb25zdGFudAQMY3JhZnQyX3N0YXRlDmFyaXRobWV0aWMuaW50Dmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAxjcmFmdDJfc3RhdGUIY29uc3RhbnQEASsIY29uc3RhbnQCBAAAAA==",
"D0ZBQ1RPUllfQ1JBRlRfNAAAAAAAAAAABQAAAA5nbG9iYWwuaW50LnNldAhjb25zdGFudAQMY3JhZnQ0X3N0YXRlCGNvbnN0YW50AgEAAAAPZ2VuZXJpYy5leGVjdXRlCGNvbnN0YW50BBZmYWN0b3J5X2NyYWZ0XzRfY2FibGVzD2dlbmVyaWMuZXhlY3V0ZQhjb25zdGFudAQWZmFjdG9yeV9jcmFmdF80X3J1YmJlchFnZW5lcmljLndhaXR1bnRpbA5jb21wYXJpc29uLmludA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQMY3JhZnQ0X3N0YXRlCGNvbnN0YW50BAI9PQhjb25zdGFudAIHAAAADWZhY3RvcnkuY3JhZnQIY29uc3RhbnQED2NhYmxlLmluc3VsYXRlZA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllchFnbG9iYWwuZG91YmxlLmdldAhjb25zdGFudAQFY291bnQ=",
"FkZBQ1RPUllfQ1JBRlRfNF9jYWJsZXMAAAAAAAAAAAcAAAAQbG9jYWwuZG91YmxlLnNldAhjb25zdGFudAQGdGFyZ2V0CmRvdWJsZS5tYXgKZG91YmxlLm1heAhjb25zdGFudAMAAAAAAADwPxFhcml0aG1ldGljLmRvdWJsZQNpMmQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEAS0IY29uc3RhbnQDAAAAAAAAAEAKZG91YmxlLm1heBFhcml0aG1ldGljLmRvdWJsZQhjb25zdGFudAMAAAAAAAAkQAhjb25zdGFudAQBLRFhcml0aG1ldGljLmRvdWJsZQhjb25zdGFudAMAAAAAAAAUQAhjb25zdGFudAQBKhFhcml0aG1ldGljLmRvdWJsZRFhcml0aG1ldGljLmRvdWJsZQNpMmQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEAS0IY29uc3RhbnQDAAAAAAAAIEAIY29uc3RhbnQEA3Bvdwhjb25zdGFudAMAAAAAAAAAQAtkb3VibGUuY2VpbBFhcml0aG1ldGljLmRvdWJsZRFhcml0aG1ldGljLmRvdWJsZRFhcml0aG1ldGljLmRvdWJsZQNpMmQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEAS0IY29uc3RhbnQDAAAAAAAA8D8IY29uc3RhbnQEA3Bvdwhjb25zdGFudAMAAAAAAAD4Pwhjb25zdGFudAQBLQhjb25zdGFudAMAAAAAAAAmQBBsb2NhbC5kb3VibGUuc2V0CGNvbnN0YW50BAZ0YXJnZXQRYXJpdGhtZXRpYy5kb3VibGUQbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQGdGFyZ2V0CGNvbnN0YW50BAEqEWdsb2JhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAVjb3VudA5nZW5lcmljLmdvdG9pZghjb25zdGFudAIHAAAAEWNvbXBhcmlzb24uZG91YmxlE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEBWNhYmxlDmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAI+PRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAZ0YXJnZXQRZ2VuZXJpYy53YWl0d2hpbGUWZmFjdG9yeS5tYWNoaW5lLmFjdGl2ZQhjb25zdGFudAQIcmVmaW5lcnkPZmFjdG9yeS5wcm9kdWNlCGNvbnN0YW50BAVpbmdvdA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcgtkb3VibGUuY2VpbBFhcml0aG1ldGljLmRvdWJsZRFhcml0aG1ldGljLmRvdWJsZRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAZ0YXJnZXQIY29uc3RhbnQEAS0TZmFjdG9yeS5pdGVtcy5jb3VudAhjb25zdGFudAQFY2FibGUOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEBHRpZXIIY29uc3RhbnQEAS8IY29uc3RhbnQDAAAAAAAAAEAIY29uc3RhbnQECHJlZmluZXJ5EWdlbmVyaWMud2FpdHdoaWxlFmZhY3RvcnkubWFjaGluZS5hY3RpdmUIY29uc3RhbnQECHJlZmluZXJ5Dmdsb2JhbC5pbnQuc2V0CGNvbnN0YW50BAxjcmFmdDRfc3RhdGUOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEDGNyYWZ0NF9zdGF0ZQhjb25zdGFudAQBKwhjb25zdGFudAICAAAA",

"FkZBQ1RPUllfQ1JBRlRfNF9ydWJiZXIAAAAAAAAAAAcAAAAQbG9jYWwuZG91YmxlLnNldAhjb25zdGFudAQGdGFyZ2V0CmRvdWJsZS5tYXgIY29uc3RhbnQDAAAAAAAAAAARYXJpdGhtZXRpYy5kb3VibGURYXJpdGhtZXRpYy5kb3VibGURYXJpdGhtZXRpYy5kb3VibGUIY29uc3RhbnQDAAAAAAAAAEAIY29uc3RhbnQEASoDaTJkDmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAEtCGNvbnN0YW50AwAAAAAAABBACGNvbnN0YW50BAEtCmRvdWJsZS5tYXgIY29uc3RhbnQDAAAAAAAAAAARYXJpdGhtZXRpYy5kb3VibGUIY29uc3RhbnQDAAAAAAAAAEAIY29uc3RhbnQEAS0RYXJpdGhtZXRpYy5kb3VibGURYXJpdGhtZXRpYy5kb3VibGUDaTJkDmdsb2JhbC5pbnQuZ2V0CGNvbnN0YW50BAR0aWVyCGNvbnN0YW50BAEtCGNvbnN0YW50AwAAAAAAACBACGNvbnN0YW50BAEqEWFyaXRobWV0aWMuZG91YmxlA2kyZA5nbG9iYWwuaW50LmdldAhjb25zdGFudAQEdGllcghjb25zdGFudAQBLQhjb25zdGFudAMAAAAAAAAiQBBsb2NhbC5kb3VibGUuc2V0CGNvbnN0YW50BAZ0YXJnZXQRYXJpdGhtZXRpYy5kb3VibGUQbG9jYWwuZG91YmxlLmdldAhjb25zdGFudAQGdGFyZ2V0CGNvbnN0YW50BAEqEWdsb2JhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAVjb3VudA5nZW5lcmljLmdvdG9pZghjb25zdGFudAIHAAAAEWNvbXBhcmlzb24uZG91YmxlE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEDHBsYXRlLnJ1YmJlcghjb25zdGFudAIBAAAACGNvbnN0YW50BAI+PRBsb2NhbC5kb3VibGUuZ2V0CGNvbnN0YW50BAZ0YXJnZXQRZ2VuZXJpYy53YWl0d2hpbGUWZmFjdG9yeS5tYWNoaW5lLmFjdGl2ZQhjb25zdGFudAQHcHJlc3Nlcg9mYWN0b3J5LnByb2R1Y2UIY29uc3RhbnQEBnJ1YmJlcghjb25zdGFudAIBAAAAEWFyaXRobWV0aWMuZG91YmxlEGxvY2FsLmRvdWJsZS5nZXQIY29uc3RhbnQEBnRhcmdldAhjb25zdGFudAQBLRNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BAxwbGF0ZS5ydWJiZXIIY29uc3RhbnQCAQAAAAhjb25zdGFudAQHcHJlc3NlchFnZW5lcmljLndhaXR3aGlsZRZmYWN0b3J5Lm1hY2hpbmUuYWN0aXZlCGNvbnN0YW50BAdwcmVzc2VyDmdsb2JhbC5pbnQuc2V0CGNvbnN0YW50BAxjcmFmdDRfc3RhdGUOYXJpdGhtZXRpYy5pbnQOZ2xvYmFsLmludC5nZXQIY29uc3RhbnQEDGNyYWZ0NF9zdGF0ZQhjb25zdGFudAQBKwhjb25zdGFudAIEAAAA",
"BHRlc3QAAAAAAwAAABJ0b3duLndpbmRvdy5pc29wZW4IY29uc3RhbnQEBm11c2V1bRJ0b3duLndpbmRvdy5pc29wZW4IY29uc3RhbnQEBmFyY2FkZRJ0b3duLndpbmRvdy5pc29wZW4IY29uc3RhbnQECHdvcmtzaG9wDgAAAA1mYWN0b3J5LmNyYWZ0CGNvbnN0YW50BBFwcm9kdWNlci5zaGlweWFyZAhjb25zdGFudAIBAAAACGNvbnN0YW50AwAAAAAAAPA/DWZhY3RvcnkuY3JhZnQIY29uc3RhbnQEFnByb2R1Y2VyLnN0YXR1ZW9mY3Vib3MIY29uc3RhbnQCAQAAAAhjb25zdGFudAMAAAAAAADwPw1mYWN0b3J5LmNyYWZ0CGNvbnN0YW50BA1wcm9kdWNlci5nZW1zCGNvbnN0YW50AgEAAAAIY29uc3RhbnQDAAAAAAAA8D8NZmFjdG9yeS5jcmFmdAhjb25zdGFudAQTcHJvZHVjZXIuZXhvdGljZ2Vtcwhjb25zdGFudAIBAAAACGNvbnN0YW50AwAAAAAAAPA/DWZhY3RvcnkuY3JhZnQIY29uc3RhbnQEDG1hY2hpbmUub3Zlbghjb25zdGFudAIBAAAACGNvbnN0YW50AwAAAAAAAPA/DWZhY3RvcnkuY3JhZnQIY29uc3RhbnQED21hY2hpbmUucHJlc3Nlcghjb25zdGFudAIBAAAACGNvbnN0YW50AwAAAAAAAPA/DWZhY3RvcnkuY3JhZnQIY29uc3RhbnQEFW1hY2hpbmUudHJhbnNwb3J0YmVsdAhjb25zdGFudAIBAAAACGNvbnN0YW50AwAAAAAAAPA/DWZhY3RvcnkuY3JhZnQIY29uc3RhbnQED21hY2hpbmUuY3J1c2hlcghjb25zdGFudAIBAAAACGNvbnN0YW50AwAAAAAAAPA/DWZhY3RvcnkuY3JhZnQIY29uc3RhbnQEDW1hY2hpbmUubWl4ZXIIY29uc3RhbnQCAQAAAAhjb25zdGFudAMAAAAAAADwPw1mYWN0b3J5LmNyYWZ0CGNvbnN0YW50BBBtYWNoaW5lLnJlZmluZXJ5CGNvbnN0YW50AgEAAAAIY29uc3RhbnQDAAAAAAAA8D8NZmFjdG9yeS5jcmFmdAhjb25zdGFudAQRbWFjaGluZS5hc3NlbWJsZXIIY29uc3RhbnQCAQAAAAhjb25zdGFudAMAAAAAAADwPw1mYWN0b3J5LmNyYWZ0CGNvbnN0YW50BA5tYWNoaW5lLnNoYXBlcghjb25zdGFudAIBAAAACGNvbnN0YW50AwAAAAAAAPA/DWZhY3RvcnkuY3JhZnQIY29uc3RhbnQEDm1hY2hpbmUuY3V0dGVyCGNvbnN0YW50AgEAAAAIY29uc3RhbnQDAAAAAAAA8D8NZmFjdG9yeS5jcmFmdAhjb25zdGFudAQObWFjaGluZS5ib2lsZXIIY29uc3RhbnQCAQAAAAhjb25zdGFudAMAAAAAAADwPw==",
"BHRlc3QAAAAAAAAAAAoAAAAPZmFjdG9yeS5wcm9kdWNlCGNvbnN0YW50BAZydWJiZXIIY29uc3RhbnQCAQAAAAhjb25zdGFudAMAAAAAAADwPwhjb25zdGFudAQEb3Zlbg9mYWN0b3J5LnByb2R1Y2UIY29uc3RhbnQEA29yZQhjb25zdGFudAIBAAAACGNvbnN0YW50AwAAAAAAAPA/CGNvbnN0YW50BAlhc3NlbWJsZXIPZmFjdG9yeS5wcm9kdWNlCGNvbnN0YW50BARkdXN0CGNvbnN0YW50AgEAAAAIY29uc3RhbnQDAAAAAAAA8D8IY29uc3RhbnQECHJlZmluZXJ5D2ZhY3RvcnkucHJvZHVjZQhjb25zdGFudAQFaW5nb3QIY29uc3RhbnQCAQAAAAhjb25zdGFudAMAAAAAAADwPwhjb25zdGFudAQHY3J1c2hlcg9mYWN0b3J5LnByb2R1Y2UIY29uc3RhbnQEC3BsYXRlLnN0YWNrCGNvbnN0YW50AgEAAAAIY29uc3RhbnQDAAAAAAAA8D8IY29uc3RhbnQEBmN1dHRlcg9mYWN0b3J5LnByb2R1Y2UIY29uc3RhbnQEA3JvZAhjb25zdGFudAIBAAAACGNvbnN0YW50AwAAAAAAAPA/CGNvbnN0YW50BAdwcmVzc2VyD2ZhY3RvcnkucHJvZHVjZQhjb25zdGFudAQFcGxhdGUIY29uc3RhbnQCAQAAAAhjb25zdGFudAMAAAAAAADwPwhjb25zdGFudAQFbWl4ZXIPZmFjdG9yeS5wcm9kdWNlCGNvbnN0YW50BAVjYWJsZQhjb25zdGFudAIBAAAACGNvbnN0YW50AwAAAAAAAPA/CGNvbnN0YW50BAZzaGFwZXIPZmFjdG9yeS5wcm9kdWNlCGNvbnN0YW50BARsdW1wCGNvbnN0YW50AgEAAAAIY29uc3RhbnQDAAAAAAAA8D8IY29uc3RhbnQEBmJvaWxlcg9mYWN0b3J5LnByb2R1Y2UIY29uc3RhbnQEBWJsb2NrCGNvbnN0YW50AgEAAAAIY29uc3RhbnQDAAAAAAAA8D8IY29uc3RhbnQEBG92ZW4=",
"BHRlc3QAAAAAAAAAAAkAAAARZ2xvYmFsLmRvdWJsZS5zZXQIY29uc3RhbnQEABNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BAtibG9jay5kZW5zZQhjb25zdGFudAIBAAAAEWdsb2JhbC5kb3VibGUuc2V0CGNvbnN0YW50BAATZmFjdG9yeS5pdGVtcy5jb3VudAhjb25zdGFudAQLcGxhdGUuZGVuc2UIY29uc3RhbnQCAQAAABFnbG9iYWwuZG91YmxlLnNldAhjb25zdGFudAQAE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEBXNjcmV3CGNvbnN0YW50AgEAAAARZ2xvYmFsLmRvdWJsZS5zZXQIY29uc3RhbnQEABNmYWN0b3J5Lml0ZW1zLmNvdW50CGNvbnN0YW50BAxwbGF0ZS5ydWJiZXIIY29uc3RhbnQCAQAAABFnbG9iYWwuZG91YmxlLnNldAhjb25zdGFudAQAE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEDXBsYXRlLmNpcmN1aXQIY29uc3RhbnQCAQAAABFnbG9iYWwuZG91YmxlLnNldAhjb25zdGFudAQAE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEBHJpbmcIY29uc3RhbnQCAQAAABFnbG9iYWwuZG91YmxlLnNldAhjb25zdGFudAQAE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEBHBpcGUIY29uc3RhbnQCAQAAABFnbG9iYWwuZG91YmxlLnNldAhjb25zdGFudAQAE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEBHdpcmUIY29uc3RhbnQCAQAAABFnbG9iYWwuZG91YmxlLnNldAhjb25zdGFudAQAE2ZhY3RvcnkuaXRlbXMuY291bnQIY29uc3RhbnQEB2NpcmN1aXQIY29uc3RhbnQCAQAAAA==",
"BHRlc3QAAAAAAAAAAA0AAAAQdG93bi53aW5kb3cuc2hvdwhjb25zdGFudAQMdG93ZXJ0ZXN0aW5nCGNvbnN0YW50AQEQdG93bi53aW5kb3cuc2hvdwhjb25zdGFudAQLdHJhZGluZ3Bvc3QIY29uc3RhbnQBARB0b3duLndpbmRvdy5zaG93CGNvbnN0YW50BApwb3dlcnBsYW50CGNvbnN0YW50AQEQdG93bi53aW5kb3cuc2hvdwhjb25zdGFudAQHZmFjdG9yeQhjb25zdGFudAEBEHRvd24ud2luZG93LnNob3cIY29uc3RhbnQECmxhYm9yYXRvcnkIY29uc3RhbnQBARB0b3duLndpbmRvdy5zaG93CGNvbnN0YW50BAhzaGlweWFyZAhjb25zdGFudAEBEHRvd24ud2luZG93LnNob3cIY29uc3RhbnQECHdvcmtzaG9wCGNvbnN0YW50AQEQdG93bi53aW5kb3cuc2hvdwhjb25zdGFudAQGYXJjYWRlCGNvbnN0YW50AQEQdG93bi53aW5kb3cuc2hvdwhjb25zdGFudAQGbXVzZXVtCGNvbnN0YW50AQEQdG93bi53aW5kb3cuc2hvdwhjb25zdGFudAQMaGVhZHF1YXJ0ZXJzCGNvbnN0YW50AQEQdG93bi53aW5kb3cuc2hvdwhjb25zdGFudAQQY29uc3RydWN0aW9uZmlybQhjb25zdGFudAEBEHRvd24ud2luZG93LnNob3cIY29uc3RhbnQEDXN0YXR1ZW9mY3Vib3MIY29uc3RhbnQBARB0b3duLndpbmRvdy5zaG93CGNvbnN0YW50BARtaW5lCGNvbnN0YW50AQE=",
"BFRlc3QAAAAAAAAAAAEAAAAQbG9jYWwuZG91YmxlLnNldAhjb25zdGFudAQBaQhjb25zdGFudAMzp6jVI/ZJOQ==",
"BHRlc3QAAAAAAAAAAAEAAAAMZ2VuZXJpYy53YWl0CGNvbnN0YW50AwAAAAAAAPB/",
"BHRlc3QAAAAAAAAAAAEAAAAMZ2VuZXJpYy53YWl0CGNvbnN0YW50AwAAAAAAAPD/",
"BHRlc3QAAAAAAAAAAAEAAAAMZ2VuZXJpYy53YWl0CGNvbnN0YW50AwAAAAAAAPj/",
"BHRlc3QAAAAAAAAAAAEAAAAMZ2VuZXJpYy53YWl0EWFyaXRobWV0aWMuZG91YmxlCGNvbnN0YW50AwAAAAAAAAAACGNvbnN0YW50BAR0ZXN0CGNvbnN0YW50AwAAAAAAAAAA",
"BHRlc3QAAAAAAAAAAAEAAAAObG9jYWwudmVjMi5zZXQIY29uc3RhbnQEA2Jhcghjb25zdGFudAUAAIBAAACAPw==",
"BHRlc3QAAAAAAAAAAAEAAAAMZ2VuZXJpYy5zdG9wCGNvbnN0YW50BAN7YX0=",
"BHRlc3QAAAAAAAAAAAEAAAAMZ2VuZXJpYy5zdG9wCGNvbnN0YW50BIYHAAECAwQFBgcICQoLDA0ODxAREhMUFRYXGBkaGxwdHh8gISIjJCUmJygpKissLS4vMDEyMzQ1Njc4OTo7PD0+P0BBQkNERUZHSElKS0xNTk9QUVJTVFVWV1hZWltcXV5fYGFiY2RlZmdoaWprbG1ub3BxcnN0dXZ3eHl6e3x9fn/CgMKBwoLCg8KEwoXChsKHwojCicKKwovCjMKNwo7Cj8KQwpHCksKTwpTClcKWwpfCmMKZwprCm8Kcwp3CnsKfwqDCocKiwqPCpMKlwqbCp8KowqnCqsKrwqzCrcKuwq/CsMKxwrLCs8K0wrXCtsK3wrjCucK6wrvCvMK9wr7Cv8OAw4HDgsODw4TDhcOGw4fDiMOJw4rDi8OMw43DjsOPw5DDkcOSw5PDlMOVw5bDl8OYw5nDmsObw5zDncOew5/DoMOhw6LDo8Okw6XDpsOnw6jDqcOqw6vDrMOtw67Dr8Oww7HDssOzw7TDtcO2w7fDuMO5w7rDu8O8w73DvsO/xIDEgcSCxIPEhMSFxIbEh8SIxInEisSLxIzEjcSOxI/EkMSRxJLEk8SUxJXElsSXxJjEmcSaxJvEnMSdxJ7En8SgxKHEosSjxKTEpcSmxKfEqMSpxKrEq8SsxK3ErsSvxLDEscSyxLPEtMS1xLbEt8S4xLnEusS7xLzEvcS+xL/FgMWBxYLFg8WExYXFhsWHxYjFicWKxYvFjMWNxY7Fj8WQxZHFksWTxZTFlcWWxZfFmMWZxZrFm8WcxZ3FnsWfxaDFocWixaPFpMWlxabFp8WoxanFqsWrxazFrcWuxa/FsMWxxbLFs8W0xbXFtsW3xbjFucW6xbvFvMW9xb7Fv8aAxoHGgsaDxoTGhcaGxofGiMaJxorGi8aMxo3GjsaPxpDGkcaSxpPGlMaVxpbGl8aYxpnGmsabxpzGncaexp/GoMahxqLGo8akxqXGpsanxqjGqcaqxqvGrMatxq7Gr8awxrHGssazxrTGtca2xrfGuMa5xrrGu8a8xr3Gvsa/x4DHgceCx4PHhMeFx4bHh8eIx4nHiseLx4zHjceOx4/HkMeRx5LHk8eUx5XHlseXx5jHmceax5vHnMedx57Hn8egx6HHosejx6THpcemx6fHqMepx6rHq8esx63Hrsevx7DHsceyx7PHtMe1x7bHt8e4x7nHuse7x7zHvce+x7/IgPCfmIA=",
"BHRlc3QAAAAAAAAAAAIAAAANbG9jYWwuaW50LnNldAhjb25zdGFudAQDZm9vCGNvbnN0YW50AgQAAAAOZ2xvYmFsLmludC5zZXQIY29uc3RhbnQEA2Zvbwhjb25zdGFudAIHAAAA",
  }
  local compile_tests = {macro_test = {[[
    ; Basic test of macros and macro functions
    #concat(a, b) {a}{b}
    #concat2(a, b) {lua(return [=[{a}]=] .. [=[{b}]=])}
    :global string res
    res = "{concat(1,2)}{co{concat2(ncat,)}(3,4")}
  ]], "Cm1hY3JvX3Rlc3QAAAAAAAAAAAEAAAARZ2xvYmFsLnN0cmluZy5zZXQIY29uc3RhbnQEA3Jlcwhjb25zdGFudAQEMTIzNA=="},
  imported = {[[
    ; This should compile to (almost) no code
    :local int acc
    :global string status
    #output status = "Number is: " . acc
  ]], "CGltcG9ydGVkAAAAAAAAAAAAAAAA"},
  import_test = {[[
    :import imported
    :import imported
    {output}
  ]], "C2ltcG9ydF90ZXN0AAAAAAAAAAABAAAAEWdsb2JhbC5zdHJpbmcuc2V0CGNvbnN0YW50BAZzdGF0dXMGY29uY2F0CGNvbnN0YW50BAtOdW1iZXIgaXM6IANpMnMNbG9jYWwuaW50LmdldAhjb25zdGFudAQDYWNj"},
  folding_test = {[[
    :global string test

    test = 1.."a"
    test = 1 ."a"
    test = 1 .""
    test = "a".1.
    test = "a".1
    test = "".1
  ]], "DGZvbGRpbmdfdGVzdAAAAAAAAAAABgAAABFnbG9iYWwuc3RyaW5nLnNldAhjb25zdGFudAQEdGVzdAhjb25zdGFudAQEMS4wYRFnbG9iYWwuc3RyaW5nLnNldAhjb25zdGFudAQEdGVzdAhjb25zdGFudAQCMWERZ2xvYmFsLnN0cmluZy5zZXQIY29uc3RhbnQEBHRlc3QIY29uc3RhbnQEATERZ2xvYmFsLnN0cmluZy5zZXQIY29uc3RhbnQEBHRlc3QIY29uc3RhbnQEBGExLjARZ2xvYmFsLnN0cmluZy5zZXQIY29uc3RhbnQEBHRlc3QIY29uc3RhbnQEAmExEWdsb2JhbC5zdHJpbmcuc2V0CGNvbnN0YW50BAR0ZXN0CGNvbnN0YW50BAEx"},
  lowercase_test = {[[
    software.toggle("software.criticalWavejump", true)
    craft("producer.constructionFirm", 1, 1.)
  ]], "Dmxvd2VyY2FzZV90ZXN0AAAAAAAAAAACAAAAD3NvZnR3YXJlLnRvZ2dsZQhjb25zdGFudAQZc29mdHdhcmUuY3JpdGljYWxXYXZlanVtcAhjb25zdGFudAEBDWZhY3RvcnkuY3JhZnQIY29uc3RhbnQEGXByb2R1Y2VyLmNvbnN0cnVjdGlvbkZpcm0IY29uc3RhbnQCAQAAAAhjb25zdGFudAMAAAAAAADwPw=="},
  parens_test = {[[
    goto({len( ( )}{len( ) )})
    waitframe({lua(return ")")}
  ]], "C3BhcmVuc190ZXN0AAAAAAAAAAACAAAADGdlbmVyaWMuZ290bwhjb25zdGFudAIhAAAAEWdlbmVyaWMud2FpdGZyYW1l"},
  multiline_test = {[=[
 :name multiline{lua( 
 return "_testà\n" 
 )}#l($v)={ #{lua({v})}t}{l(
return ({
a=[[concät(â, ÷) {[}â}{÷{]} 
 go]], 
b="nope",
})["a"]
)}{concät(
o {{concät(,
)}(}3,
4{{)}{concät(,
)}} )}
#macro2={
stop("\\\b\t\v\f\n\\
x00\x01\xc3\xa0\u00e0\U0000e0") ;Comment
}{macro2}

#noop={
{lua(
local table = {
a = 1,
b = false,
}
return table.b
)}}{noop}
#noop2(a) 
{noop2()\
}

#noop3(a)={
{a}
   }
:co{noop3()}{noop3(
)}{noop3(

   )\
}nst int foo 1
:const int bar 2{noop3(


   )}:const int baz 3
#part1 {lua(return "")}
#part2 {part1}{part1}{part1}{part1}{part1}{part1}{part1}{part1}{part1}{part1}
{part2}{part2}{part2}{part2}{part2}{part2}{part2}{part2}{part2}{part2}
]=], "EG11bHRpbGluZV90ZXN0w6AAAAAAAAAAAAIAAAAMZ2VuZXJpYy5nb3RvCGNvbnN0YW50AiIAAAAMZ2VuZXJpYy5zdG9wCGNvbnN0YW50BA5cCAkLDAoAAcOgw6DDoA=="},
  }
  local new_import_tests = {
    default_default = {{actions={}, conditions={}, impulses={}, name="test", package=""}, [[
:name test]], [[
{"actions":[],"conditions":[],"impulses":[],"name":"test","package":""}]]},
    default_0 = {{budget=0, actions={}, conditions={}, impulses={}, name="test", package=""}, [[
:name test]], [[
{"actions":[],"conditions":[],"impulses":[],"name":"test","package":""}]]},
    default_1 = {{budget=1, actions={}, conditions={}, impulses={}, name="test", package=""}, [[
:name test
:budget_cap 1
:use_budget default]], [[
{"actions":[],"conditions":[],"impulses":[],"name":"test","package":"","budget":1}]]},
    false_default = {{useBudget=false, actions={}, conditions={}, impulses={}, name="test", package=""}, [[
:name test]], [[
{"actions":[],"conditions":[],"impulses":[],"name":"test","package":""}]]},
    false_0 = {{useBudget=false, budget=0, actions={}, conditions={}, impulses={}, name="test", package=""}, [[
:name test]], [[
{"actions":[],"conditions":[],"impulses":[],"name":"test","package":""}]]},
    false_1 = {{useBudget=false, budget=1, actions={}, conditions={}, impulses={}, name="test", package=""}, [[
:name test
:budget_cap 1
:use_budget false]], [[
{"actions":[],"conditions":[],"impulses":[],"name":"test","package":"","budget":1,"useBudget":false}]]},
    true_default = {{useBudget=true, actions={}, conditions={}, impulses={}, name="test", package=""}, [[
:name test
:use_budget true]], [[
{"actions":[],"conditions":[],"impulses":[],"name":"test","package":"","useBudget":true}]]},
    true_0 = {{useBudget=true, budget=0, actions={}, conditions={}, impulses={}, name="test", package=""}, [[
:name test
:budget_cap 0]], [[
{"actions":[],"conditions":[],"impulses":[],"name":"test","package":"","budget":0,"useBudget":true}]]},
    true_1 = {{useBudget=true, budget=1, actions={}, conditions={}, impulses={}, name="test", package=""}, [[
:name test
:budget_cap 1]], [[
{"actions":[],"conditions":[],"impulses":[],"name":"test","package":"","budget":1,"useBudget":true}]]},
    high_bytes = {{actions={"\x11global.double.set\bconstant\x04\x03foo\bconstant\x03ÍÌÌÌÌÌô?"}, conditions={}, impulses={}, name="test", package=""}, [[
:name test

:global double foo

foo = 1.3]], [[
{"actions":["\u0011global.double.set\bconstant\u0004\u0003foo\bconstant\u0003ÍÌÌÌÌÌô?"],"conditions":[],"impulses":[],"name":"test","package":""}]]},
    constant_vector = {{actions={"\x0elocal.vec2.set\bconstant\x04\x03bar\bconstant\x05\0\0\x80?\0\0\0@"}, conditions={}, impulses={}, name="test", package=""}, [[
:name test

:local vector bar

bar = vec(1.0, 2.0)]], [[
{"actions":["\u000elocal.vec2.set\bconstant\u0004\u0003bar\bconstant\u0005\u0000\u0000€?\u0000\u0000\u0000@"],"conditions":[],"impulses":[],"name":"test","package":""}]]},
  }

  local status, ret

  local function importFunc(name)
    local v = compile_tests[name]
    if v then
      return true, v[1]
    end
    return false, (name .. " not found")
  end
  for useFast=0, 1 do
    local fm = useFast == 1
    for k, v in pairs(compile_tests) do
      status, ret = pcallCompile(k, v[1], {format="v0", fastMacro=fm}, importFunc)
      if not status then
        ret.msg = string.format("(fastMacro=%s) Failed to compile unit test %s\n\n%s", fm, k, ret.msg)
        error(ret)
      end
      assert(ret.code == v[2], string.format("(fastMacro=%s) Unit test %s failure! Expected:\n%s\nActual:\n%s", fm, k, v[2], ret.code))
    end
    for k, v in pairs(new_import_tests) do
      status, ret = pcall(import, v[1])
      assert(status, string.format("Failed to import unit test %s\n\n%s", k, ret))
      assert(ret[2] == v[2], string.format("Unit test %s import failure! Expected:\n%s\nActual:\n%s", k, v[2], ret[2]))

      status, ret = pcallCompile(ret[1], ret[2], {format="v2", fastMacro=fm}, importFunc)
      if not status then
        ret.msg = string.format("(fastMacro=%s) Failed to compile unit test %s\n\n%s", fm, k, ret.msg)
        error(ret)
      end
      assert(ret.code == v[3], string.format("(fastMacro=%s) Unit test %s compile failure! Expected:\n%s\nActual:\n%s", fm, k, v[3], ret.code))
    end
    for k, v in ipairs (import_tests) do
      status, ret = pcall(import, v)
      assert(status, string.format("Failed to import unit test #%s\n\n%s", k, ret))

      status, ret = pcallCompile(ret[1], ret[2], {format="v0", fastMacro=fm}, importFunc)
      if not status then
        ret.msg = string.format("(fastMacro=%s) Failed to compile unit test %s\n\n%s", fm, k, ret.msg)
        error(ret)
      end

      assert(ret.code == v, string.format("(fastMacro=%s) Failed to match unit test #%s\n\n%s\n\n%s\n\n%s\n\n%s", fm, k, v, ret.code, base64.decode(v), base64.decode(ret.code)))
    end
  end
  return true
end