Home
last modified time | relevance | path

Searched refs:acf_t (Results 1 – 8 of 8) sorted by relevance

/titanic_41/usr/src/lib/efcode/engine/
H A Ddebug.c90 acf_backup_search(env, (acf_t)WA)); in output_return_stack()
100 acf_backup_search(env, (acf_t)env->rs0[i+1])); in output_return_stack()
125 static acf_t debug_acfs[MAXDEBUG_ACFS];
128 add_debug_acf(fcode_env_t *env, acf_t acf) in add_debug_acf()
149 acf_t acf; in paren_debug()
151 acf = (acf_t)POP(DS); in paren_debug()
157 if ((acf_t)_ALIGN(acf, token_t) != acf) { in paren_debug()
175 acf_t acf; in debug()
181 acf = (acf_t)POP(DS); in debug()
217 static acf_t
[all …]
H A Dactions.c166 run_action(fcode_env_t *env, acf_t acf, int action) in run_action()
200 acf_t a; in do_default_action()
203 a = (acf_t)TOS; in do_default_action()
210 acf_t a = (acf_t)TOS; in do_set_action()
213 TOS += sizeof (acf_t); in do_set_action()
248 acf_t *dptr; in install_actions()
251 dptr = (acf_t *)LINK_TO_ACF(env->lastlink); in install_actions()
253 p -= (sizeof (token_t) + sizeof (acf_t)); in install_actions()
254 *dptr = (acf_t)(p | 1); in install_actions()
271 acf_t a; in perform_action()
[all …]
H A Dfcode.c105 env->table[token].apf = (acf_t)HERE; in do_code()
280 acf_t dptr; in header()
281 extern void add_debug_acf(fcode_env_t *, acf_t); in header()
285 dptr = (acf_t)HERE; in header()
288 dptr = (acf_t)(TOKEN_ROUNDUP(HERE+bytes)); in header()
301 *dptr = *((acf_t)env->current); in header()
518 acf_t apf; in byte_load()
593 env->table[env->last_token].apf = (acf_t)HERE; in bcolon()
604 env->table[env->last_token].apf = (acf_t)HERE; in bcreate()
623 env->table[env->last_token].apf = (acf_t)HERE; in bvalue()
[all …]
H A Dinit.c104 acf_t f_error_addr; in _init()
H A Dforth.c710 TOS = (fstack_t)(((acf_t)TOS)+1); in to_body()
717 TOS = (fstack_t)(((acf_t)TOS)-1); in to_acf()
2172 acf_t
2198 acf_t acf = NULL; in dollar_find()
2337 acf_t defer_xt; in behavior()
2339 acf_t contents_xt; in behavior()
2342 defer_xt = (acf_t)POP(DS); in behavior()
H A Dpackage.c492 acf_t acf = 0; in find_method()
/titanic_41/usr/src/lib/efcode/include/fcode/
H A Dengine.h48 typedef long *acf_t; /* pointer to execution token */ typedef
152 acf_t apf; /* pointer to acf in dictionary */
282 #define ACF_TO_BODY(x) (((acf_t)(x))+1)
283 #define BODY_TO_LINK(x) (((acf_t)(x))-1)
285 #define EXPOSE_ACF *((acf_t)env->current) = \
H A Dproto.h184 acf_t voc_find(fcode_env_t *env);
245 char *acf_lookup(fcode_env_t *, acf_t);
246 char *acf_to_name(fcode_env_t *, acf_t);
248 char *acf_backup_search(fcode_env_t *, acf_t);