summaryrefslogtreecommitdiff
path: root/metapost/context/base/mp-spec.mp
diff options
context:
space:
mode:
Diffstat (limited to 'metapost/context/base/mp-spec.mp')
-rw-r--r--metapost/context/base/mp-spec.mp9
1 files changed, 6 insertions, 3 deletions
diff --git a/metapost/context/base/mp-spec.mp b/metapost/context/base/mp-spec.mp
index ceff7fe90..bef6cd2fa 100644
--- a/metapost/context/base/mp-spec.mp
+++ b/metapost/context/base/mp-spec.mp
@@ -614,9 +614,12 @@ vardef transparent(expr n, t, c) =
elseif is_spot : spotcolorpattern[bluepart cc]
else : dddecimal cc fi ;
% check if this one is already used
-% ss := "tr_" & s ;
-% ss := cleanstring(ss) ;
ss := cleanstring("tr_" & s) ;
+ % we now have rather unique names, i.e. a color spec of .234 becomes
+ % tr..._234.... and metapost gives a number overflow (parse error)
+ % for variables like tr_12345678 which may result from many decimal
+ % positions (imo mp bug)
+ ss := asciistring(ss) ;
% efficiency hack
if expandafter unknown scantokens(ss) :
ok := false ; % not yet defined
@@ -701,4 +704,4 @@ enddef ;
% spotcolor is already scaled
-endinput ; \ No newline at end of file
+endinput ;