Warning: this is an htmlized version!
The original is here, and the conversion rules are here. |
-- This file: -- http://anggtwu.net/LATEX/2023headfoot.lua.html -- http://anggtwu.net/LATEX/2023headfoot.lua -- (find-angg "LATEX/2023headfoot.lua") -- Author: Eduardo Ochs <eduardoochs@gmail.com> -- -- (defun h () (interactive) (find-angg "LATEX/2023headfoot.lua")) -- (find-code-show2 "~/LATEX/Show2.tex") -- (code-show2 "~/LATEX/Show2.tex") -- -- (find-angg "LUA/lua50init.lua" "Path") -- (find-angg "LUA/Show2.lua" "texbody") Path.prependtopath "~/LUA/?.lua" require "Show2" show = function () return Show.try(tostring(outertexbody)) end outertexbody = Dang.from [=[ \documentclass{article} \usepackage[<<geometry>>]{geometry} \usepackage{lipsum} \input edrxheadfoot.tex % (find-LATEX "edrxheadfoot.tex") <<defrepl1>> <<usepackages>> \begin{document} <<defs>> <<texbody>> % <<saysuccess>> \end{document} ]=] -- (find-angg "LUA/tikz1.lua" "repl2") -- (find-angg "LUA/lua50init.lua" "Repl2.lua") defrepl1 = [[ % (find-angg "LUA/tikz1.lua" "repl2") \directlua{ dofile(os.getenv("LUA_INIT"):sub(2)) } \def\repl {\directlua{ print(); run_repl2_now() }} \def\condrepl{\directlua{ if os.getenv"REPL"=="1" then print(); run_repl2_now() end }} \nonstopmode ]] texbody = [[ \section{SA} \lipsum[3-9] \section{SB} \lipsum[3-9] \section{SC} \lipsum[3-9] \condrepl ]] --[==[ * (eepitch-lua51) * (eepitch-kill) * (eepitch-lua51) dofile "2023headfoot.lua" = show() * (etv) -- (find-LATEX "edrxheadfoot.tex") -- (find-LATEX "edrxheadfoot.tex") * (eepitch-shell) * (eepitch-kill) * (eepitch-shell) cd ~/LATEX/ && REPL=1 lualatex Show2.tex printmeaning "section" printmeaning "@startsection" printmeaning "@ssect" printmeaning "@sect" printmeaning "@dblarg" printmeaning "@xdblarg" printmeaning "@svsechd" printmeaning "@xsect" printmeaning "begin" printmeaning "newpage" printmeaning "@oddfoot" printmeaning "footertext" printmeaning "draftfooter" printmeaning "@evenfoot" printmeaning "@oddhead" printmeaning "rightmark" printmeaning "@rightmark" printmeaning "firstmark" printmeaning "@evenhead" --]==] -- Local Variables: -- coding: utf-8-unix -- End: