Return to rect.C CVS log

Up to [Research Unix] / researchv9 / jerq / src / lib / j / drek

Annotation of researchv9/jerq/src/lib/j/drek/rect.C, revision 1.1.1.1

1.1       root        1: typedef struct {
                      2:        short x;
                      3:        short y;
                      4: } Point;
                      5: typedef struct {
                      6:        Point origin;
                      7:        Point corner;
                      8: } Rectangle;
                      9: 
                     10: Rectangle
                     11: Rect(a,b,c,d)
                     12: short a,b,c,d;
                     13: {
                     14:        Rectangle temp;
                     15:        temp.origin.x = a;
                     16:        temp.origin.y = b;
                     17:        temp.corner.x = c;
                     18:        temp.corner.y = d;
                     19:        return(temp);
                     20: }
                     21: Point
                     22: Pt(a,b)
                     23: short a,b;
                     24: {
                     25:        Point temp;
                     26: 
                     27:        temp.x = a;
                     28:        temp.y = b;
                     29:        return(temp);
                     30: }
                     31: Rectangle
                     32: Rpt(p,q)
                     33: Point p,q;
                     34: {
                     35:        Rectangle temp;
                     36: 
                     37:        temp.origin.x = p.x;
                     38:        temp.origin.y = p.y;
                     39:        temp.corner.x = q.x;
                     40:        temp.corner.y = q.y;
                     41:        return(temp);
                     42: }
                     43: main()
                     44: {      
                     45:        Point Pt();
                     46:        register Point p;
                     47: 
                     48:        int x,y;
                     49: 
                     50:        x=0;
                     51:        y=0;
                     52: 
                     53:        p = Pt(x,y);
                     54: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.