From acec65f91662d3a566827dc250ad2f9235d81f06 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 28 Jun 2021 20:35:30 +0000 Subject: mcf2graph (28jun21) git-svn-id: svn://tug.org/texlive/trunk@59735 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/metapost/mcf2graph/mcf2graph.mf | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'Master/texmf-dist/metapost') 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 -- cgit v1.2.3