/[gzz]/gzz/metacode/umlhelper.mp
ViewVC logotype

Diff of /gzz/metacode/umlhelper.mp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.14 by tjl, Wed Jan 1 13:19:53 2003 UTC revision 1.15 by tjl, Wed Jan 1 13:37:10 2003 UTC
# Line 214  vardef vobtransformtoassoc(expr p, multi Line 214  vardef vobtransformtoassoc(expr p, multi
214      pickup pe;      pickup pe;
215  enddef;  enddef;
216    
217    vobinthick = .7 pt;
218    
219    vardef vobinfromassoc(expr p, multi, role) =
220        save pe;
221        pe = savepen;
222        pickup pencircle scaled vobinthick;
223        draw p dashed evenly;
224        adornassocend(p, multi, role);
225        pickup pe;
226    enddef;
227    
228    vardef vobintoassoc(expr p, multi, role) =
229        save pe;
230        pe = savepen;
231        pickup pencircle scaled vobinthick;
232        draw arrowedpath(p, 1.4, 1.0);
233        draw p dashed evenly;
234        adornassocend(p, multi, role);
235        pickup pe;
236    enddef;
237    
238    
239  vardef inherit(expr p) =  vardef inherit(expr p) =
240      save ap;      save ap;
241      path ap;      path ap;

Legend:
Removed from v.1.14  
changed lines
  Added in v.1.15

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26