/ast/src/lib/libast/sfio/ |
H A D | sfstack.c | 30 #define STKMTXLOCK(f1,f2) \ 32 if(f2) SFMTXLOCK(f2); \ 34 #define STKMTXRETURN(f1,f2,rv) \ 36 if(f2) SFMTXUNLOCK(f2); \ 41 Sfio_t* sfstack(Sfio_t* f1, Sfio_t* f2) argument 43 Sfio_t* sfstack(f1,f2) 45 Sfio_t* f2; /* top of stack */ 53 STKMTXLOCK(f1,f2); [all...] |
H A D | sfswap.c | 33 Sfio_t* sfswap(reg Sfio_t* f1, reg Sfio_t* f2) argument 35 Sfio_t* sfswap(f1,f2) 37 reg Sfio_t* f2; 45 if(f2 && SFFROZEN(f2) && (f2->mode&SF_PUSH) ) 47 if(f1 == f2) 48 return f2; 54 if(f2) 55 { f2mode = f2 [all...] |
/ast/src/cmd/tests/sfio/ |
H A D | tappend.c | 24 Sfio_t *f1, *f2; local 35 if(!(f2 = sfopen(NIL(Sfio_t*), tstfile("sf", 0), "a+")) ) 36 terror("Can't open f2"); 43 if(sfwrite(f2,"abcdefghi\n",10) != 10 || sfsync(f2) < 0) 44 terror("Writing to f2"); 45 if((p = sftell(f2)) != 20) 63 if((p = sfseek(f2,(Sfoff_t)10,0)) != 10) 65 if(!(s = sfgetr(f2,'\n',1)) ) 70 if(!(s = sfgetr(f2,'\ [all...] |
H A D | tswap.c | 25 Sfio_t* f2; local 47 if(!(f2 = sfopen(NIL(Sfio_t*), tstfile("sf", 0), "r")) ) 50 if(sfswap(f1,f2) != NIL(Sfio_t*) )
|
H A D | tpool.c | 44 Sfio_t *f, *f1, *f2, *f3, *f4; local 47 !(f2 = sfopen((Sfio_t*)0,tstfile("sf", 1),"w")) || 59 sfsetbuf(f2,poolbuf,sizeof(poolbuf)); 61 if(!sfpool(f2,f3,0) ) 73 if(sfwrite(f2,s,n) != n) 81 !(f2 = sfopen(f2, tstfile("sf", 1), "r")) || 85 if(sfsize(f1) != sfsize(f2) || sfsize(f2) != sfsize(f3)) 90 !(s2 = sfreserve(f2, [all...] |
H A D | tstdio.c | 31 FILE *f, *f2; local 80 if(!(f2 = fdopen(fd, "r")) ) 84 fseek(f2, 0L, SEEK_SET); 86 if(fread(rbuf, 1, 7, f2) != 7) 92 if((s2 = ftell(f2)) != 7) 93 terror("Bad tell location in f2"); 116 fflush(f2); /* assuming POSIX conformance and to set seek location to 1010 */ 117 if((s2 = ftell(f2)) != 1010) 118 terror("Bad location in f2: s2=%lld", (Sflong_t)s2); 120 fread(rbuf, 10, 1, f2); [all...] |
H A D | tstack.c | 82 Sfio_t *f1, *f2, *f3, *f; local 89 if(!(f2 = sfopen(NIL(Sfio_t*), tstfile("sf", 0),"w+")) ) 91 Fclose = f2; 93 sfdisc(f2,&Disc); 94 sfstack(f1,f2); 110 !(f2 = sfopen((Sfio_t*)0,s2,"s")) || 145 if(sfstack(f,f2) != f) 166 !(f2 = sfopen((Sfio_t*)0,s2,"s")) || 171 if(sfstack(f,f3) != f || sfstack(f,f2) != f || sfstack(f,f1) != f) 206 if(!(f2 [all...] |
H A D | tsize.c | 24 Sfio_t *f, *f2; local 41 if(!(f2 = sfnew(NIL(Sfio_t*),NIL(Void_t*),(size_t)SF_UNBOUND, 45 if(sfseek(f2,(Sfoff_t)1999,0) != (Sfoff_t)1999) 47 sfputc(f2,'b'); 48 sfsync(f2); 49 if((n = (int)sfsize(f2)) != 2000)
|
H A D | tsync.c | 95 Sfio_t *f, *f1, *f2; local 129 if(!(f2 = sfopen(NIL(Sfio_t*), tstfile("sf", 0),"r")) ) 146 if((n = sfread(f2,buf,sizeof(buf))) != 4) 166 sfseek(f2,(Sfoff_t)0,0); 167 sfgetc(f2); 168 if((off = sftell(f2)) != 1) 171 if((off = (Sfoff_t)lseek(sffileno(f2), (off_t)0, 1)) != 1) 174 dupf2 = dup(sffileno(f2)); 175 sfclose(f2);
|
H A D | texcept.c | 98 Sfio_t *f, *f2; local 117 if(!(f2 = sfopen(NIL(Sfio_t*), tstfile("sf", 0), "w")) ) 119 sfdisc(f2,&Disc);
|
/ast/src/lib/libcmd/ |
H A D | cmp.c | 145 cmp(const char* file1, Sfio_t* f1, const char* file2, Sfio_t* f2, int flags, Sfoff_t count, Sfoff_t differences) argument 167 if ((e2 - p2) > 0 || sfreserve(f2, SF_UNBOUND, 0) && sfvalue(f2) > 0) 182 if (!(p2 = (unsigned char*)sfreserve(f2, SF_UNBOUND, 0)) || (c2 = sfvalue(f2)) <= 0) 259 Sfio_t* f2 = 0; local 325 f2 = sfstdin; 326 else if (!(f2 = sfopen(NiL, file2, "r"))) 362 if (o2 && sfseek(f2, o2, SEEK_SET) != o2) 371 else if (fstat(sffileno(f2), [all...] |
H A D | comm.c | 152 Sfio_t *f1, *f2; local 188 f2 = sfstdin; 189 else if(!(f2 = sfopen(NiL, cp,"r"))) 193 if(comm(f1,f2,sfstdout,mode) < 0) 196 else if(f1==sfstdin || f2==sfstdin) 200 if(f2!=sfstdin) 201 sfclose(f2);
|
H A D | cksum.c | 424 order(FTSENT* const* f1, FTSENT* const* f2) argument 426 return strcoll((*f1)->fts_name, (*f2)->fts_name);
|
/ast/src/lib/libtk/library/demos/ |
H A D | form.tcl | 24 foreach i {f1 f2 f3 f4 f5} { 32 $w.f2.label config -text Address: 34 pack $w.msg $w.f1 $w.f2 $w.f3 $w.f4 $w.f5 -side top -fill x
|
/ast/src/cmd/ksh93/tests/ |
H A D | variables.sh | 347 f2=$1 348 case $f2 in 349 '-') f2='' ;; 358 $f1$d1|$d1$f2) continue ;; 362 case $f2$d2 in 363 '') split "$d0$f1$d1$f2$d2" "[1]($f1)" "($f1)()" ;; 365 *) split "$d0$f1$d1$f2$d2" "[2]($f1)($f2)" "($f1)($f2)" ;; 384 $f1$d1|$d1$f2) continu [all...] |
H A D | treemove.sh | 86 function f2 function 97 f2 tree2
|
H A D | functions.sh | 1153 function f2 { print -n ${.sh.fun}; set -o | grep xtrace;} function 1156 f2
|
/ast/src/cmd/ksh93/sh/ |
H A D | io.c | 593 static void io_preserve(Shell_t* shp, register Sfio_t *sp, register int f2) argument 599 fd = sh_fcntl(f2,F_DUPFD,10); 600 if(f2==shp->infd) 608 if(f2 >= shp->gd->lim.open_max) 609 sh_iovalidfd(shp,f2); 610 if(shp->fdptrs[fd]=shp->fdptrs[f2]) 612 if(f2==job.fd) 615 shp->fdptrs[f2] = 0; 618 shp->fdstatus[fd] = shp->fdstatus[f2]; 619 if(fcntl(f2,F_GETF 633 sh_iorenumber(Shell_t *shp, register int f1,register int f2) argument [all...] |
/ast/src/cmd/std/ |
H A D | ls.c | 1044 order_none(register Ftw_t* f1, register Ftw_t* f2) argument 1050 order_blocks(register Ftw_t* f1, register Ftw_t* f2) argument 1052 if (f1->statb.st_size < f2->statb.st_size) 1054 if (f1->statb.st_size > f2->statb.st_size) 1060 order_atime(register Ftw_t* f1, register Ftw_t* f2) argument 1066 t2 = tmxgetatime(&f2->statb); 1075 order_ctime(register Ftw_t* f1, register Ftw_t* f2) argument 1081 t2 = tmxgetctime(&f2->statb); 1090 order_mtime(register Ftw_t* f1, register Ftw_t* f2) argument 1096 t2 = tmxgetmtime(&f2 1105 order_extension(register Ftw_t* f1, register Ftw_t* f2) argument 1130 order_version(Ftw_t* f1, Ftw_t* f2) argument 1136 order_name(Ftw_t* f1, Ftw_t* f2) argument 1146 order(register Ftw_t* f1, register Ftw_t* f2) argument [all...] |
/ast/src/lib/libtk/library/ |
H A D | xmfbox.tcl | 174 set f2 [frame $top.f2] 179 pack $f2 -expand yes -fill both 181 set f2a [frame $f2.a] 182 set f2b [frame $f2.b] 188 grid rowconfig $f2 0 -minsize 0 -weight 1 189 grid columnconfig $f2 0 -minsize 0 -weight 1 190 grid columnconfig $f2 1 -minsize 150 -weight 2
|
H A D | tkfbox.tcl | 815 # f2: the frame with the OK button and the "file name" field 817 set f2 [frame $w.f2] 818 label $f2.lab -text "File name:" -anchor e -width 14 -under 6 819 set data(ent) [entry $f2.ent] 833 set data(okBtn) [button $f2.ok -text OK -under 0 -width 6] 836 # pack the widgets in f2 and f3 839 pack $f2.lab -side left -padx 4 840 pack $f2.ent -expand yes -fill both -padx 2 -pady 2 850 pack $f2 [all...] |
/ast/src/lib/libast/misc/ |
H A D | fts.c | 227 register const FTSENT* f2 = *pf2; local 229 if (f1->statb.st_ino < f2->statb.st_ino) 231 if (f1->statb.st_ino > f2->statb.st_ino) 233 if (f1->statb.st_dev < f2->statb.st_dev) 235 if (f1->statb.st_dev > f2->statb.st_dev) 242 if (f1->statb.st_mtime < f2->statb.st_mtime) 244 if (f1->statb.st_mtime > f2->statb.st_mtime)
|
/ast/src/cmd/tw/ |
H A D | tw.c | 601 order(register Ftw_t* f1, register Ftw_t* f2) argument 639 v = icase ? strcasecmp(f1->name, f2->name) : strcoll(f1->name, f2->name); 643 n2 = getnum(x->data.variable.symbol, f2); 666 message((-2, "order(%s,%s) = %d [n1=%ld n2=%ld]", f1->name, f2->name, v, n1, n2));
|
/ast/src/cmd/cs/ |
H A D | cs.c | 171 order(register Ftw_t* f1, register Ftw_t* f2) argument 173 return f1->level == 3 ? strcoll(f1->name, f2->name) : 0;
|
/ast/src/lib/libtk/generic/ |
H A D | tkCanvas.c | 3525 double range, f1, f2; 3530 f2 = 1.0; 3536 f2 = (screen2 - object1)/range; 3537 if (f2 > 1.0) { 3538 f2 = 1.0; 3540 if (f2 < f1) { 3541 f2 = f1; 3544 sprintf(string, "%g %g", f1, f2); 3497 double range, f1, f2; local
|