summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/metapost/mcf2graph
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2021-06-28 20:35:30 +0000
committerKarl Berry <karl@freefriends.org>2021-06-28 20:35:30 +0000
commitacec65f91662d3a566827dc250ad2f9235d81f06 (patch)
tree5a144afe3cca861b90f78baf456139d12dcef018 /Master/texmf-dist/metapost/mcf2graph
parent53e7b4e25a67c30b53cbd24073999d207030ec67 (diff)
mcf2graph (28jun21)
git-svn-id: svn://tug.org/texlive/trunk@59735 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/metapost/mcf2graph')
-rw-r--r--Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf12
1 files changed, 6 insertions, 6 deletions
diff --git a/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf b/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf
index bc0dd5d6b6a..33fec242fe0 100644
--- a/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf
+++ b/Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf
@@ -1,5 +1,5 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% mcf2graph ver 4.67 Copyright (c) 2013-2021 Akira Yamaji
+% mcf2graph ver 4.68 Copyright (c) 2013-2021 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,
@@ -37,7 +37,7 @@
% Set to use plain.mp (label,arrow,atom) : mpost -s labeloffset=2 FILENAME
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
tracingstats:=1;
-message "* This is mcf2graph ver 4.67 2021.06.13";
+message "* This is mcf2graph ver 4.68 2021.06.28";
%-------------------------------------------------------------------------------------------------
newinternal cntA,cntB,cntM,minX,minY,maxX,maxY,sftX,sftY,com,par,envT,envB,lenT,lineT,angT,rotT,
crR,nA,nB,nC,nD,nE,nF,nS,nL,nR,nU,nP,xpos,ypos,markA,markB,saveA,saveB,bondL;
@@ -252,7 +252,7 @@ enddef;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
def beginfont(text s)=
begingroup
- save ',f_beginchar,f_ext,blen,ext,add,ang_br,n_fw,n_bw,at_colon,at_semicol,temps,t_tag,f_close,
+ save ',f_beginchar,f_ext,blen,ext,add,ang_br,n_fw,n_bw,at_colon,at_semicol,temps,t_tag,
mc,info,file_name_input,bond_cnt,warning_cnt,hideH_cnt,bondC;
numeric at_semicol[];
string info[],mc[],mc,temps,file_name_input,t_tag;
@@ -269,7 +269,7 @@ def beginfont(text s)=
%------------------------------------------------------------------------------------------------
char_num:=char_num+1;
store_par(parameter_list);
- f_ext:=cntM:=mc_row:=inf_num:=f_EOF:=0; f_close:=1;
+ f_ext:=cntM:=mc_row:=inf_num:=f_EOF:=f_close:=0;
for list=s: inf_num:=inf_num+1; info[inf_num]:=list; mc[inf_num]:=""; endfor
%------------------------------------------------------------------------------------------------
for j=1 upto inf_num:
@@ -284,8 +284,8 @@ def beginfont(text s)=
ef at_colon>=1:
s_tag:=substring (0,at_colon-1) of info[j];
s_var:=substring (at_colon,length(info[j])) of info[j];
- if s_tag="f": if f_MP=1: file_name_input:=s_var&".mcf"; fi
- ef s_tag="f+": if f_MP=1: file_name_input:=s_var&".mcf"; f_close:=0; fi
+ if s_tag="f": if f_MP=1: file_name_input:=s_var&".mcf"; f_close:=1; fi
+ ef s_tag="f+": if f_MP=1: file_name_input:=s_var&".mcf"; fi
ef s_tag="t": if f_MP=1: t_tag:=s_var; fi
ef s_tag="v": if f_MP=1: pickup_data_unit(t_tag,s_var); fi
else: if known scantokens("inf_"&s_tag): scantokens("inf_"&s_tag):=s_var; fi