Return to safeselect.c CVS log

Up to [Research Unix] / researchv10dc / 630 / src

Annotation of researchv10dc/630/src/safeselect.c, revision 1.1.1.1

1.1       root        1: #include <jerq.h>
                      2: #include <layer.h>
                      3: #include <queue.h>
                      4: #include "jerqproc.h"
                      5: #include "frame.h"
                      6: 
                      7: select(f, pt)
                      8:        register Frame *f;
                      9:        Point pt;
                     10: {
                     11:        register fix, var, oldvar;
                     12:        if(f->s1 != f->s2)
                     13:                selectf(f, F_XOR);
                     14:        fix=charofpt(f, pt);    /* fixed point */
                     15:        oldvar=fix;             /* moving point tracks mouse */
                     16:        var=fix;
                     17:        while (button1()) {
                     18:                if(var != oldvar){
                     19:                        f->s1=oldvar; f->s2=var;
                     20:                        order(f);
                     21:                        selectf(f, F_XOR);
                     22:                        oldvar=var;
                     23:                }
                     24:                var=charofpt(f, mouse.xy);
                     25:        }
                     26:        f->s1=fix; f->s2=oldvar;
                     27:        order(f);
                     28: }
                     29: order(f)
                     30:        register Frame *f;
                     31: {
                     32:        register a;
                     33:        if(f->s1 > f->s2){
                     34:                a=f->s1;
                     35:                f->s1=f->s2;
                     36:                f->s2=a;
                     37:        }
                     38: }

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