beta 2011.10.13 21:36

1 files changed, 55 insertions, 18 deletions

diff --git a/tex/context/base/mult-mps.lua b/tex/context/base/mult-mps.lua
index 860ae29f1..5a78bce8c 100644
--- a/tex/context/base/mult-mps.lua
+++ b/tex/context/base/mult-mps.lua
@@ -2,6 +2,9 @@ return {
     tex = {
         "btex", "etex", "verbatimtex",
     },
+    shortcuts = {
+        "..", "...", "--", "---", "&",
+    },
     primitives = { -- to be checked
         "charcode", "day", "linecap", "linejoin", "miterlimit", "month", "pausing",
         "prologues", "showstopping", "time", "tracingcapsules", "tracingchoices", "mpprocset",
@@ -10,12 +13,12 @@ return {
         "tracingspecs", "tracingstats", "tracingtitles", "truecorners",
         "warningcheck", "year",
         "false", "nullpicture", "pencircle", "true",
-        "and", "angle", "arclength", "arctime", "ASCII", "bluepart", "boolean", "bot",
+        "and", "angle", "arclength", "arctime", "ASCII", "boolean", "bot",
         "char", "color", "cosd", "cycle", "decimal", "directiontime", "floor", "fontsize",
-        "greenpart", "hex", "infont", "intersectiontimes", "known", "length", "llcorner",
+        "hex", "infont", "intersectiontimes", "known", "length", "llcorner",
         "lrcorner", "makepath", "makepen", "mexp", "mlog", "normaldeviate", "not",
         "numeric", "oct", "odd", "or", "path", "pair", "pen", "penoffset", "picture", "point",
-        "postcontrol", "precontrol", "redpart", "reverse", "rotated", "scaled",
+        "postcontrol", "precontrol", "reverse", "rotated", "scaled",
         "shifted", "sind", "slanted", "sqrt", "str", "string", "subpath", "substring",
         "transform", "transformed", "ulcorner", "uniformdeviate", "unknown",
         "urcorner", "xpart", "xscaled", "xxpart", "xypart", "ypart", "yscaled", "yxpart",
@@ -23,12 +26,11 @@ return {
         "addto", "clip", "input", "interim", "let", "newinternal", "save", "setbounds",
         "shipout", "show", "showdependencies", "showtoken", "showvariable",
         "special",
-        "rgbcolor", "cmykcolor", "graycolor",
         "begingroup", "endgroup", "of", "curl", "tension", "and", "controls",
         "reflectedabout", "rotatedaround", "interpath", "on", "off", "beginfig",
         "endfig", "def", "vardef", "enddef", "expr", "suffix", "text", "primary", "secondary",
-        "tertiary", "primarydef", "secondarydef", "tertiarydef", "top", "bottom",
-        "ulft", "urt", "llft", "lrt", "randomseed", "also", "contour", "doublepath",
+        "tertiary", "primarydef", "secondarydef", "tertiarydef",
+        "randomseed", "also", "contour", "doublepath",
         "withcolor", "withpen", "dashed", "if", "else", "elseif", "fi", "for", "endfor", "forever", "exitif",
         "forsuffixes", "downto", "upto", "step", "until",
         "charlist", "extensible", "fontdimen", "headerbyte", "kern", "ligtable",
@@ -43,21 +45,30 @@ return {
         "chardy", "hppp", "tracingedges", "vppp",
         "extra_beginfig", "extra_endfig", "mpxbreak",
         "endinput",
+        "message", "delimiters", "turningnumber", "errmessage",
+        "readstring", "scantokens", "end", "outer", "inner", "write", "to", "readfrom",
+        "withprescript", "withpostscript",
+        "top", "bot", "lft", "rt", "ulft", "urt", "llft", "lrt",
+        --
+        "redpart", "greenpart", "bluepart", "cyanpart", "magentapart", "yellowpart", "blackpart", "greypart",
+        "rgbcolor", "cmykcolor", "greycolor", "graycolor",
+        "colormodel",  "graypart",
     },
-    plain = {
-        "ahangle", "ahlength", "bboxmargin", "defaultpen", "defaultscale",
-        "labeloffset", "background", "currentpen", "currentpicture", "cuttings",
+    commands = {
+        "arrowhead",
+        "currentpen", "currentpicture", "cuttings",
         "defaultfont", "extra_beginfig", "extra_endfig",
-        "beveled", "black", "blue", "bp", "butt", "cc", "cm", "dd", "ditto", "down", "epsilon",
-        "evenly", "fullcircle", "green", "halfcircle", "identity", "in", "infinity", "left",
-        "mitered", "mm", "origin", "pensquare", "pt", "quartercircle", "red", "right",
-        "rounded", "squared", "unitsquare", "up", "white", "withdots",
+        "ditto", "EOF", "down",
+        "evenly", "fullcircle", "halfcircle", "identity", "in", "left",
+        "origin", "pensquare",  "quartercircle", "right",
+        "unitsquare", "up", "withdots",
         "abs", "bbox", "ceiling", "center", "cutafter", "cutbefore", "dir",
-        "directionpoint", "div", "dotprod", "intersectionpoint", "inverse", "mod", "lft",
-        "round", "rt", "unitvector", "whatever",
+        "directionpoint", "div", "dotprod", "intersectionpoint", "inverse", "mod",
+        "round", "unitvector", "whatever",
         "cutdraw", "draw", "drawarrow", "drawdblarrow", "fill", "filldraw", "drawdot",
-        "loggingall", "pickup", "tracingall", "tracingnone", "undraw", "unfill",
-        "unfilldraw",
+        "loggingall", "interact", "tracingall", "tracingnone",
+        "pickup",
+        "undraw", "unfill", "unfilldraw",
         "buildcycle", "dashpattern", "decr", "dotlabel", "dotlabels", "drawoptions",
         "incr", "label", "labels", "max", "min", "thelabel", "z",
         "beginchar", "blacker", "capsule_end", "change_width",
@@ -67,7 +78,33 @@ return {
         "define_whole_blacker_pixels", "define_whole_pixels",
         "define_whole_vertical_blacker_pixels",
         "define_whole_vertical_pixels", "endchar", "extra_beginchar",
-        "extra_endchar", "extra_setup", "font_coding_scheme", "clearxy",
+        "extra_endchar", "extra_setup", "font_coding_scheme",
+        "clearxy", "clearit", "clearpen", "shipit",
         "font_extra_space",
+        "exitunless",
+        "relax", "hide", "gobble", "gobbled", "stop",
+        "blankpicture",
+        "counterclockwise", "tensepath", "takepower", "direction",
+        "softjoin", -- "magstep",
+        "makelabel", -- "laboff",
+        "rotatedabout", "flex", "superellipse", "erase", "image",
+        "nullpen", "savepen", "clearpen", "penpos", "penlabels", -- "clear_pen_memory",
+        "range", "numtok", "thru",
+        "z", "laboff",
+        "bye",
+        --
+        "red", "green", "blue", "cyan", "magenta", "yellow", "black", "white", "background",
+        "graypart", "graycolor",
+        --
+        "mm", "pt", "dd", "bp", "cm", "pc", "cc", "in",
+    },
+    internals = { -- we need to remove duplicates above
+        --
+        "mitered", "rounded", "beveled", "butt", "squared",
+        "eps", "epsilon", "infinity",
+        "bboxmargin", "ahlength", "ahangle", "labeloffset", "dotlabeldiam", "defaultpen", "defaultscale", "join_radius",
+        --
+        "pen_lft", "pen_rt", "pen_top", "pen_bot", -- "pen_count_",
+        --
     },
 }