/ast/src/cmd/ie/ |
H A D | ie.sh | 23 typeset env histfile show command opt prefix dll suffix ifs root path s 131 env="HISTFILE='$histfile' LD_PRELOAD='$root/$prefix$suffix${LD_PRELOAD:+ $LD_PRELOAD}'" 133 *-n32) env="$env _RLDN32_LIST=$root/$prefix$suffix" 135 "") env="$env:DEFAULT" ;; 136 *) env="$env:$_RLDN32_LIST" ;; 140 then env="$env _RLD64_LIS [all...] |
/ast/src/cmd/warp/ |
H A D | warp.sh | 23 typeset env show command opt prefix dll suffix ifs root path s 209 env="WARP='$opt$warp' LD_PRELOAD='$root/$prefix$suffix${LD_PRELOAD:+ $LD_PRELOAD}' DYLD_INSERT_LIBRARIES='$root/$prefix$suffix${DYLD_INSERT_LIBRARIES:+ $DYLD_INSERT_LIBRARIES}'" 211 *-n32) env="$env _RLDN32_LIST=$root/$prefix$suffix" 213 "") env="$env:DEFAULT" ;; 214 *) env="$env:$_RLDN32_LIST" ;; 218 then env="$env _RLD64_LIS [all...] |
H A D | warp.c | 26 * the env var WARP controls the seconds offset added to each time_t 265 char* env[32]; member in struct:__anon241 313 if (!e) { s = "warp: AHA: no env\n"; write(2, s, strlen(s)); } 314 p = state.env; 315 x = &state.env[elementsof(state.env) - 1]; 341 s = "warp: out of space [env]\n"; 1964 char** env; local 1967 env = (char**)arge; 1968 if (*state.env) 2050 char** env; local 2068 char** env; local [all...] |
/ast/src/lib/libast/regex/ |
H A D | regrecord.c | 33 return p && p->env && p->env->rex->type == REX_BM;
|
H A D | regcomp.c | 145 node(Cenv_t* env, int type, int lo, int hi, size_t extra) argument 150 if (e = (Rex_t*)alloc(env->disc, 0, sizeof(Rex_t) + extra)) 157 e->flags = env->flags; 158 e->map = (e->flags & REG_ICASE) ? env->MAP : env->map; 159 e->explicit = env->explicit; 271 serialize(Cenv_t* env, Rex_t* e, int n) argument 281 n = serialize(env, e->re.group.expr.binary.left, n); 284 n = serialize(env, e->re.group.expr.binary.right, n); 287 n = serialize(env, 310 cat(Cenv_t* env, Rex_t* e, Rex_t* f) argument 364 stats(register Cenv_t* env, register Rex_t* e) argument 642 magic(register Cenv_t* env, register int c, int escaped) argument 918 token(register Cenv_t* env) argument 1169 bra(Cenv_t* env) argument 1753 ccl(Cenv_t* env, int type) argument 1791 rep(Cenv_t* env, Rex_t* e, int number, int last) argument 1908 trienode(Cenv_t* env, int c) argument 1921 insert(Cenv_t* env, Rex_t* f, Rex_t* g) argument 1977 trie(Cenv_t* env, Rex_t* e, Rex_t* f) argument 2009 chr(register Cenv_t* env, int* escaped) argument 2041 grp(Cenv_t* env, int parno) argument 2582 seq(Cenv_t* env) argument 2868 con(Cenv_t* env) argument 2894 alt(Cenv_t* env, int number, int cond) argument 2946 bmstr(Cenv_t* env, register Rex_t* a, unsigned char* v, int n, Bm_mask_t b) argument 2980 bmtrie(Cenv_t* env, Rex_t* a, unsigned char* v, Trie_node_t* x, int n, int m, Bm_mask_t b) argument 3011 special(Cenv_t* env, regex_t* p) argument 3238 Cenv_t env; local 3459 Cenv_t env; local [all...] |
H A D | regstat.c | 35 p->env->stats.re_flags = p->env->flags; 36 p->env->stats.re_info = 0; 37 e = p->env->rex; 40 p->env->stats.re_record = p->env->rex->re.bm.size; 44 p->env->stats.re_record = 0; 50 p->env->stats.re_info |= REG_LITERAL; 51 p->env->stats.re_record = (p && p->env [all...] |
H A D | regnexec.c | 248 _matchpush(Env_t* env, Rex_t* rex) argument 260 env->error = REG_ESPACE; 264 f->match = m = env->match + rex->re.group.number; 280 pospush(Env_t* env, Rex_t* rex, unsigned char* p, int be) argument 284 if (!(pos = vector(Pos_t, env->pos, env->pos->cur))) 286 env->error = REG_ESPACE; 292 env->pos->cur++; 305 better(Env_t* env, Pos_t* os, Pos_t* ns, Pos_t* oend, Pos_t* nend, int level) argument 312 if (env 383 _better(Env_t* env, Pos_t* os, Pos_t* ns, Pos_t* oend, Pos_t* nend, int level) argument 402 parserep(Env_t* env, Rex_t* rex, Rex_t* cont, unsigned char* s, int n) argument 499 parsetrie(Env_t* env, Trie_node_t* x, Rex_t* rex, Rex_t* cont, unsigned char* s) argument 797 parse(Env_t* env, Rex_t* rex, Rex_t* cont, unsigned char* s) argument 1830 list(Env_t* env, Rex_t* rex) argument 1854 Env_t* env; local 2022 Env_t* env; local [all...] |
H A D | regsubcomp.c | 66 disc = p->env->disc; 81 disc = p->env->disc; 126 disc = p->env->disc; 127 if (p->env->flags & REG_NOSUB) 132 if (!(sub = (regsub_t*)alloc(p->env->disc, 0, sizeof(regsub_t) + strlen(s))) || !(sub->re_ops = (regsubop_t*)alloc(p->env->disc, 0, (nops = 8) * sizeof(regsubop_t)))) 135 alloc(p->env->disc, sub, 0); 141 p->env->sub = 1; 144 if (!(p->env->flags & REG_DELIMITED)) 155 sre = p->env 361 Env_t* env; local [all...] |
H A D | regsubexec.c | 40 if (!((b)->re_buf = alloc(p->env->disc, (b)->re_buf, a))) \ 155 if (!p->env->sub || (p->env->flags & REG_NOSUB) || !nmatch) 156 return fatal(p->env->disc, REG_BADPAT, NiL); 160 e = (const char*)p->env->end; 165 PUTS(p, b, s, match->rm_eo, return fatal(p->env->disc, c, NiL)); 168 PUTS(p, b, s, match->rm_so, return fatal(p->env->disc, c, NiL)); 170 return fatal(p->env->disc, c, NiL); 175 if (c = regnexec(p, s, e - s, nmatch, match, p->env->flags|(match->rm_so == match->rm_eo ? REG_ADVANCE : 0))) 178 return fatal(p->env [all...] |
H A D | regrexec.c | 56 Env_t* env; local 59 if (!s || !p || !(env = p->env) || (e = env->rex)->type != REX_BM) 109 if (complete || (env->rex = ((r - l) > 128) ? e : e->next) && !(n = regnexec(p, (char*)l, r - l, nmatch, match, flags))) 143 env->rex = e;
|
H A D | regsub.c | 248 if ((p->env->flags & REG_NOSUB) || !nmatch) 249 return fatal(p->env->disc, REG_BADPAT, NiL); 251 sre = !!(p->env->flags & REG_SHELL); 261 return fatal(p->env->disc, r, NiL); 264 } while ((m > 0 || (flags & REG_SUB_ALL)) && !(r = regexec(p, op, nmatch, match, p->env->flags|(match->rm_so == match->rm_eo ? REG_ADVANCE : 0)))); 266 return fatal(p->env->disc, r, NiL);
|
/ast/src/lib/libtksh/lib/tksh7.6/ |
H A D | init.ksh | 1 typeset -A env 3 function env.get function 7 env[${.sh.subscript}]="$v" 10 function env.set function 17 function env.unset function 35 : "${env[PWD]}" # not sure why this is needed
|
H A D | init.tcl | 19 if [catch {set auto_path $env(TCLLIBPATH)}] { 65 global auto_noexec auto_noload env unknown_pending tcl_interactive 158 global auto_index auto_oldpath auto_path env errorInfo errorCode 234 global auto_execs env tcl_platform 243 if {[info exists env(COMSPEC)]} { 244 set comspec $env(COMSPEC) 245 } elseif {[info exists env(ComSpec)]} { 246 set comspec $env(ComSpec) 266 if {[info exists env(WINDIR)]} { 267 set windir $env(WINDI [all...] |
H A D | ldAout.tcl | 33 global env 37 set cc $env(CC) 47 set shlib_suffix $env(SHLIB_SUFFIX) 48 set shlib_cflags $env(SHLIB_CFLAGS)
|
/ast/src/lib/libast/comp/ |
H A D | regexp.c | 45 register Env_t* env = (Env_t*)handle; local 47 if (data || (size = roundof(size, ALIGN_BOUND2)) > (env->buf + env->size - env->cur)) 49 data = (void*)env->cur; 50 env->cur += size; 57 register Env_t* env = (Env_t*)handle; local 62 env->buf = env->cur = (char*)env 96 register Env_t* env = (Env_t*)handle; local [all...] |
/ast/src/cmd/ksh93/sh/ |
H A D | env.c | 43 char **env; member in struct:_env_ 51 #include <env.h> 53 #define ENV_VALID 2 /* set if env is valid */ 93 return(ep->env+n); 97 free((void*)ep->env); 98 if(!(ep->env = (char**)malloc(sizeof(char*)*(ep->count+1)))) 106 ep->env[n++] = vp->un.ptr; 108 ep->env[n] = 0; 110 environ = ep->env+ep->extra; 111 return(ep->env 191 char **env; local [all...] |
/ast/src/lib/libast/misc/ |
H A D | getcwd.c | 179 } env[] = 202 for (n = 0; n < elementsof(env); n++) 204 if ((env[n].name && (p = getenv(env[n].name)) || (p = env[n].path)) && *p == '/' && !stat(p, cur)) 206 env[n].path = p; 207 env[n].dev = cur->st_dev; 208 env[n].ino = cur->st_ino; 225 n = elementsof(env); 265 if (env[ [all...] |
/ast/src/lib/libtk/library/demos/ |
H A D | browse | 28 global env 34 if [info exists env(EDITOR)] { 35 eval exec $env(EDITOR) $file &
|
/ast/src/lib/libdll/ |
H A D | dllopen.c | 34 * 2009-04-15 -- if ld.so re-checked the env this would work ... 57 olibpath = getenv(info->env); 69 path = sfprints("%-.*s%s%c%s=%-.*s%s%s", len, dir, base, 0, info->env, len, dir, olibpath ? ":" : "", olibpath ? olibpath : "");
|
/ast/src/cmd/3d/ |
H A D | license.c | 39 char* env; local 47 env = *environ; 54 *environ = env;
|
/ast/src/lib/libexpr/ |
H A D | exeval.c | 76 getdyn(Expr_t* ex, register Exnode_t* expr, void* env, Exassoc_t** assoc) argument 85 v = eval(ex, expr->data.variable.index, env); 116 void* env; member in struct:__anon352 143 fmt->value = exeval(fmt->expr, node, fmt->env); 178 fmt->value = exeval(fmt->expr, node, fmt->env); 182 fmt->value = exeval(fmt->expr, node, fmt->env); 296 print(Expr_t* ex, Exnode_t* expr, void* env, Sfio_t* sp) argument 304 v = eval(ex, expr->data.print.descriptor, env); 315 fmt.env = env; 402 scan(Expr_t* ex, Exnode_t* expr, void* env, Sfio_t* sp) argument 539 eval(Expr_t* ex, register Exnode_t* expr, void* env) argument 1301 exeval(Expr_t* ex, Exnode_t* expr, void* env) argument [all...] |
/ast/src/lib/libast/path/ |
H A D | pathkey.c | 66 char* env[elementsof(usr) + 3]; local 88 for (c = 0; c < elementsof(env); c++) 89 env[c] = 0; 164 * ${PROBE_ATTRIBUTES} || ${VERSION_ENVIRONMENT} : list of alternate env vars 165 * ${VERSION_ENVIRONMENT} : list of alternate env vars 225 if (!env[c] && (s = ver[c])) 230 env[c] = *p; 235 if (!env[2]) 241 env[2] = *p; 246 if (!env[ [all...] |
/ast/src/cmd/sortlib/sync/ |
H A D | test.c | 41 char env[32]; local 45 sfsprintf(env, sizeof(env), "SORT_E%02u_STATUS", index); 46 if (!(s = getenv(env)))
|
/ast/src/cmd/html/ |
H A D | troff2html.c | 381 n *= 8 * state.env->ps.current; 385 n *= 6 * state.env->ps.current; 395 n *= 6 * state.env->vs.current; 436 n *= state.env->ps.current / 12; 438 n /= state.env->ps.current / 12; 460 n *= 8 * state.env->ps.current; 462 n /= 8 * state.env->ps.current; 467 n *= 6 * state.env->ps.current; 469 n /= 6 * state.env->ps.current; 483 n *= 6 * state.env 997 env(char* s) function [all...] |
/ast/src/lib/libcoshell/ |
H A D | coexec.c | 160 char* env; local 211 if (!(env = coinitialize(co, co->flags))) 233 sfprintf(sp, " (%d:%s) (%d:%s)\n", strlen(env), env, n, action); 240 env, 259 env, 333 env,
|