Le=C2=A0mar. 11 f=C3= =A9vr. 2020 =C3=A0=C2=A014:01, Mikael P. Sundqvist <mickep@gmail.com> a =C3=A9crit=C2=A0:

On Tue, Feb 11, 2020 at 1:22 PM Fabrice Couvreur <fabrice1.couvreur@gmail.com<= /a>> wrote:

Hi Hans,
I tried this but without success :

=
=C2=A0\startMPcode
=C2=A0 =C2=A0=C2=A0 suite{1= ,0};
<= span lang=3D"en">=C2=A0=C2=A0=C2=A0=C2=A0 suite{2,1};
<= /span>
=C2=A0\stopMPcode
Fabrice

Le=C2=A0mar. 11 f= =C3=A9vr. 2020 =C3=A0=C2=A013:08, Hans Hagen <j.hagen@xs4all.nl> a =C3=A9crit=C2=A0:<= br>
On 2/11/2020 11:= 50 AM, Fabrice Couvreur wrote:
> Hi,
> I have some problems with the following macro :
>
> tex error =C2=A0 =C2=A0 =C2=A0 > mp error on line 23 in file /home/= viserion/macro.tex:
>
> ! Missing argument to suite.
> <to be read again>
> {
> <*> suite{
> 1,0}; suite(2,1); ;
> That macro has more parameters than you thought.
> I'll continue by pretending that each missing argument
> is either zero or null.
>
> ! Missing argument to suite.
> <to be read again>
> {
> <*> suite{
> 1,0}; suite(2,1); ;
> That macro has more parameters than you thought.
> I'll continue by pretending that each missing argument
> is either zero or null.

{} instead of ()

> ! Extra tokens will be flushed.
> <to be read again>
> {
> <*> suite{
> 1,0}; suite(2,1); ;
> I've just read as much of that statement as I could fathom,
> so a semicolon should have been next. It's very puzzling...
> but I'll try to get myself back together, by ignoring
> everything up to the next `;'. Please insert a semicolon
> now in front of anything that you don't want me to delete.
> (See Chapter 27 of The METAFONTbook for an example.)
>
> [1]
>
> 13 =C2=A0 =C2=A0 =C2=A0 enddef;
> 14 =C2=A0 =C2=A0 \stopMPcode
> 15 =C2=A0 =C2=A0 \starttext
> 16 =C2=A0 =C2=A0 =C2=A0On pr=C3=A9sente ci-dessous deux suites de dess= ins.
> 17 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 \startlinecorrection[blank]
> 18 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 \startmidaligned
> 19 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 \startcombination[= 2*1]
> 20 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 {\startMPco= de
> 21 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 suit= e{1,0};
> 22 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 suit= e(2,1);
> 23 >> =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 \stopMPco= de}{\tfxx \bf Suite 2}
> 24 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 \stopcombination
> 25 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 \stopmidaligned
> 26 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 \stoplinecorrection
> 27 =C2=A0 =C2=A0 \stoptext
>
> mtx-context =C2=A0 =C2=A0 | fatal error: return code: 256
>
> TeX Output exited abnormally with code 1 at Tue Feb 11 11:45:53
>
> ##################################################
> macro.tex
> ##################################################
>
> \startMPcode
>=C2=A0 =C2=A0 def suite (expr n, t) =3D
>=C2=A0 =C2=A0 begingroup
>=C2=A0 =C2=A0 =C2=A0numeric u;
>=C2=A0 =C2=A0 =C2=A0u :=3D 5mm;
>=C2=A0 =C2=A0 =C2=A0pickup pencircle scaled 4pt;
>=C2=A0 =C2=A0 =C2=A0for i=3D0 upto n:
>=C2=A0 =C2=A0 =C2=A0 =C2=A0for j=3D0 upto n:
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0drawdot (i*u,j*u) shifted(t*u,= 0) withcolor darkred;
>=C2=A0 =C2=A0 =C2=A0 =C2=A0endfor
>=C2=A0 =C2=A0 =C2=A0endfor
>=C2=A0 =C2=A0 endgroup
>=C2=A0 =C2=A0 enddef;
> \stopMPcode
> \starttext
>=C2=A0 =C2=A0On pr=C3=A9sente ci-dessous deux suites de dessins.
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 \startlinecorrection[blank]
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 \startmidaligned
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 \startcombination[2*1]
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 {\startMPcode
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 suite{1,0};
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 suite(2,1);
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0\stopMPcode}{\tf= xx \bf Suite 2}
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 \stopcombination
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 \stopmidaligned
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 \stoplinecorrection
> \stoptext
>
>
> Thank you.
> Fabrice
>
> ______________________________________________________________________= _____________
> If your question is of interest to others as well, please add an entry= to the Wiki!
>
> maillist : ntg= -context@ntg.nl / http://www.ntg.nl/mailman/listin= fo/ntg-context
> webpage=C2=A0 : http://www.pragma-ade.nl / http://context.aanhet.ne= t
> archive=C2=A0 : https://bitbucket.org/phg/cont= ext-mirror/commits/
> wiki=C2=A0 =C2=A0 =C2=A0: http://contextgarden.net
> ______________________________________________________________________= _____________
>

--

-----------------------------------------------------------------
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0Hans Hagen | PRAGMA ADE
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0Ridderstraat 27 | 80= 61 GH Hasselt | The Netherlands
=C2=A0 =C2=A0 =C2=A0 =C2=A0 tel: 038 477 53 69 | www.pragma-ade.nl | www.= pragma-pod.nl
-----------------------------------------------------------------
___________________________________________________________________________= ________
If your question is of interest to others as well, please add an entry to t= he Wiki!

maillist : ntg-cont= ext@ntg.nl / http://www.ntg.nl/mailman/listinfo/nt= g-context
webpage=C2=A0 : http://www.pragma-ade.nl / http://context.aanhet.net=
archive=C2=A0 : https://bitbucket.org/phg/context-m= irror/commits/
wiki=C2=A0 =C2=A0 =C2=A0: http://contextgarden.net
___________________________________________________________________________= ________

___________________________________________________________________________= ________
If your question is of interest to others as well, please add an entry to t= he Wiki!

maillist : ntg-cont= ext@ntg.nl / http://www.ntg.nl/mailman/listinfo/nt= g-context
webpage=C2=A0 : http://www.pragma-ade.nl / http://context.aanhet.net=
archive=C2=A0 : https://bitbucket.org/phg/context-m= irror/commits/
wiki=C2=A0 =C2=A0 =C2=A0: http://contextgarden.net
___________________________________________________________________________= ________

I think Hans meant you should = use () and not {}.

The following compiles here.

Hope it helps!

/Mikael

\startMPcode
=C2=A0 def suite (expr n, t) =3D
= =C2=A0 begingroup
=C2=A0 =C2=A0numeric u;
=C2=A0 =C2=A0u :=3D 5mm;=C2=A0 =C2=A0pickup pencircle scaled 4pt;
=C2=A0 =C2=A0for i=3D0 upto n= :
=C2=A0 =C2=A0 =C2=A0for j=3D0 upto n:
=C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0drawdot (i*u,j*u) shifted(t*u,0) withcolor darkred;
=C2=A0 =C2=A0 = =C2=A0endfor
=C2=A0 =C2=A0endfor
=C2=A0 endgroup
=C2=A0 enddef;\stopMPcode
\starttext
=C2=A0On pr=C3=A9sente ci-dessous deux suites= de dessins.
=C2=A0 =C2=A0 =C2=A0 \startlinecorrection[blank]
=C2=A0 = =C2=A0 =C2=A0 =C2=A0 \startmidaligned
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0= \startcombination[2*1]
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 {\star= tMPcode
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 suite(1,0);
= =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 suite(2,1);
=C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0\stopMPcode}{\tfxx \bf Suite 2}
= =C2=A0 =C2=A0 =C2=A0 \stopcombination
=C2=A0 =C2=A0 =C2=A0 =C2=A0 \stopm= idaligned
=C2=A0 =C2=A0 =C2=A0 \stoplinecorrection
\stoptext

___________________________________________________________________________= ________
If your question is of interest to others as well, please add an entry to t= he Wiki!

maillist : ntg-cont= ext@ntg.nl / http://www.ntg.nl/mailman/listinfo/nt= g-context
webpage=C2=A0 : http://www.pragma-ade.nl / http://context.aanhet.net=
archive=C2=A0 : https://bitbucket.org/phg/context-m= irror/commits/
wiki=C2=A0 =C2=A0 =C2=A0: http://contextgarden.net
___________________________________________________________________________= ________

--000000000000663219059e52e6bf-- --===============5342854925353238054== Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: base64 Content-Disposition: inline X19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19f X19fX19fX19fX19fX19fX19fX19fX19fX18KSWYgeW91ciBxdWVzdGlvbiBpcyBvZiBpbnRlcmVz dCB0byBvdGhlcnMgYXMgd2VsbCwgcGxlYXNlIGFkZCBhbiBlbnRyeSB0byB0aGUgV2lraSEKCm1h aWxsaXN0IDogbnRnLWNvbnRleHRAbnRnLm5sIC8gaHR0cDovL3d3dy5udGcubmwvbWFpbG1hbi9s aXN0aW5mby9udGctY29udGV4dAp3ZWJwYWdlICA6IGh0dHA6Ly93d3cucHJhZ21hLWFkZS5ubCAv IGh0dHA6Ly9jb250ZXh0LmFhbmhldC5uZXQKYXJjaGl2ZSAgOiBodHRwczovL2JpdGJ1Y2tldC5v cmcvcGhnL2NvbnRleHQtbWlycm9yL2NvbW1pdHMvCndpa2kgICAgIDogaHR0cDovL2NvbnRleHRn YXJkZW4ubmV0Cl9fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19f X19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fCg== --===============5342854925353238054==--