From a784490c3d6a27467c930594ca8b78585ab65baf Mon Sep 17 00:00:00 2001 From: Hans Hagen Date: Mon, 28 Dec 2020 02:44:53 +0100 Subject: 2020-12-28 01:40:00 --- metapost/context/base/mpxl/mp-tool.mpxl | 24 ++++++++++++++---------- 1 file changed, 14 insertions(+), 10 deletions(-) (limited to 'metapost') diff --git a/metapost/context/base/mpxl/mp-tool.mpxl b/metapost/context/base/mpxl/mp-tool.mpxl index 6aca09d7e..59b29c148 100644 --- a/metapost/context/base/mpxl/mp-tool.mpxl +++ b/metapost/context/base/mpxl/mp-tool.mpxl @@ -268,16 +268,20 @@ enddef ; %D Instead of a keystroke eating save and allocation sequence, you can use the \quote %D {new} alternatives to save and allocate in one command. -%D These might go away! - -% def newcolor text v = forsuffixes i=v : save i ; color i ; endfor ; enddef ; -% def newnumeric text v = forsuffixes i=v : save i ; numeric i ; endfor ; enddef ; -% def newboolean text v = forsuffixes i=v : save i ; boolean i ; endfor ; enddef ; -% def newtransform text v = forsuffixes i=v : save i ; transform i ; endfor ; enddef ; -% def newpath text v = forsuffixes i=v : save i ; path i ; endfor ; enddef ; -% def newpicture text v = forsuffixes i=v : save i ; picture i ; endfor ; enddef ; -% def newstring text v = forsuffixes i=v : save i ; string i ; endfor ; enddef ; -% def newpair text v = forsuffixes i=v : save i ; pair i ; endfor ; enddef ; +%D Are these used? + +def newcolor text v = forsuffixes i=v : save i ; color i ; endfor ; enddef ; +def newrgbcolor text v = forsuffixes i=v : save i ; rgbcolor i ; endfor ; enddef ; +def newcmykcolor text v = forsuffixes i=v : save i ; cmykcolor i ; endfor ; enddef ; +def newnumeric text v = forsuffixes i=v : save i ; numeric i ; endfor ; enddef ; +def newboolean text v = forsuffixes i=v : save i ; boolean i ; endfor ; enddef ; +def newtransform text v = forsuffixes i=v : save i ; transform i ; endfor ; enddef ; +def newpath text v = forsuffixes i=v : save i ; path i ; endfor ; enddef ; +def newpicture text v = forsuffixes i=v : save i ; picture i ; endfor ; enddef ; +def newstring text v = forsuffixes i=v : save i ; string i ; endfor ; enddef ; +def newpair text v = forsuffixes i=v : save i ; pair i ; endfor ; enddef ; + +permanent newcolor, newrgbcolor, newcmykcolor, newnumeric, newboolean, newtransform, newpath, newpicture, newstring, newpair ; %D Sometimes we don't want parts of the graphics add to the bounding box. One way of %D doing this is to save the bounding box, draw the graphics that may not count, and -- cgit v1.2.3