From 8d8d528d2ad52599f11250cfc567fea4f37f2a8b Mon Sep 17 00:00:00 2001 From: Context Git Mirror Bot Date: Tue, 12 Jan 2016 17:15:07 +0100 Subject: 2016-01-12 16:26:00 --- tex/context/base/type-run.mkii | 51 ------------------------------------------ 1 file changed, 51 deletions(-) delete mode 100644 tex/context/base/type-run.mkii (limited to 'tex/context/base/type-run.mkii') diff --git a/tex/context/base/type-run.mkii b/tex/context/base/type-run.mkii deleted file mode 100644 index 51a9f2a88..000000000 --- a/tex/context/base/type-run.mkii +++ /dev/null @@ -1,51 +0,0 @@ -%D \module -%D [ file=type-run, -%D version=2001.04.20, -%D title=\CONTEXT\ Typescript Macros, -%D subtitle=Runtime Macros, -%D author=Hans Hagen, -%D date=\currentdate, -%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}] -%C -%C This module is part of the \CONTEXT\ macro||package and is -%C therefore copyrighted by \PRAGMA. See mreadme.pdf for -%C details. - -\unprotect - -\gdef\typetypescript - {\dotripleempty\dotypetypescript} - -\gdef\dotypetypescript[#1][#2][#3]% - {\bgroup - \def\dochecktypescript##1##2% script use - {\doifelsenothing{##1##2} - {\donetrue} - {\ExpandBothAfter\doifcommonelse{##1}{##2}\donetrue\donefalse}} - \edef\typescriptone {\truetypescript{#1}}% - \edef\typescripttwo {\truetypescript{#2}}% - \edef\typescriptthree{\truetypescript{#3}}% - \def\starttypescript - {\bgroup - \obeylines % else we loose the first line due to lookahead - \dotripleempty\dostarttypescript} - \def\dostarttypescript[##1][##2][##3]% - {\long\def\next####1\stoptypescript{\egroup} - \dochecktypescript{##1}\typescriptone \ifdone - \dochecktypescript{##2}\typescripttwo \ifdone - \dochecktypescript{##3}\typescriptthree\ifdone - \def\next% - {\def\stoptypescript{\egroup\type{\stoptypescript}} - % what follows now is quite ugly - \skipfirstverbatimlinefalse - \type{\starttypescript} - \doifsomething{##1}{\type{[##1]}} - \doifsomething{##2}{\type{[##2]}} - \doifsomething{##3}{\type{[##3]}} - \processdisplayverbatim{\stoptypescript}}% - \fi\fi\fi - \next} - \processcommacommand[\typescriptfiles]\ReadFile % \dodousetypescript - \egroup} - -\protect \endinput -- cgit v1.2.3