%%
%% This is file `lstpatch.sty', generated manually.
%%
%% (w)(c) 2009 Ke Wei
%%
%% This file may be distributed under the terms of the LaTeX Project Public
%% License from CTAN archives in directory  macros/latex/base/lppl.txt.
%% Either version 1.0 or, at your option, any later version.
%%
%% Send comments and ideas on the package, error reports and additional
%% programming languages to <wke@ipm.edu.mo>.
%%
%%
%% The following features are added to the base package.
%%
%% 1.4kw (2009/03/26)
%%
%%     Options /* descriptions */
%%        columns=doublespaceflexible
%%     /* to align column positions only after two or more spaces,
%%        this prevents normal standalone spaces from being stretched,
%%        while providing the alignment ability using multiple spaces,
%%        where stretching is tolerable. */
%%
%%        Cmacrostyle=<style>[identifierstyle]
%%     /* C language macro names are conventionally all uppercase,
%%        where proportional fonts make them too wide. Identifiers
%%        in all uppercase are regarded as macro names and this style
%%        will be applied. */
%%
%%        minCmacrolength=<number>[2]
%%     /* Identifiers with length less than this are not regarded as
%%        macro names. */
%%
%%        vextraskip=<dimen>[0pt]
%%     /* to help adjusting the line spacing */
%%
%%
\lst@CheckVersion{1.4}
{\typeout{^^J%
    ***^^J%
    *** This is a patch for listings 1.4, but you're using^^J%
    *** version \lst@version.^^J%
    ***^^J
    *** Patch file not loaded.^^J%
    ***^^J}%
    \endinput
}
\def\fileversion{1.4kw}
\def\filedate{2009/03/26}
\ProvidesFile{lstpatch.sty}[\filedate\space\fileversion\space (Ke Wei)]

\def\lst@doublewhitespacetrue{\global\let\lst@ifdoublewhitespace\iftrue}
\def\lst@doublewhitespacefalse{\global\let\lst@ifdoublewhitespace\iffalse}
\def\lst@whitespaceinitrue{\global\let\lst@ifwhitespace\iftrue}
\lst@whitespacefalse

\def\lst@newlinetrue{\global\let\lst@ifnewline\iftrue \lst@doublewhitespacefalse}

\def\lst@whitespacetrue{%
    \lst@ifwhitespace
      \lst@doublewhitespacetrue
    \else
      \lst@whitespaceinitrue
      \lst@doublewhitespacefalse
    \fi}

\def\lst@column@doublespaceflexible{%
    \lst@column@flexible
    \def\lst@OutputLostSpace{%
      \lst@ifwhitespace
      \else
        \lst@ifnewline
          \lst@UseLostSpace
        \else
          \lst@ifdoublewhitespace
            \lst@UseLostSpace
            \lst@doublewhitespacefalse
          \fi            
        \fi
      \fi}%
    \let\lst@leftinsert\@empty
    \let\lst@rightinsert\@empty}

\def\lst@AppendSpecialSpace{%
    \lst@ifwhitespace
        \lst@doublewhitespacetrue
        \lst@PrintToken
        \global\advance\lst@lostspace\lst@width
        \global\advance\lst@pos\m@ne
        \lst@gobbledwhitespacetrue
    \else
        \lst@PrintToken
        \lst@whitespacetrue
        \lst@AppendOther\lst@outputspace
        \lst@PrintToken
    \fi}

\def\lst@lowercaselettertrue{\global\let\lst@iflowercaseletter\iftrue}
\def\lst@lowercaseletterfalse{\global\let\lst@iflowercaseletter\iffalse}
\lst@lowercaseletterfalse

\def\lst@ProcessLowercaseLetter{\lst@lowercaselettertrue \lst@ProcessLetter}

\lst@Key{minCmacrolength}{2}{\def\lst@minCmacrolength{#1\relax}}
\lst@Key{Cmacrostyle}{\lst@identifierstyle}{\def\lst@Cmacrostyle{#1}}

\def\lst@Output{%
    \lst@CheckDelay
    \ifnum\lst@length=\z@\else
        \ifx\lst@currstyle\relax
            \@tempcnta\lst@minCmacrolength \advance\@tempcnta\m@ne
            \ifnum\lst@length>\@tempcnta
                \lst@iflowercaseletter
                    \let\lst@thestyle\lst@identifierstyle
                \else
                    \let\lst@thestyle\lst@Cmacrostyle
                \fi
            \else
                \let\lst@thestyle\lst@identifierstyle
            \fi
        \else
            \let\lst@thestyle\lst@currstyle
        \fi
        \lsthk@Output
        \lst@OutputToken
    \fi
    \let\lst@lastother\relax
    \lst@lowercaseletterfalse}

\lst@CCPut \lst@ProcessLowercaseLetter
         {"61}{"62}{"63}{"64}{"65}{"66}{"67}
    {"68}{"69}{"6A}{"6B}{"6C}{"6D}{"6E}{"6F}
    {"70}{"71}{"72}{"73}{"74}{"75}{"76}{"77}
    {"78}{"79}{"7A}
    \z@

\lst@Key{vextraskip}{0pt}{\def\lst@vextraskip{#1\relax}}

\def\lst@NewLine{%
    \ifx\lst@OutputBox\@gobble\else
        \par\vskip\lst@vextraskip\noindent \hbox{}%
    \fi
    \global\advance\lst@newlines\m@ne
    \lst@newlinetrue}

\endinput