diff options
Diffstat (limited to 'tex/context/base/syst-lua.mkiv')
| -rw-r--r-- | tex/context/base/syst-lua.mkiv | 38 |
1 files changed, 0 insertions, 38 deletions
diff --git a/tex/context/base/syst-lua.mkiv b/tex/context/base/syst-lua.mkiv index 5e82a9ea9..b5001ab62 100644 --- a/tex/context/base/syst-lua.mkiv +++ b/tex/context/base/syst-lua.mkiv @@ -53,49 +53,11 @@ \def\ui_ft#1#2{#1} \def\ui_st#1#2{#2} -%D Let's bring this under \LUA\ (and therefore \MKIV\ sandbox) control: - -% \setnewconstant\c_syst_write 18 -% -% \unexpanded\def\write#1#% so we can handle \immediate -% {\ifnum#1=\c_syst_write -% \expandafter\syst_execute -% \else -% \normalwrite#1% -% \fi} -% -% \unexpanded\def\syst_execute#1% -% {\ctxlua{os.execute(\!!bs#1\!!es)}} %D But as we only use write 16 we could as well do all in \LUA\ %D and ignore the rest. Okay, we still can do writes here but only %D when not blocked. -% Nicer would be if we could just disable write 18 and keep os.execute -% which in fact we can do by defining write18 as macro instead of -% primitive ... todo. - -% \unexpanded\def\write#1#% -% {\syst_write{#1}} -% -% \def\syst_write#1#2% -% {\ctxcommand{write(\number#1,\!!bs\normalunexpanded{#2}\!!es)}} -% -% \unexpanded\def\writeviatex#1#2% -% {\ifx\normalwrite\relax\else -% \normalwrite#1{#2}% -% \fi} - -% we have no way yet to pickup \immediate unless we redefine it -% we assume immediate execution - \let\syst_write_execute\clf_execute % always {...} -\unexpanded\def\write#1#% - {\ifnum#1=18 - \expandafter\syst_write_execute - \else - \normalwrite#1% - \fi} - \protect \endinput |