summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/metapost
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2016-02-15 22:12:27 +0000
committerKarl Berry <karl@freefriends.org>2016-02-15 22:12:27 +0000
commit1bcffdf948f1e58b348b76c3faae232242d01da3 (patch)
tree3054812196a17eb83458cb746fdd6465b834cf9a /Master/texmf-dist/metapost
parentc83d372fcf897fdd6cda8a02c32295bed1bd5974 (diff)
mcf2graph (14feb16)
git-svn-id: svn://tug.org/texlive/trunk@39732 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/metapost')
-rw-r--r--Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf15
1 files changed, 9 insertions, 6 deletions
diff --git a/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf b/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf
index 03125f9e88d..9f5ef880e50 100644
--- a/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf
+++ b/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf
@@ -1,5 +1,5 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% mcf2graph ver 3.81 Copyright (c) 2013-2016 Akira Yamaji
+% mcf2graph ver 3.82 Copyright (c) 2013-2016 Akira Yamaji
%
% Permission is hereby granted, free of charge, to any person obtaining a copy of this software
% and associated documentation files (the "Software"), to deal in the Software without restriction,
@@ -176,21 +176,24 @@ def font_use_check=
enddef;
%-------------------------------------------------------------------------------------------------
def set_def_MC=
- save /,*,//,/*,*/,**,~,^,`,{,},<,>,&,&#,:,=,\,\\,*\,\*,@,$,#,|,||,d,w,z,inside_def_MC;
+ save /,*,//,/*,*/,**,~,~~,^,^^,`,'`,{,},<,>,>>,:>,&,&#,:,=,\,\\,*\,\*,@,$,#,|,||,
+ d,w,z,inside_def_MC;
inside_def_MC:=1; d:=dl; w:=wf; z:=zf;
vardef $(text a)tertiary b == $$(a)(b) enddef; tertiarydef a=b == $$(a)(b) enddef;
vardef @(text a)tertiary b == @@(a)(b) enddef; tertiarydef a:b == @@(a)(b) enddef;
vardef #primary a == if numeric a:: a-4095 elseif pair a:: a+(0,-4095) fi enddef;
def &primary n ==(_cyc,n) enddef; def &# == & # enddef;
- tertiarydef a^b == (_tmp_rot,b),a enddef; tertiarydef a`b == (_tmp_len,b),a enddef;
- tertiarydef a>b == (_tmp_env,b),a enddef; tertiarydef a~b == (_tmp_line,b),a enddef;
+ def ^^primary n == (_tmp_rot,n) enddef; def ~~primary n == (_tmp_line,n) enddef;
+ def '`primary n == (_tmp_len,n) enddef; def :>primary n == (_tmp_env,n) enddef;
+ def >>primary n == (_chg_env,n) enddef; def ``primary n == (_chg_len,n) enddef;
+ def <primary n == (_rot_ang,n) enddef;
+ tertiarydef a^b == ^^b,a enddef; tertiarydef a`b == '`b,a enddef;
+ tertiarydef a~b == ~~b,a enddef; tertiarydef a>b == :>b,a enddef;
def * == (0,1) enddef; def \ == *,0 enddef; def \\ == *,0~dm enddef;
def *\ == *,0~wf enddef; def \* == *,0~zf enddef;
def { == (_push,1) enddef; def } == (_pop,1) enddef;
def {{ == (_push,0) enddef; def }} == (_pop,0) enddef;
def | == {,} enddef; def || == (_stack_reset,0) enddef;
- def >>primary n == (_chg_env,n) enddef; def ``primary n == (_chg_len,n) enddef;
- def <primary n == (_rot_ang,n) enddef;
def /secondary n == (_postA,n) enddef; def //secondary n == (_postB,n) enddef;
def */secondary n == (_postC,n) enddef; def /*secondary n == (_postD,n) enddef;
def **secondary n == (_postE,n) enddef; def */*secondary n == (_postF,n) enddef;