(\deftypemethod, \deftypemethodheader): New macros to implement

new commands @deftypemethod and @deftypemethodx.
Suggestion from: KHMarbaise@p69.ks.fido.de (Karl Heinz Marbaise).
This commit is contained in:
Karl Berry 1997-05-24 22:06:39 +00:00
parent 7827f1bde8
commit 51659ed000

View file

@ -3985,6 +3985,7 @@ width0pt\relax} \fi
\def\defmacx #1 {\errmessage{@defmacx in invalid context}} \def\defmacx #1 {\errmessage{@defmacx in invalid context}}
\def\defspecx #1 {\errmessage{@defspecx in invalid context}} \def\defspecx #1 {\errmessage{@defspecx in invalid context}}
\def\deftypefnx #1 {\errmessage{@deftypefnx in invalid context}} \def\deftypefnx #1 {\errmessage{@deftypefnx in invalid context}}
\def\deftypemethodx #1 {\errmessage{@deftypemethodx in invalid context}}
\def\deftypeunx #1 {\errmessage{@deftypeunx in invalid context}} \def\deftypeunx #1 {\errmessage{@deftypeunx in invalid context}}
% @defmethod, and so on % @defmethod, and so on
@ -4000,6 +4001,16 @@ width0pt\relax} \fi
\defunargs {#3}\endgroup % \defunargs {#3}\endgroup %
} }
% @deftypemethod foo-class return-type foo-method args
%
\def\deftypemethod{%
\defmethparsebody\Edeftypemethod\deftypemethodx\deftypemethodheader}
%
% #1 is the class name, #2 the data type, #3 the method name, #4 the args.
\def\deftypemethodheader#1#2#3#4{%
\deftypefnheaderx{Method on #1}{#2}#3 #4\relax
}
% @defmethod == @defop Method % @defmethod == @defop Method
\def\defmethod{\defmethparsebody\Edefmethod\defmethodx\defmethodheader} \def\defmethod{\defmethparsebody\Edefmethod\defmethodx\defmethodheader}