Hi Hans,
I tried this but without success :
\startMPcode
suite{1,0};
suite{2,1};
\stopMPcode
Fabrice
On 2/11/2020 11:50 AM, Fabrice Couvreur wrote:
> Hi,
> I have some problems with the following macro :
>
> tex error > 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 enddef;
> 14 \stopMPcode
> 15 \starttext
> 16 On présente ci-dessous deux suites de dessins.
> 17 \startlinecorrection[blank]
> 18 \startmidaligned
> 19 \startcombination[2*1]
> 20 {\startMPcode
> 21 suite{1,0};
> 22 suite(2,1);
> 23 >> \stopMPcode}{\tfxx \bf Suite 2}
> 24 \stopcombination
> 25 \stopmidaligned
> 26 \stoplinecorrection
> 27 \stoptext
>
> mtx-context | fatal error: return code: 256
>
> TeX Output exited abnormally with code 1 at Tue Feb 11 11:45:53
>
> ##################################################
> macro.tex
> ##################################################
>
> \startMPcode
> def suite (expr n, t) =
> begingroup
> numeric u;
> u := 5mm;
> pickup pencircle scaled 4pt;
> for i=0 upto n:
> for j=0 upto n:
> drawdot (i*u,j*u) shifted(t*u,0) withcolor darkred;
> endfor
> endfor
> endgroup
> enddef;
> \stopMPcode
> \starttext
> On présente ci-dessous deux suites de dessins.
> \startlinecorrection[blank]
> \startmidaligned
> \startcombination[2*1]
> {\startMPcode
> suite{1,0};
> suite(2,1);
> \stopMPcode}{\tfxx \bf Suite 2}
> \stopcombination
> \stopmidaligned
> \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/listinfo/ntg-context
> webpage : http://www.pragma-ade.nl / http://context.aanhet.net
> archive : https://bitbucket.org/phg/context-mirror/commits/
> wiki : http://contextgarden.net
> ___________________________________________________________________________________
>
--
-----------------------------------------------------------------
Hans Hagen | PRAGMA ADE
Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
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 the Wiki!
maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage : http://www.pragma-ade.nl / http://context.aanhet.net
archive : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___________________________________________________________________________________
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/listinfo/ntg-context
webpage : http://www.pragma-ade.nl / http://context.aanhet.net
archive : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___________________________________________________________________________________
I think Hans meant you should use () and not {}.
The following compiles here.
Hope it helps!
/Mikael
\startMPcode
def suite (expr n, t) =
begingroup
numeric u;
u := 5mm;
pickup pencircle scaled 4pt;
for i=0 upto n:
for j=0 upto n:
drawdot (i*u,j*u) shifted(t*u,0) withcolor darkred;
endfor
endfor
endgroup
enddef;
\stopMPcode
\starttext
On présente ci-dessous deux suites de dessins.
\startlinecorrection[blank]
\startmidaligned
\startcombination[2*1]
{\startMPcode
suite(1,0);
suite(2,1);
\stopMPcode}{\tfxx \bf Suite 2}
\stopcombination
\stopmidaligned
\stoplinecorrection
\stoptext