summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/algorithmicx/algpascal.sty
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2006-10-12 01:40:37 +0000
committerNorbert Preining <preining@logic.at>2006-10-12 01:40:37 +0000
commita3e5f4189a145472017be9745847e9d05ebbc0a0 (patch)
treeabbb504a0ce2402455d54547f127c93a57a9b3fc /Master/texmf-dist/tex/latex/algorithmicx/algpascal.sty
parent9078ab149a4827ec032de77b4d8b4ff8f48f4628 (diff)
add algorithmicx to ctan2tl (MAKEnosymlink), add algorithmicx to tpm-ctan-check,
update algorithmicx git-svn-id: svn://tug.org/texlive/trunk@2311 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/algorithmicx/algpascal.sty')
-rw-r--r--Master/texmf-dist/tex/latex/algorithmicx/algpascal.sty37
1 files changed, 13 insertions, 24 deletions
diff --git a/Master/texmf-dist/tex/latex/algorithmicx/algpascal.sty b/Master/texmf-dist/tex/latex/algorithmicx/algpascal.sty
index df4c81e37e6..0c9a57779f4 100644
--- a/Master/texmf-dist/tex/latex/algorithmicx/algpascal.sty
+++ b/Master/texmf-dist/tex/latex/algorithmicx/algpascal.sty
@@ -1,8 +1,8 @@
-% A PASCAL LIKE ALGORITHMIC STYLE -- Released 18 MAR 2004
+% A PASCAL LIKE ALGORITHMIC STYLE -- Released 27 APR 2005
% for LaTeX version 2e
%
% Copyright Szasz Janos
-% E-mail szaszjanos@users.sourceforge.net
+% E-mail szaszjanos@sourceforge.net
%
\NeedsTeXFormat{LaTeX2e}%
\ProvidesPackage{algpascal}%
@@ -10,46 +10,35 @@
\RequirePackage{algorithmicx}%
\typeout{Document Style - pascal environments for the `algorithmicx' style}%
%
-\def\ALG@setpascal{t}%
-\DeclareOption{noset}{\def\ALG@setpascal{}}%
-\DeclareOption{set}{\def\ALG@setpascal{t}}%
\ProcessOptions%
%
%
% *** DECLARATIONS ***
%
%
-\ALG@deflanguage{pascal}{\ALG@setpascal}%
-{%
+\algnewlanguage{pascal}%
+\alglanguage{pascal}%
%
% *** KEYWORDS ***
%
-\newcommand\textkeyword{\textbf}%
+\algnewcommand\textkeyword{\textbf}%
%
% *** DECLARED BLOCKS AND LOOPS ***
%
\algdef{SEi}{Begin}{End}{0cm}{\textkeyword{begin}}{\textkeyword{end}}%
\algdef{Sei}{Asm}{End}{0cm}{\textkeyword{asm}}%
%
-\algdef{lS}{For}[2]{\textkeyword{for} \(##1\) \textkeyword{to} \(##2\) \textkeyword{do}}%
-\algdef{lS}{While}[1]{\textkeyword{while} \(##1\) \textkeyword{do}}%
-\algdef{lS}{With}[1]{\textkeyword{with}\ \(##1\) \textkeyword{do}}%
-\algdef{SE}{Repeat}{Until}{\textkeyword{repeat}}[1]{\textkeyword{until}\ \(##1\)}%
-\algdef{lS}{If}[1]{\textkeyword{if}\ \(##1\) \textkeyword{then}}%
+\algdef{lS}{For}[2]{\textkeyword{for} \(#1\) \textkeyword{to} \(#2\) \textkeyword{do}}%
+\algdef{lS}{While}[1]{\textkeyword{while} \(#1\) \textkeyword{do}}%
+\algdef{lS}{With}[1]{\textkeyword{with}\ \(#1\) \textkeyword{do}}%
+\algdef{SE}{Repeat}{Until}{\textkeyword{repeat}}[1]{\textkeyword{until}\ \(#1\)}%
+\algdef{lS}{If}[1]{\textkeyword{if}\ \(#1\) \textkeyword{then}}%
\algdef{lC}{If}{Else}{\textkeyword{else}}%
%
% *** OTHER DECLARATIONS ***
%
-\def\Procedure{\State\textkeyword{procedure}\space}%
-\def\Function{\State\textkeyword{function}\space}%
+\algnewcommand\Procedure{\State\textkeyword{procedure}\space}%
+\algnewcommand\Function{\State\textkeyword{function}\space}%
%
-\renewcommand\algorithmiccomment[1]{\hfill\{##1\}}%
-%
-%
-%
-}%
-%
-%
-%
-\let\ALG@setpascal\relax%
+\algrenewcomment[1]{\hfill\{#1\}}%
%