/ast/src/cmd/pack/ |
H A D | huffencode.c | 39 #define putbits(buff,left,bits,n) (left+=(n),buff=((buff<<(n))|(bits))) 40 #define outchars(fp,buff,left,outp,n) while(left>=CHAR_BIT)\ 42 left-=CHAR_BIT; \ 43 *outp++ = buff>>left; \ 62 register int left, i, c; local 82 left = hp->left; 106 putbits(buffer,left,bit [all...] |
H A D | huffdecode.c | 32 #define fillbuff(b,left,bit,inp) while(left<(bit))\ 36 left+=CHAR_BIT;\ 40 #define getbits(b,left,n) (((b)>>(left-=(n)))&((1L<<(n))-1)) 42 #define putbits(b,left,n) (left+=(n)) 67 register int left, i, n; local 99 left = hp->left; [all...] |
/ast/src/lib/libtk/library/demos/ |
H A D | label.tcl | 15 label $w.msg -font $font -wraplength 4i -justify left -text "Five labels are displayed below: three textual ones on the left, and a bitmap label and a text label on the right. Labels are pretty boring because you can't do anything with them." 22 pack $w.buttons.dismiss $w.buttons.code -side left -expand 1 24 frame $w.left 26 pack $w.left $w.right -side left -expand yes -padx 10 -pady 10 -fill both 28 label $w.left.l1 -text "First label" 29 label $w.left.l2 -text "Second label, raised" -relief raised 30 label $w.left.l3 -text "Third label, sunken" -relief sunken 31 pack $w.left [all...] |
H A D | icon.tcl | 15 label $w.msg -font $font -wraplength 5i -justify left -text "This window shows three ways of using bitmaps or images in radiobuttons and checkbuttons. On the left are two radiobuttons, each of which displays a bitmap and an indicator. In the middle is a checkbutton that displays a different image depending on whether it is selected or not. On the right is a checkbutton that displays a single bitmap but changes its background color to indicate whether or not it is selected." 22 pack $w.buttons.dismiss $w.buttons.code -side left -expand 1 39 frame $w.frame.left 40 pack $w.frame.left $w.frame.b1 $w.frame.b2 -side left -expand yes -padx 5m 42 radiobutton $w.frame.left.b3 \ 45 radiobutton $w.frame.left.b4 \ 48 pack $w.frame.left.b3 $w.frame.left [all...] |
H A D | msgbox.tcl | 14 label $w.msg -font $font -wraplength 4i -justify left -text "Choose the icon and type option of the message box. Then press the \"Message Box\" button to see the message box." 23 pack $w.buttons.dismiss $w.buttons.code $w.buttons.vars -side left -expand 1 25 frame $w.left 27 pack $w.left $w.right -side left -expand yes -fill y -pady .5c -padx .5c 29 label $w.left.label -text "Icon" 30 frame $w.left.sep -relief ridge -bd 1 -height 2 31 pack $w.left.label -side top 32 pack $w.left.sep -side top -fill x -expand no 36 radiobutton $w.left [all...] |
H A D | radio.tcl | 14 label $w.msg -font $font -wraplength 5i -justify left -text "Two groups of radiobuttons are displayed below. If you click on a button then the button will become selected exclusively among all the buttons in its group. A Tcl variable is associated with each group to indicate which of the group's buttons is selected. Click the \"See Variables\" button to see the current values of the variables." 23 pack $w.buttons.dismiss $w.buttons.code $w.buttons.vars -side left -expand 1 25 frame $w.left 27 pack $w.left $w.right -side left -expand yes -pady .5c -padx .5c 30 radiobutton $w.left.b$i -text "Point Size $i" -variable size \ 32 pack $w.left.b$i -side top -pady 2 -anchor w
|
H A D | filebox.tcl | 14 label $w.msg -font $font -wraplength 4i -justify left -text "Enter a file name in the entry box or click on the \"Browse\" buttons to select a file name using the file selection dialog." 21 pack $w.buttons.dismiss $w.buttons.code -side left -expand 1 28 pack $f.lab -side left 29 pack $f.ent -side left -expand yes -fill x 30 pack $f.but -side left
|
H A D | form.tcl | 15 label $w.msg -font $font -wraplength 4i -justify left -text "This window contains a simple form where you can type in the various entries and use tabs to move circularly between the entries." 22 pack $w.buttons.dismiss $w.buttons.code -side left -expand 1 29 pack $w.$i.label -side left
|
H A D | button.tcl | 15 label $w.msg -font $font -wraplength 4i -justify left -text "If you click on any of the four buttons below, the background of the button area will change to the color indicated in the button. You can press Tab to move among the buttons, then press Space to invoke the current button." 22 pack $w.buttons.dismiss $w.buttons.code -side left -expand 1
|
H A D | check.tcl | 15 label $w.msg -font $font -wraplength 4i -justify left -text "Three checkbuttons are displayed below. If you click on a button, it will toggle the button's selection state and set a Tcl variable to a value indicating the state of the checkbutton. Click the \"See Variables\" button to see the current values of the variables." 24 pack $w.buttons.dismiss $w.buttons.code $w.buttons.vars -side left -expand 1
|
H A D | bitmap.tcl | 23 pack $w.$i -side left -fill both -pady .25c -padx .25c 39 label $w.msg -font $font -wraplength 4i -justify left -text "This window displays all of Tk's built-in bitmaps, along with the names you can use for them in Tcl scripts." 46 pack $w.buttons.dismiss $w.buttons.code -side left -expand 1
|
H A D | states.tcl | 15 label $w.msg -font $font -wraplength 4i -justify left -text "A listbox containing the 50 states is displayed below, along with a scrollbar. You can scan the list either using the scrollbar or by scanning. To scan, press button 2 in the widget and drag up or down." 22 pack $w.buttons.dismiss $w.buttons.code -side left -expand 1 30 pack $w.frame.list -side left -expand 1 -fill both
|
H A D | entry1.tcl | 15 label $w.msg -font $font -wraplength 5i -justify left -text "Three different entries are displayed below. You can add characters by pointing, clicking and typing. The normal Motif editing characters are supported, along with many Emacs bindings. For example, Backspace and Control-h delete the character to the left of the insertion cursor and Delete and Control-d delete the chararacter to the right of the insertion cursor. For entries that are too large to fit in the window all at once, you can scan through the entries by dragging with mouse button2 pressed." 22 pack $w.buttons.dismiss $w.buttons.code -side left -expand 1
|
H A D | image1.tcl | 14 label $w.msg -font $font -wraplength 4i -justify left -text "This demonstration displays two images, each in a separate label widget." 21 pack $w.buttons.dismiss $w.buttons.code -side left -expand 1
|
H A D | vscale.tcl | 14 label $w.msg -font $font -wraplength 3.5i -justify left -text "An arrow and a vertical scale are displayed below. If you click or drag mouse button 1 in the scale, you can change the size of the arrow." 21 pack $w.buttons.dismiss $w.buttons.code -side left -expand 1 32 pack $w.frame.scale -side left -anchor ne 33 pack $w.frame.canvas -side left -anchor nw -fill y
|
/ast/src/lib/librecsort/ |
H A D | rs-splay.c | 49 { obj->left = obj->right = NIL(Rsobj_t*); 61 { obj->left = root; 68 { if(!root->left) 70 obj->left = NIL(Rsobj_t*); 78 { if((t = root->left)) 83 if(!(root = root->left)) 118 if(!(root = t->left)) 135 l->right = root->left; 136 r->left = root->right; 138 root->left [all...] |
H A D | rs-radix.c | 49 r->left->right = obj; 51 r->left = obj; 75 work->left->right = NIL(Rsobj_t*); 81 { next = work->left->right; work->left->right = NIL(Rsobj_t*); 112 r->left->right = work; 119 r->left = work; 123 work = *lo; t = work->left; *lo = NIL(Rsobj_t*); 130 t = r->left; 139 if(work && work->left [all...] |
H A D | rs-rasp.c | 90 r->left->right = obj; 92 r->left = obj; 112 obj->left = obj->right = NIL(Rsobj_t*); 124 { if((t = root->left)) 129 if(!(root = root->left)) 164 if(!(root = t->left)) 181 l->right = root->left; 182 r->left = root->right; 184 root->left = link.right; 185 root->right = link.left; [all...] |
/ast/src/cmd/mailx/port/ |
H A D | dttree.c | 104 { while((t = root->left) ) 124 { while((t = root->left) ) 144 /* note that link.right is LEFT tree and link.left is RIGHT tree */ 152 else if(cmp < 0) /* left turn */ 153 { if((t = root->left) ) 159 t = root->left; 161 else /* left,right */ 177 else /* right, left */ 179 t = t->left; 189 l->right = root->left; [all...] |
H A D | dtrenew.c | 96 dt->data->here = e->left; 98 { while(r->left) 100 r->left = e->left; 120 for(t = dt->data->head->left; t != e->left; r = t, t = t->right->left) 134 if(e == e->left) 137 r->left = t;
|
H A D | dtstkq.c | 74 ** List is doubly linked with head->left points to last elt. 97 if(t->right) /* head->left always points to last element */ 98 t->right->left = t->left; 129 r = r->left; 153 t->left = t; 157 t->left = r->left; 158 r->left = t; 162 { r = r->left; [all...] |
H A D | dthdr.h | 81 #define left hl._left macro 121 #define RROTATE(x,y) ((x)->left = (y)->right, (y)->right = (x), (x) = (y)) 122 #define LROTATE(x,y) ((x)->right = (y)->left, (y)->left = (x), (x) = (y)) 123 #define RLINK(r,x) (r = r->left = x )
|
/ast/src/cmd/ksh93/sh/ |
H A D | timers.c | 91 static double left; local 93 left = 0; 144 if(tpmin && (left==0 || (tp && tpmin->wakeup < (now+left)))) 146 if(left==0) 148 left = setalarm(tpmin->wakeup-now); 149 if(left && (now+left) < tpmin->wakeup) 150 setalarm(left); 152 left [all...] |
/ast/src/lib/libz/ |
H A D | inftrees.c | 52 int left; /* number of prefix codes available */ local 137 left = 1; 139 left <<= 1; 140 left -= count[len]; 141 if (left < 0) return -1; /* over-subscribed */ 143 if (left > 0 && (type == CODES || max != 1)) 276 left = (int)(1 << curr); 278 left -= count[curr + drop]; 279 if (left <= 0) break; 281 left << [all...] |
/ast/src/cmd/dsslib/ip_t/ |
H A D | ireexec.h | 120 int left = ire->left; local 129 } while (!left && lp < rp);
|