Re: [NTG-context] A Bug in lmt_shade

2021-05-06 Thread Hans Hagen

On 5/6/2021 1:04 PM, Keith McKay wrote:

Hi all,

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

more a genwral bug (side effect of changed helper) .. fixed in next upload

Hans


-
  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
___


[NTG-context] A Bug in lmt_shade

2021-05-06 Thread Keith McKay

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 > 

metapost > log > 0

metapost > log > 

metapost > log > )

metapost > log >  
...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 >  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 >

___
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
___