| /ast/src/lib/libast/sfio/ |
| H A D | sfstack.c | 30 #define STKMTXLOCK(f1,f2) \
31 { if(f1) SFMTXLOCK(f1); \
34 #define STKMTXRETURN(f1,f2,rv) \
35 { if(f1) SFMTXUNLOCK(f1); \
41 Sfio_t* sfstack(Sfio_t* f1, Sfio_t* f2) argument
43 Sfio_t* sfstack(f1,f2)
44 Sfio_t* f1; /* base of stack */
53 STKMTXLOCK(f1,f
[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)
36 reg Sfio_t* f1;
43 if(!f1 || (f1->mode&SF_AVAIL) || (SFFROZEN(f1) && (f1->mode&SF_PUSH)) )
47 if(f1 == f2)
50 f1mode = f1->mode;
51 SFLOCK(f1,
[all...] |
| /ast/src/cmd/tests/sfio/ |
| H A D | tappend.c | 24 Sfio_t *f1, *f2; local
30 if(!(f1 = sfopen(NIL(Sfio_t*), tstfile("sf", 0), "w")) )
31 terror("Can't open f1");
32 if(!(f1 = sfopen(f1, tstfile("sf", 0), "a+")) )
33 terror("Can't open f1");
38 if(sfwrite(f1,"012345678\n",10) != 10 || sfsync(f1) < 0)
39 terror("Writing to f1");
40 if((p = sftell(f1)) !
[all...] |
| H A D | tswap.c | 24 Sfio_t* f1; local
28 if(!(f1 = sfopen(NIL(Sfio_t*), tstfile("sf", 0),"w+")) )
30 if(sfwrite(f1,"0123456789\n",11) != 11)
34 if(sfswap(f1,sfstdin) != sfstdin)
42 if(!(f1 = sfswap(sfstdin,NIL(Sfio_t*))) )
44 if(!sfstack(sfstdout,f1) )
45 terror("Failed stacking f1");
50 if(sfswap(f1,f2) != NIL(Sfio_t*) )
|
| H A D | tpool.c | 44 Sfio_t *f, *f1, *f2, *f3, *f4; local
46 if(!(f1 = sfopen((Sfio_t*)0,tstfile("sf", 0),"w+")) ||
53 sfungetc(f1,'a');
55 sfpool(f1,f4,0);
56 sfungetc(f1,'a');
57 sfpool(f1,NIL(Sfio_t*),0);
67 if(sfputr(f1,os,-1) < 0)
69 sfseek(f1,(Sfoff_t)0,0);
71 { if(!(s = sfgetr(f1,'\n',0)) || (n = sfvalue(f1)) !
[all...] |
| H A D | tstack.c | 82 Sfio_t *f1, *f2, *f3, *f; local
87 if(!(f1 = sfopen(NIL(Sfio_t*), tstfile("sf", 0),"w+")) )
92 sfdisc(f1,&Disc);
94 sfstack(f1,f2);
95 if((n = sfgetc(f1)) >= 0 || !sfeof(f1))
97 if(sfstacked(f1))
99 Fclose = f1;
100 if(sfclose(f1) < 0)
101 terror("Can't close f1");
[all...] |
| H A D | tsync.c | 95 Sfio_t *f, *f1, *f2; local
127 if(!(f1 = sfopen(NIL(Sfio_t*), tstfile("sf", 0), "w")) )
132 sfset(f1,SF_IOCHECK,1);
133 sfdisc(f1,&Disc);
134 sfsetbuf(f1,NIL(char*),4);
139 sfputc(f1,'1');
140 sfputc(f1,'2');
141 sfputc(f1,'3');
142 sfputc(f1,'4');
143 sfputc(f1,'
[all...] |
| /ast/src/lib/libtk/library/demos/ |
| H A D | form.tcl | 24 foreach i {f1 f2 f3 f4 f5} {
31 $w.f1.label config -text Name:
34 pack $w.msg $w.f1 $w.f2 $w.f3 $w.f4 $w.f5 -side top -fill x
36 focus $w.f1.entry
|
| /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
165 if (!(p1 = (unsigned char*)sfreserve(f1, SF_UNBOUND, 0)) || (c1 = sfvalue(f1)) <= 0)
258 Sfio_t* f1 = 0; local
317 f1 = sfstdin;
318 else if (!(f1 = sfopen(NiL, file1, "r")))
355 if (o1 && sfseek(f1, o1, SEEK_SET) != o1)
369 if (fstat(sffileno(f1), &s1))
376 n = ((flags & CMP_SILENT) && S_ISREG(s1.st_mode) && S_ISREG(s2.st_mode) && (s1.st_size - o1) != (s2.st_size - o2)) ? 1 : cmp(file1, f1, file2, f2, flags, count, differences);
378 if (f1
[all...] |
| H A D | comm.c | 152 Sfio_t *f1, *f2; local
183 f1 = sfstdin;
184 else if(!(f1 = sfopen(NiL, cp,"r")))
193 if(comm(f1,f2,sfstdout,mode) < 0)
196 else if(f1==sfstdin || f2==sfstdin)
198 if(f1!=sfstdin)
199 sfclose(f1);
|
| 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/cmd/ksh93/tests/ |
| H A D | variables.sh | 327 f1=$1
328 case $f1 in
329 '-') f1='' ;;
337 case $f1$d1 in
338 '') split "$d0$f1$d1" "[0]" "()()" ;;
340 *) split "$d0$f1$d1" "[1]($f1)" "($f1)()" ;;
358 $f1$d1|$d1$f2) continue ;;
363 '') split "$d0$f1
[all...] |
| H A D | treemove.sh | 72 function f1 function
96 f1 tree1
|
| H A D | comvar.sh | 499 function f1 function
510 f1 tree
|
| H A D | functions.sh | 1152 function f1 { print -n ${.sh.fun}; set -o | grep xtrace;} function
1154 f1
|
| /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
1065 t1 = tmxgetatime(&f1->statb);
1075 order_ctime(register Ftw_t* f1, register Ftw_t* f2) argument
1080 t1 = tmxgetctime(&f1->statb);
1090 order_mtime(register Ftw_t* f1, register Ftw_t* f2) argument
1095 t1 = tmxgetmtime(&f1
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 | 173 set f1 [frame $top.f1]
177 pack $f1 -side top -fill x
194 label $f1.lab -text "Filter:" -under 3 -anchor w
195 entry $f1.ent
196 pack $f1.lab -side top -fill x -padx 6 -pady 4
197 pack $f1.ent -side top -fill x -padx 4 -pady 0
198 set data(fEnt) $f1.ent
|
| H A D | tkfbox.tcl | 796 # f1: the frame with the directory option menu
798 set f1 [frame $w.f1]
799 label $f1.lab -text "Directory:" -under 0
800 set data(dirMenuBtn) $f1.menu
801 set data(dirMenu) [tk_optionMenu $f1.menu [format %s(selectPath) $w] ""]
802 set data(upBtn) [button $f1.up -bitmap $updir]
803 $f1.menu config -takefocus 1 -highlightthickness 2
806 pack $f1.lab -side left -padx 4 -fill both
807 pack $f1
[all...] |
| H A D | clrpick.tcl | 276 set f1 [frame $selFrame.f1 -relief sunken -bd 2]
277 set data(finalCanvas) [frame $f1.demo -bd 0 -width 100 -height 70]
280 pack $f1 -expand yes -anchor nw -fill both -padx 6 -pady 10
|
| /ast/src/lib/libast/uwin/ |
| H A D | expm1.c | 98 vc(invln2, 1.4426950408889634148E0 ,aa3b,40b8,17f1,295c, 1, .B8AA3B295C17F1)
|
| H A D | exp.c | 90 vc(invln2, 1.4426950408889634148E0 ,aa3b,40b8,17f1,295c, 1, .B8AA3B295C17F1)
|
| /ast/src/lib/libast/misc/ |
| H A D | fts.c | 226 register const FTSENT* f1 = *pf1; 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/ksh93/sh/ |
| H A D | io.c | 628 * Given a file descriptor <f1>, move it to a file descriptor number <f2>
630 * The original stream <f1> is closed.
633 int sh_iorenumber(Shell_t *shp, register int f1,register int f2) argument
636 if(f1!=f2)
650 register Sfio_t *spnew = sh_iostream(shp,f1);
651 shp->fdstatus[f2] = (shp->fdstatus[f1]&~IOCLEX);
658 shp->fdstatus[f2] = (shp->fdstatus[f1]&~IOCLEX);
659 if((f2 = sh_fcntl(f1,F_DUPFD, f2)) < 0)
665 shp->sftable[f1] = 0;
666 if(shp->fdstatus[f1]!
[all...] |
| /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);
642 n1 = getnum(x->data.variable.symbol, f1);
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;
|