[wadalabfont-kit] / renderer / newjoint.l  

Diff of /renderer/newjoint.l

Parent Directory | Revision Log

version 1.4, Thu Jul 3 02:01:26 2003 UTC version 1.5, Thu Jul 3 11:42:38 2003 UTC
Line 147 
Line 147 
 ;                 (virtual-region '(nil nil) '(0 0 200 400))  ;                 (virtual-region '(nil nil) '(0 0 200 400))
 ;                 (car nprims) `((ylimit 0 . 50).,newalist) '(0 0 200 400))  ;                 (car nprims) `((ylimit 0 . 50).,newalist) '(0 0 200 400))
 ;                affines)))  ;                affines)))
   ;
   ;
   ;    (prind (car nprims))(prind (car affines))
     (setq prim (affinepart (car nprims) (car affines)))      (setq prim (affinepart (car nprims) (car affines)))
     (push (xunit prim 200.0) xunits)      (push (xunit prim 200.0) xunits)
 ;    (setq yunitsum (plus yunitsum (yunit prim 100.0)))  ;    (setq yunitsum (plus yunitsum (yunit prim 100.0)))

Generate output suitable for use with a patch program
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
ktanaka

Powered by ViewCVS 1.0-dev

ViewCVS and CVS Help