aboutsummaryrefslogtreecommitdiff
ModeNameSize
-rw-r--r--.build.yml1369logplain
-rw-r--r--.dir-locals.el177logplain
-rw-r--r--.gitignore96logplain
-rw-r--r--README.md2770logplain
d---------advtrains1551logplain
d---------advtrains_interlocking704logplain
d---------advtrains_itrainmap107logplain
d---------advtrains_line_automation313logplain
d---------advtrains_luaautomation574logplain
d---------advtrains_signals_ks222logplain
d---------advtrains_train_track184logplain
d---------assets1900logplain
-rw-r--r--atc_command.txt3489logplain
-rw-r--r--description.txt145logplain
-rw-r--r--license.txt32367logplain
-rw-r--r--license_media.txt20744logplain
-rw-r--r--modpack.conf214logplain
-rw-r--r--privilege_guide.txt2273logplain
-rw-r--r--screenshot.png809738logplain
d---------serialize_lib336logplain
an>(str, pos) local _, spos = string.find(str, [[^%s*"]], pos) if not spos then return nil end local ipos = spos while true do local _, epos, m = string.find(str, [[(\*)"]], ipos+1) if not epos then return error("String extends beyond the end of input") end ipos = epos if #m % 2 == 0 then return unescape_string(string.sub(str, spos+1, epos-1)), epos+1 end end end local function readstring(str, pos) local st = {} local nxt = pos while true do local s, npos = readstring_aux(str, nxt) if not s then if not st[1] then return nil, nxt else return table.concat(st), nxt end end nxt = npos table.insert(st, s) end end local function readtoken(str, pos) local _, epos, tok = string.find(str, [[^%s*(%S+)]], pos) if epos == nil then return nil, pos end return tok, epos+1 end local function readcomment_add_flags(flags, s) for flag in string.gmatch(s, ",%s*([^,]+)") do flags[flag] = true end end local function readcomment_aux(str, pos) local _, epos, sval = string.find(str, "^[\r\n]*#([^\r\n]*)", pos) if not epos then return nil end return sval, epos+1 end local function readcomment(str, pos) local st = {} local nxt = pos local flags = {} while true do local s, npos = readcomment_aux(str, nxt) if not npos then local t = { comment = table.concat(st, "\n"), flags = flags, } return t, nxt end if string.sub(s, 1, 1) == "," then readcomment_add_flags(flags, s) end table.insert(st, s) nxt = npos end end local function readpo(str) local st = {} local pos = 1 while true do local entry, nxt = readcomment(str, pos) local msglines = 0