Mercurial > hg > xemacs-beta
annotate pkg-src/tree-nx/Line.m @ 175:2d532a89d707 r20-3b14
Import from CVS: tag r20-3b14
| author | cvs |
|---|---|
| date | Mon, 13 Aug 2007 09:50:14 +0200 |
| parents | 0132846995bd |
| children |
| rev | line source |
|---|---|
| 163 | 1 |
| 2 #import "Line.h" | |
| 3 | |
| 4 @implementation Line | |
| 5 | |
| 6 - setStart:(NXPoint *)s end:(NXPoint *)e | |
| 7 { | |
| 8 start.x = s->x; | |
| 9 start.y = s->y; | |
| 10 end.x = e->x; | |
| 11 end.y = e->y; | |
| 12 return self; | |
| 13 } | |
| 14 | |
| 15 - render | |
| 16 { | |
| 17 PSmoveto(start.x, start.y); | |
| 18 PSlineto(end.x, end.y); | |
| 19 PSstroke(); | |
| 20 return self; | |
| 21 } | |
| 22 | |
| 23 @end |