1 files changed, 140 insertions, 140 deletions
diff --git a/tex/context/base/luat-fmt.lua b/tex/context/base/luat-fmt.lua
index 2eb5b89c9..20a4a8fcd 100644
--- a/tex/context/base/luat-fmt.lua
+++ b/tex/context/base/luat-fmt.lua
@@ -1,140 +1,140 @@
-if not modules then modules = { } end modules ['luat-fmt'] = {
-    version   = 1.001,
-    comment   = "companion to mtxrun",
-    author    = "Hans Hagen, PRAGMA-ADE, Hasselt NL",
-    copyright = "PRAGMA ADE / ConTeXt Development Team",
-    license   = "see context related readme files"
-}
-
-local format = string.format
-local concat = table.concat
-local quoted = string.quoted
-local luasuffixes = utilities.lua.suffixes
-
-local report_format = logs.reporter("resolvers","formats")
-
-local function primaryflags() -- not yet ok
-    local trackers   = environment.argument("trackers")
-    local directives = environment.argument("directives")
-    local flags = { }
-    if trackers and trackers ~= "" then
-        flags = { "--trackers=" .. quoted(trackers) }
-    end
-    if directives and directives ~= "" then
-        flags = { "--directives=" .. quoted(directives) }
-    end
-    if environment.argument("jit") then
-        flags = { "--jiton" }
-    end
-    return concat(flags," ")
-end
-
-function environment.make_format(name)
-    local engine = environment.ownmain or "luatex"
-    -- change to format path (early as we need expanded paths)
-    local olddir = dir.current()
-    local path = caches.getwritablepath("formats",engine) or "" -- maybe platform
-    if path ~= "" then
-        lfs.chdir(path)
-    end
-    report_format("using format path %a",dir.current())
-    -- check source file
-    local texsourcename = file.addsuffix(name,"mkiv")
-    local fulltexsourcename = resolvers.findfile(texsourcename,"tex") or ""
-    if fulltexsourcename == "" then
-        texsourcename = file.addsuffix(name,"tex")
-        fulltexsourcename = resolvers.findfile(texsourcename,"tex") or ""
-    end
-    if fulltexsourcename == "" then
-        report_format("no tex source file with name %a (mkiv or tex)",name)
-        lfs.chdir(olddir)
-        return
-    else
-        report_format("using tex source file %a",fulltexsourcename)
-    end
-    local texsourcepath = dir.expandname(file.dirname(fulltexsourcename)) -- really needed
-    -- check specification
-    local specificationname = file.replacesuffix(fulltexsourcename,"lus")
-    local fullspecificationname = resolvers.findfile(specificationname,"tex") or ""
-    if fullspecificationname == "" then
-        specificationname = file.join(texsourcepath,"context.lus")
-        fullspecificationname = resolvers.findfile(specificationname,"tex") or ""
-    end
-    if fullspecificationname == "" then
-        report_format("unknown stub specification %a",specificationname)
-        lfs.chdir(olddir)
-        return
-    end
-    local specificationpath = file.dirname(fullspecificationname)
-    -- load specification
-    local usedluastub = nil
-    local usedlualibs = dofile(fullspecificationname)
-    if type(usedlualibs) == "string" then
-        usedluastub = file.join(file.dirname(fullspecificationname),usedlualibs)
-    elseif type(usedlualibs) == "table" then
-        report_format("using stub specification %a",fullspecificationname)
-        local texbasename = file.basename(name)
-        local luastubname = file.addsuffix(texbasename,luasuffixes.lua)
-        local lucstubname = file.addsuffix(texbasename,luasuffixes.luc)
-        -- pack libraries in stub
-        report_format("creating initialization file %a",luastubname)
-        utilities.merger.selfcreate(usedlualibs,specificationpath,luastubname)
-        -- compile stub file (does not save that much as we don't use this stub at startup any more)
-        if utilities.lua.compile(luastubname,lucstubname) and lfs.isfile(lucstubname) then
-            report_format("using compiled initialization file %a",lucstubname)
-            usedluastub = lucstubname
-        else
-            report_format("using uncompiled initialization file %a",luastubname)
-            usedluastub = luastubname
-        end
-    else
-        report_format("invalid stub specification %a",fullspecificationname)
-        lfs.chdir(olddir)
-        return
-    end
-    -- generate format
-    local command = format("%s --ini %s --lua=%s %s %sdump",engine,primaryflags(),quoted(usedluastub),quoted(fulltexsourcename),os.platform == "unix" and "\\\\" or "\\")
-    report_format("running command: %s\n",command)
-    os.spawn(command)
-    -- remove related mem files
-    local pattern = file.removesuffix(file.basename(usedluastub)).."-*.mem"
- -- report_format("removing related mplib format with pattern %a", pattern)
-    local mp = dir.glob(pattern)
-    if mp then
-        for i=1,#mp do
-            local name = mp[i]
-            report_format("removing related mplib format %a", file.basename(name))
-            os.remove(name)
-        end
-    end
-    lfs.chdir(olddir)
-end
-
-function environment.run_format(name,data,more)
-    if name and name ~= "" then
-        local engine = environment.ownmain or "luatex"
-        local barename = file.removesuffix(name)
-        local fmtname = caches.getfirstreadablefile(file.addsuffix(barename,"fmt"),"formats",engine)
-        if fmtname == "" then
-            fmtname = resolvers.findfile(file.addsuffix(barename,"fmt")) or ""
-        end
-        fmtname = resolvers.cleanpath(fmtname)
-        if fmtname == "" then
-            report_format("no format with name %a",name)
-        else
-            local barename = file.removesuffix(name) -- expanded name
-            local luaname = file.addsuffix(barename,"luc")
-            if not lfs.isfile(luaname) then
-                luaname = file.addsuffix(barename,"lua")
-            end
-            if not lfs.isfile(luaname) then
-                report_format("using format name %a",fmtname)
-                report_format("no luc/lua file with name %a",barename)
-            else
-                local command = format("%s %s --fmt=%s --lua=%s %s %s",engine,primaryflags(),quoted(barename),quoted(luaname),quoted(data),more ~= "" and quoted(more) or "")
-                report_format("running command: %s",command)
-                os.spawn(command)
-            end
-        end
-    end
-end
+if not modules then modules = { } end modules ['luat-fmt'] = {
+    version   = 1.001,
+    comment   = "companion to mtxrun",
+    author    = "Hans Hagen, PRAGMA-ADE, Hasselt NL",
+    copyright = "PRAGMA ADE / ConTeXt Development Team",
+    license   = "see context related readme files"
+}
+
+local format = string.format
+local concat = table.concat
+local quoted = string.quoted
+local luasuffixes = utilities.lua.suffixes
+
+local report_format = logs.reporter("resolvers","formats")
+
+local function primaryflags() -- not yet ok
+    local trackers   = environment.argument("trackers")
+    local directives = environment.argument("directives")
+    local flags = { }
+    if trackers and trackers ~= "" then
+        flags = { "--trackers=" .. quoted(trackers) }
+    end
+    if directives and directives ~= "" then
+        flags = { "--directives=" .. quoted(directives) }
+    end
+    if environment.argument("jit") then
+        flags = { "--jiton" }
+    end
+    return concat(flags," ")
+end
+
+function environment.make_format(name)
+    local engine = environment.ownmain or "luatex"
+    -- change to format path (early as we need expanded paths)
+    local olddir = dir.current()
+    local path = caches.getwritablepath("formats",engine) or "" -- maybe platform
+    if path ~= "" then
+        lfs.chdir(path)
+    end
+    report_format("using format path %a",dir.current())
+    -- check source file
+    local texsourcename = file.addsuffix(name,"mkiv")
+    local fulltexsourcename = resolvers.findfile(texsourcename,"tex") or ""
+    if fulltexsourcename == "" then
+        texsourcename = file.addsuffix(name,"tex")
+        fulltexsourcename = resolvers.findfile(texsourcename,"tex") or ""
+    end
+    if fulltexsourcename == "" then
+        report_format("no tex source file with name %a (mkiv or tex)",name)
+        lfs.chdir(olddir)
+        return
+    else
+        report_format("using tex source file %a",fulltexsourcename)
+    end
+    local texsourcepath = dir.expandname(file.dirname(fulltexsourcename)) -- really needed
+    -- check specification
+    local specificationname = file.replacesuffix(fulltexsourcename,"lus")
+    local fullspecificationname = resolvers.findfile(specificationname,"tex") or ""
+    if fullspecificationname == "" then
+        specificationname = file.join(texsourcepath,"context.lus")
+        fullspecificationname = resolvers.findfile(specificationname,"tex") or ""
+    end
+    if fullspecificationname == "" then
+        report_format("unknown stub specification %a",specificationname)
+        lfs.chdir(olddir)
+        return
+    end
+    local specificationpath = file.dirname(fullspecificationname)
+    -- load specification
+    local usedluastub = nil
+    local usedlualibs = dofile(fullspecificationname)
+    if type(usedlualibs) == "string" then
+        usedluastub = file.join(file.dirname(fullspecificationname),usedlualibs)
+    elseif type(usedlualibs) == "table" then
+        report_format("using stub specification %a",fullspecificationname)
+        local texbasename = file.basename(name)
+        local luastubname = file.addsuffix(texbasename,luasuffixes.lua)
+        local lucstubname = file.addsuffix(texbasename,luasuffixes.luc)
+        -- pack libraries in stub
+        report_format("creating initialization file %a",luastubname)
+        utilities.merger.selfcreate(usedlualibs,specificationpath,luastubname)
+        -- compile stub file (does not save that much as we don't use this stub at startup any more)
+        if utilities.lua.compile(luastubname,lucstubname) and lfs.isfile(lucstubname) then
+            report_format("using compiled initialization file %a",lucstubname)
+            usedluastub = lucstubname
+        else
+            report_format("using uncompiled initialization file %a",luastubname)
+            usedluastub = luastubname
+        end
+    else
+        report_format("invalid stub specification %a",fullspecificationname)
+        lfs.chdir(olddir)
+        return
+    end
+    -- generate format
+    local command = format("%s --ini %s --lua=%s %s %sdump",engine,primaryflags(),quoted(usedluastub),quoted(fulltexsourcename),os.platform == "unix" and "\\\\" or "\\")
+    report_format("running command: %s\n",command)
+    os.spawn(command)
+    -- remove related mem files
+    local pattern = file.removesuffix(file.basename(usedluastub)).."-*.mem"
+ -- report_format("removing related mplib format with pattern %a", pattern)
+    local mp = dir.glob(pattern)
+    if mp then
+        for i=1,#mp do
+            local name = mp[i]
+            report_format("removing related mplib format %a", file.basename(name))
+            os.remove(name)
+        end
+    end
+    lfs.chdir(olddir)
+end
+
+function environment.run_format(name,data,more)
+    if name and name ~= "" then
+        local engine = environment.ownmain or "luatex"
+        local barename = file.removesuffix(name)
+        local fmtname = caches.getfirstreadablefile(file.addsuffix(barename,"fmt"),"formats",engine)
+        if fmtname == "" then
+            fmtname = resolvers.findfile(file.addsuffix(barename,"fmt")) or ""
+        end
+        fmtname = resolvers.cleanpath(fmtname)
+        if fmtname == "" then
+            report_format("no format with name %a",name)
+        else
+            local barename = file.removesuffix(name) -- expanded name
+            local luaname = file.addsuffix(barename,"luc")
+            if not lfs.isfile(luaname) then
+                luaname = file.addsuffix(barename,"lua")
+            end
+            if not lfs.isfile(luaname) then
+                report_format("using format name %a",fmtname)
+                report_format("no luc/lua file with name %a",barename)
+            else
+                local command = format("%s %s --fmt=%s --lua=%s %s %s",engine,primaryflags(),quoted(barename),quoted(luaname),quoted(data),more ~= "" and quoted(more) or "")
+                report_format("running command: %s",command)
+                os.spawn(command)
+            end
+        end
+    end
+end