asypictureb (17apr14)

git-svn-id: svn://tug.org/texlive/trunk@33490 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 1 insertions, 302 deletions

diff --git a/Master/texmf-dist/source/latex/asypictureb/asypictureB.ins b/Master/texmf-dist/source/latex/asypictureb/asypictureB.ins
index 7e952676035..c19feaa7709 100644
--- a/Master/texmf-dist/source/latex/asypictureb/asypictureB.ins
+++ b/Master/texmf-dist/source/latex/asypictureb/asypictureB.ins
@@ -44,312 +44,11 @@ and the derived files           asypictureB.ins,
                                 asypictureB.sty.
 
 \endpostamble
-\usedir{tex/latex/asypictureB}
+\usedir{tex/latex/asypictureb}
 \generate{
   \file{\jobname.sty}{\from{\jobname.dtx}{package}}
 }
 \endbatchfile
-\RequirePackage{fancyvrb}
-\RequirePackage{graphicx}
-\RequirePackage{pgfkeys}
-
-\makeatletter
-
-\def\asy@OutFile{\FV@OutFile}
-
-\RequirePackage{ifplatform}
-
-\ifshellescape
-    \def\ASYPIC@shell{18}
-    \newcommand{\shell@execute}{\immediate\write\ASYPIC@shell}
-\else
-\newwrite\ASYPIC@shell
-\ifwindows
-    \openout\ASYPIC@shell=\jobname-compile_asy.bat\relax
-\else
-    \openout\ASYPIC@shell=\jobname-compile_asy.sh\relax
-\fi
-\newcommand{\shell@execute}[1]{{%
-\edef\temp{#1}%
-        \write\expandafter\ASYPIC@shell\expandafter{\temp}%
-}}
-\fi
-
-\ifshellescape
-    \newcommand{\copyfile}[2]{%
-    \ifwindows%
-        \immediate\write18{copy #1 #2 /y}%
-    \else%
-        \immediate\write18{cp #1 #2}%
-    \fi%
-    }
-\else
-    \RequirePackage{verbatimcopy}
-    \newcommand{\copyfile}[2]{%
-        \OldVerbatimCopy{#1}{#2}%
-    }
-\fi
-
-\newcommand{\deletefile}[1]{%
-    \ifwindows%
-        \shell@execute{del #1}%
-    \else%
-        \shell@execute{rm #1}%
-    \fi%
-}
-
-\newcommand{\asyset}[1]{\pgfqkeys{/asy}{#1}}
-\newcommand{\@asyerrorfilename}{\@asypicturename_errors.txt}
-\newcounter{@asy@linenumber}
-
-\asyset{name/.initial=noname, name/.value required}%
-
-\asyset{graphic options/.code={}}
-\asyset{set graphic option/.style={graphic options/.append code=#1}}
-\asyset{.unknown/.code = %
-    {%
-        \edef\unknownkey{\pgfkeyscurrentname}%
-        \asyset{set graphic option/.expand once =  {%
-            \expandafter\setkeys\expandafter{%
-                \expandafter G\expandafter i\expandafter n\expandafter%
-                }\expandafter{\unknownkey=#1}%
-        }}%
-    }%
-}
-\def\asy@scale{1}
-\asyset{scale/.style={set graphic option = {\def\asy@scale{#1}}},
-    scale/.value required}
-\newcommand{\asy@angle}{0}
-\asyset{angle/.style = {set graphic option = {\def\asy@angle{#1}}},
-    angle/.value required}
-
-\newcommand{\getfontsize}{\f@size}
-
-\newif\ifasyfilechanged
-\newif\ifASYPIC@flush
-\newif\if@asyrepeat
-\newread\@asyreadold
-\newread\@asyreadnew
-\edef\@tempasyfile{\jobname-temp}
-
-\newcommand{\RequireAsyRecompile}{\ASYPIC@flushtrue}
-\newcommand{\AsyCompileIfNecessary}{\ASYPIC@flushfalse}
-\AsyCompileIfNecessary
-
-\newcommand\clearasyheader{\def\ASYPIC@header{}}
-
-\def\ASYPIC@header{}
-
-\def\asyheader{\FV@Environment{}{asyheader}}
-
-\def\FVB@asyheader{%
-     \@bsphack
-         \begingroup
-         \FV@UseKeyValues
-         \FV@DefineWhiteSpace
-         \def\FV@Space{\space}%
-         \FV@DefineTabOut
-         \def\FV@ProcessLine##1{\g@addto@macro\ASYPIC@header{##1^^J}}%
-         \let\FV@FontScanPrep\relax
-         %% DG/SR modification begin - May. 18, 1998
-         %% (to avoid problems with ligatures)
-         \let\@noligs\relax
-         %% DG/SR modification end
-         \FV@Scan}%
-
-\def\FVE@asyheader{\endgroup\@esphack}
-
-\DefineVerbatimEnvironment{asyheader}{asyheader}%
-    {codes={\catcode`@=0},tabsize=4}
-\begin{asyheader}
-defaultpen(fontsize(@getfontsize pt));
-settings.prc = false;
-\end{asyheader}
-\def\asypicture{\FV@Environment{}{asypicture}}
-
-\newcommand{\ASYPIC@recordname}[1]{%
-    \edef\tempmacroname{ASYPIC@name@#1}%
-    \ifcsname\tempmacroname\endcsname%% if \ASYPIC@name@... is defined
-        \edef\oldnum{\csname\tempmacroname\endcsname}%
-        \edef\@asypicturename%
-            {\scantokens\expandafter{\jobname\noexpand}-#1__\oldnum}%
-        \expandafter\xdef\csname\tempmacroname\endcsname%
-            {\the\numexpr\oldnum+1\relax}%
-        \edef\ASYPIC@current@num{\csname\tempmacroname\endcsname}%
-    \else%% This is the first time this name is being used.
-        \edef\@asypicturename%
-            {\scantokens\expandafter{\jobname\noexpand}-#1}%
-        \expandafter\gdef\csname\tempmacroname\endcsname{1}%
-    \fi%
-    \xdef\asylistingfile{\@asypicturename.asy}
-}
-
-
-\def\FVB@asypicture#1{%
-     \@bsphack
-     \asyset{graphic options/.code={}}%
-     \asyset{#1, name/.get = \currentname}%
-     \ASYPIC@recordname{\currentname}%
-     \begingroup
-         \FV@UseKeyValues
-         \FV@DefineWhiteSpace
-         \def\FV@Space{\space}%
-         \FV@DefineTabOut
-         \def\FV@ProcessLine{\immediate\write\asy@OutFile}%
-         \immediate\openout\asy@OutFile\@tempasyfile.asy\relax
-         \immediate\write\asy@OutFile{\ASYPIC@header^^J}
-         \let\FV@FontScanPrep\relax
-         %% DG/SR modification begin - May. 18, 1998
-         %% (to avoid problems with ligatures)
-         \let\@noligs\relax
-         %% DG/SR modification end
-         \FV@Scan}
-
-\newcommand{\ASYPICcomparefiles}[2]{
-    \IfFileExists{\@asypicturename.asy}%
-        {\openin\@asyreadold=#1.asy\relax%
-          \openin\@asyreadnew=#2.asy\relax%
-          \asyfilechangedfalse%
-          \@asyrepeattrue%
-          \loop%
-              \ifeof\@asyreadold%
-                  \@asyrepeatfalse%
-                  \ifeof\@asyreadnew%
-                  \else%
-                      \asyfilechangedtrue%
-                  \fi%
-              \else%
-                  \ifeof\@asyreadnew%
-                      \@asyrepeatfalse%
-                      \asyfilechangedtrue%
-                  \else% Not at the end of either file in this case
-                      \read\@asyreadold to \oldfileline%
-                      \read\@asyreadnew to \newfileline%
-                      \ifx\oldfileline\newfileline%
-                          \@asyrepeattrue%
-                      \else
-                          \asyfilechangedtrue%
-                          \@asyrepeatfalse%
-                      \fi%
-                  \fi%
-              \fi%
-              \if@asyrepeat
-          \repeat%
-          \closein\@asyreadold%
-          \closein\@asyreadnew%
-        }%
-        {\asyfilechangedtrue}%
-    \IfFileExists{#1.pdf}{}{%
-        \IfFileExists{#1.png}{}{%
-            \IfFileExists{#1.eps}{}{%
-                \asyfilechangedtrue%
-            }%
-        }%
-    }%
-}
-
-\def\ASYPIC@runasy{%
-    \message{Attempting to run asy on \@asypicturename.asy^^J}%
-    \shell@execute{asy -noV \@asypicturename.asy 2> \@asyerrorfilename}%
-    \openin\@asyreadold=\@asyerrorfilename\relax%
-    \ifeof\@asyreadold%
-        \closein\@asyreadold%
-    \else%
-        \def\@asyerrormessage{^^JPossible Asymptote error:^^J}%
-        \read\@asyreadold to \@asyerrorfirstline%
-        \g@addto@macro\@asyerrormessage{\@asyerrorfirstline^^J}%
-        \ifeof\@asyreadold%
-            \closein\@asyreadold%
-        \else%
-            {\endlinechar=`^^J%
-            \loop%
-                \readline\@asyreadold to \@asytempmessage%
-                \expandafter\g@addto@macro\expandafter%
-                  \@asyerrormessage\expandafter{\@asytempmessage^^J}%
-            \unless\ifeof\@asyreadold\repeat%
-            }%
-            \closein\@asyreadold%
-            \g@addto@macro\@asyerrormessage{^^J}%
-            %Next: Need to process \@asyerrorfirstline to figure
-            %out the Asymptote file line number
-            \expandafter\def\expandafter\@asy@processerrorline%
-              \expandafter##\expandafter1\@asypicturename.asy:%
-               ##2.##3\relax{\xdef\@asy@errorline{\numexpr##2\relax}}%
-            {\expandafter\expandafter\expandafter%
-                \@asy@processerrorline\expandafter%
-                \@asyerrorfirstline\@asypicturename.asy: -5.\relax%
-            }%  The surrounding braces should prevent too much from
-             %  being gobbled in case the pattern doesn't match.
-            \openin\@asyreadold\@asypicturename.asy\relax%
-            \edef\numlinesout{5}
-            \setcounter{@asy@linenumber}{\numlinesout}
-            \loop\ifnum\value{@asy@linenumber}<\@asy@errorline%
-                \readline\@asyreadold to \temp%
-                \stepcounter{@asy@linenumber}%
-            \repeat%
-            %
-            \addtocounter{@asy@linenumber}{-\numlinesout}
-            %
-            {%
-                \endlinechar=`^^J%
-                \loop\ifnum\value{@asy@linenumber}<\@asy@errorline%
-                    \stepcounter{@asy@linenumber}%
-                    \edef\temp/{\arabic{@asy@linenumber}}%
-                    \expandafter\g@addto@macro\expandafter%
-                      \@asyerrormessage\expandafter{\temp/ }%
-                    \readline\@asyreadold to \@asytempmessage%
-                    \expandafter\g@addto@macro\expandafter%
-                      \@asyerrormessage\expandafter{\@asytempmessage}%
-                \repeat%
-            }%
-            \closein\@asyreadold%
-            \PackageError{asypictureB}{\@asyerrormessage}{%
-                The Asymptote run described above
-                gave a non-empty error log. I have^^J
-                reproduced the error log and attempted
-                to print the five lines leading^^J
-                up to the error. Press enter or return
-                to continue, and then fix your^^J
-                Asymptote code when this run is done.
-            }%
-        \fi%
-    \fi%
-}
-
-\def\FVE@asypicture{\immediate\closeout\asy@OutFile\endgroup%
-    \@esphack%
-    \ifASYPIC@flush%
-        \asyfilechangedtrue%
-    \else%
-        \ASYPICcomparefiles{\@asypicturename}{\@tempasyfile}%
-    \fi%
-    \ifasyfilechanged%
-        \IfFileExists{\@asypicturename.png}%
-            {\deletefile{\@asypicturename.png}}{}%
-        \IfFileExists{\@asypicturename.pdf}%
-            {\deletefile{\@asypicturename.pdf}}{}%
-        \IfFileExists{\@asypicturename.eps}%
-            {\deletefile{\@asypicturename.eps}}{}%
-        \copyfile{\@tempasyfile.asy}{\@asypicturename.asy}
-        \ASYPIC@runasy%
-    \fi%
-    \asyset{graphic options}%
-    % Avoid giving "file does not exist" errors.
-    \chardef\previousinteractionmode=\interactionmode%
-    \batchmode%
-    \includegraphics[scale=\asy@scale,angle=\asy@angle]%
-        {\@asypicturename}%
-    \interactionmode=\previousinteractionmode%
-}
-
-\DefineVerbatimEnvironment{asypicture}{asypicture}%
-    {codes={\catcode`@=0},tabsize=4}
-
-\ifshellescape\else
-    \AtEndDocument{\closeout\ASYPIC@shell}
-\fi
-
-\makeatother
 %% 
 %% Copyright (C) 2014 by Charles Staats III
 %%