/ast/src/lib/libtk/library/ |
H A D | tearoff.tcl | 26 # the parent of the new menu. This guarantees that the torn off 32 set parent [winfo parent $w] 33 while {([winfo toplevel $parent] != $parent) 34 || ([winfo class $parent] == "Menu")} { 35 set parent [winfo parent $parent] 37 if {$parent [all...] |
H A D | focus.tcl | 31 set parent $cur 48 # No more siblings, so go to the current widget's parent. 52 set cur $parent 56 set parent [winfo parent $parent] 57 set children [winfo children $parent] 86 set parent $cur 90 set parent [winfo parent [all...] |
H A D | menu.tcl | 310 set parent [winfo parent $menu] 311 if {([winfo class $parent] != "Menu") 312 || ![winfo ismapped $parent]} { 315 $parent activate none 316 $parent postcascade none 317 if {![wm overrideredirect $parent]} { 320 set menu $parent 448 && ([winfo class [winfo parent $menu]] == "Menu") 449 && [winfo ismapped [winfo parent [all...] |
H A D | bgerror.tcl | 61 - [winfo vrootx [winfo parent $w]]] 63 - [winfo vrooty [winfo parent $w]]]
|
H A D | msgbox.tcl | 44 {-parent "" "" .} 55 if ![winfo exists $data(-parent)] { 56 error "bad window path name \"$data(-parent)\"" 118 # 2. Set the dialog to be a child window of $parent 121 if [string compare $data(-parent) .] { 122 set w $data(-parent).__tk__messagebox 135 wm transient $w $data(-parent) 208 - [winfo vrootx [winfo parent $w]]] 210 - [winfo vrooty [winfo parent $w]]]
|
H A D | dialog.tcl | 45 # [winfo parent $w] is iconified, but it's really needed; otherwise 49 wm transient $w [winfo toplevel [winfo parent $w]] 101 # that destroys the window, such as its parent window being destroyed. 112 - [winfo vrootx [winfo parent $w]]] 114 - [winfo vrooty [winfo parent $w]]]
|
/ast/src/lib/libpp/ |
H A D | ppincref.c | 32 ppincref(char* parent, char* file, int line, int type) argument 37 NoP(parent);
|
/ast/src/lib/libdss/ |
H A D | dss-count.h | 30 "[+DESCRIPTION?The \bdss\b \bcount\b query prints the parent expression" 75 sfprintf(expr->op, "%I*u/%I*u\n", sizeof(expr->parent->selected), expr == expr->parent->fail ? (expr->parent->queried - expr->parent->selected) : expr->parent->selected, sizeof(expr->parent->queried), expr->parent->queried); 82 "print parent expression record counts", \
|
H A D | dss-compress.h | 30 "[+DESCRIPTION?The \bdss\b \bcompress\b query compresses the parent output" 74 if (expr->pass || expr->fail || expr->parent->pass != expr) 77 (*disc->errorf)(NiL, disc, 2, "can only compress parent output stream"); 80 expr->parent->pass = 0; 81 if (expr->parent->op != expr->op) 83 if (expr->parent->op != sfstdout) 84 sfclose(expr->parent->op); 85 expr->parent->op = expr->op; 108 "compress parent output stream", \
|
/ast/src/lib/libast/disc/ |
H A D | sfdcsubstr.c | 35 Sfio_t* parent; /* parent stream */ member in struct:_subfile_s 53 reg Sfoff_t here, parent; local 64 /* save current location in parent stream */ 65 parent = sfsk(f,(Sfoff_t)0,SEEK_CUR,disc); 79 /* restore parent current position */ 80 sfsk(f,parent,SEEK_SET,disc); 122 reg Sfoff_t here, parent; local 138 { parent = sfsk(f,(Sfoff_t)0,SEEK_CUR,disc); 142 sfsk(f,parent,SEEK_SE 172 sfdcsubstream(Sfio_t* f, Sfio_t* parent, Sfoff_t offset, Sfoff_t extent) argument [all...] |
/ast/src/cmd/pack/ |
H A D | huffinit.c | 51 int parent[2*END+1]; local 84 parent[i] = 0; 98 parent[heap[1].node] = ++lastnode; 103 parent[heap[1].node] = lastnode; 108 parent[lastnode] = 0; 116 for(n=parent[i]; n!=0; n=parent[n])
|
/ast/src/lib/libast/sfio/ |
H A D | sfpopen.c | 183 int stdio, parent[2], child[2]; 202 parent[0] = parent[1] = child[0] = child[1] = -1; 204 { if(syspipef(parent) < 0) 212 default : /* in parent process */ 225 if(!(f = sfnew(f,NIL(Void_t*),(size_t)SF_UNBOUND,parent[pkeep],sflags|((sflags&SF_RDWR)?0:SF_READ)))) 228 { CLOSE(parent[!pkeep]); 229 SETCLOEXEC(parent[pkeep]); 253 { CLOSE(parent[!pkeep]); 267 { if (parent[pkee [all...] |
/ast/src/cmd/mam/ |
H A D | mamtst.c | 47 if (pp->parent) sfputc(sfstdout, '\n'); 48 sfprintf(sfstdout, "process %s pid %d ppid %d start %lu finish %lu status %d\n", pp->pwd, pp->pid, pp->parent ? pp->parent->pid : 0, pp->start, pp->finish, pp->status);
|
/ast/src/cmd/tests/sfio/ |
H A D | tmprdwr.c | 117 int parent[2], child[2]; local 121 if(pipe(parent) < 0 || pipe(child) < 0) 134 disc.send = parent[1]; 144 close(child[0]); close(parent[1]); 145 writeprocess(child[1], parent[0], fw); 148 close(child[1]); close(parent[0]);
|
/ast/src/lib/libbz/ |
H A D | huffman.c | 118 Int32 parent [ BZ_MAX_ALPHA_SIZE * 2 ]; local 130 parent[0] = -2; 133 parent[i] = -1; 145 parent[n1] = parent[n2] = nNodes; 147 parent[nNodes] = -1; 159 while (parent[k] >= 0) { k = parent[k]; j++; }
|
/ast/src/lib/libast/misc/ |
H A D | ftwalk.c | 86 e->parent = e; 87 e->parent->link = e; 105 e->parent->link = e; 106 rv = (*userf)((Ftw_t*)e->parent); 107 e->parent->link = 0;
|
H A D | fts.c | 46 FTSENT* parent; /* top parent */ \ 58 FTSENT* pwd; /* pwd parent */ \ 87 FTSENT* pwd; /* pwd parent */ \ 177 node(FTS* fts, FTSENT* parent, register char* name, register size_t namelen) argument 201 f->fts_level = (f->fts_parent = parent)->fts_level + 1; 435 * set to parent dir 612 if (!(f = node(fts, fts->parent, path, strlen(path)))) 782 fts->parent = (FTSENT*)(fts + 1); 783 fts->parent [all...] |
/ast/src/lib/libtk/generic/ |
H A D | tkGeometry.c | 28 * slave's parent. */ 234 * geometry for the slave into the coordinate system of the parent 237 * any of its ancestors up to the slave's parent) is mapped, unmapped, 258 * of slave's parent. */ 266 Tk_Window ancestor, parent; 278 parent = Tk_Parent(slave); 311 * the windows between master and slave's parent (including master 312 * but not slave's parent). There may already be handlers for master 316 for (ancestor = master; ancestor != parent; 337 if (!Tk_IsMapped(ancestor) && (ancestor != parent)) { 262 Tk_Window ancestor, parent; local 551 Tk_Window ancestor, parent; local [all...] |
H A D | tkWindow.c | 194 Tk_Window parent, char *name, char *screenName)); 212 * Make a new window that will be at top-level (its parent will 230 CreateTopLevelWindow(interp, parent, name, screenName) 232 Tk_Window parent; /* Token for logical parent of new window 235 char *name; /* Name for new window; if parent is 236 * non-NULL, must be unique among parent's 241 * use parent's screen, or DISPLAY if no 242 * parent. */ 276 if ((parent ! 885 Tk_Window parent; local 1253 Window parent; local [all...] |
/ast/src/cmd/kshlib/dss/ |
H A D | dss.c | 76 Namval_t *parent; member in struct:Namtype 111 struct parent struct 134 struct parent *dp = (struct parent*)nv_hasdisc(bp->vnode,&parent_disc); 256 struct parent *pp = (struct parent*)cp->ptype; 294 struct parent *dp = (struct parent*)pp->ptype; 355 struct parent *dp = (struct parent*)p 1154 Namval_t *parent = nv_lastdict(); local [all...] |
/ast/src/lib/libtk/library/demos/ |
H A D | filebox.tcl | 56 set file [tk_getOpenFile -filetypes $types -parent $w] 58 set file [tk_getSaveFile -filetypes $types -parent $w \
|
H A D | msgbox.tcl | 56 -title Message -parent $w\ 60 -parent $w
|
H A D | clrpick.tcl | 35 set color [tk_chooseColor -title "Choose a $name color" -parent $w \
|
/ast/src/lib/libast/include/ |
H A D | ftwalk.h | 43 #define fts_parent parent
|
/ast/src/cmd/ksh93/sh/ |
H A D | parse.c | 110 unsigned long parent=lexp->script; local 113 parent = lexp->current; 148 parent=kiaentity(lexp,sh_argstr(cmd),-1,'p',-1,-1,lexp->unknown,'b',0,""); 157 r=kiaentity(lexp,argp->argval,n,type,line,eline,parent,justify,width,atbuff); 242 * Make a parent node for fork() or io-redirection 2020 unsigned long kiaentity(Lex_t *lexp,const char *name,int len,int type,int first,int last,unsigned long parent, int pkind, int width, const char *attr) argument 2045 sfprintf(lexp->kiafile,"%..64d;%c;%.*s;%d;%d;%..64d;%..64d;%c;%d;%s\n",np->hash,type,len,name,first,last,parent,lexp->fscript,pkind,width,attr); 2047 sfprintf(lexp->kiafile,"%..64d;%c;%s;%d;%d;%..64d;%..64d;%c;%d;%s\n",np->hash,type,name,first,last,parent,lexp->fscript,pkind,width,attr);
|