Hi all,

I think a bug has appeared in lmt_shade in the latest upload. MWE below.

Thanks

Keith McKay

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\setuppapersize[A4,landscape][A4,landscape]

\starttext

\startMPpage

StartPage;

width := PaperWidth ; height := PaperHeight ; unit := cm ;

definecolor [ name = "MyColor1", r = 0.781, g = 0.5, b = 0.5 ] ;

definecolor [ name = "MyColor3", r = 1, g = 1, b = 0.7983 ] ;

draw lmt_shade [

path = unitsquare xscaled width yscaled height,

direction = "up",

alternative = "linear",

colors = { "MyColor1", "MyColor3" },

] ;

StopPage;

\stopMPpage

\stoptext

%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%% Console Output %%%

system >

system > ConTeXt ver: 2021.05.05 19:29 LMTX fmt: 2021.5.6 int: 
english/english

system >

< snip >

metapost > initializing instance 'metafun:1' using format 'metafun' and 
method 'default'

metapost > loading 'metafun' as 'metafun.mpxl' using method 'default'

metapost > initializing number mode 'scaled'

metafun > log >

metafun > log > error: An expression can't begin with 'right delimiter'

metafun > log >

metapost > log > <inserted text>

metapost > log > 0

metapost > log > <to be read again>

metapost > log > )

metapost > log > <argument> 
...enter_b,alternative,s;string.color_a,color_b,alternative,s;pair.center_a,center_b;alternative:=getparameter"alternative";mfun_with_shade_method_analyze(getparameter"path")

metapost > log > ;domain_min:...

metapost > log > 
image->begingroup.save.currentpicture;picture.currentpicture;currentpicture:=nullpicture;(TEXT3)

metapost > log > 
;currentpicture.if.str(SUFFIX2)<>"":shifted(mfun_labxf(SUFFIX2)*lrcorner.p+mfun_labyf(SUFFIX2)*ulcorn...

metapost > log > 
lmt_do_shade->...ve="circular":draw.fullcircle.scaled(radius_a)shifted.center_a.dashed.evenly;draw.fullcircle.scaled(factor*radius_b)shifted-center_b.dashed.evenly;fi.fi.popparameters;)

metapost > log > endgroup

metapost > log > <scantokens> lmt_do_shade

metapost > log >

metapost > log > <*> ...3", r = 1, g = 1, b = 0.7983 ] ; draw lmt_shade 
[ path = unitsquare xscaled width yscaled height, direction = "up", 
alternative = "linear", colors = { "MyColor1", "MyColor3" }, ]

metafun > log >

metafun > log > I'm afraid I need some sort of value in order to 
continue, so I've tentatively

inserted '0'.

metafun > log >

metapost > log > ; StopPage; ;

metapost > log >