Lines Matching defs:eg
206 struct exp_cmd_descriptor *eg,
211 if (!eg->ecd.cases) return;
213 for (i=0;i<eg->ecd.count;i++) {
214 free_ecase(interp,eg->ecd.cases[i],free_ilist);
216 ckfree((char *)eg->ecd.cases);
218 eg->ecd.cases = 0;
219 eg->ecd.count = 0;
387 eg (expect_global) is initialized to reflect the arguments parsed
388 eg->ecd.cases is an array of ecases
389 eg->ecd.count is the # of ecases
390 eg->i_list is a linked list of exp_i's which represent the -i info
409 struct exp_cmd_descriptor *eg,
418 eg->timeout_specified_by_flag = FALSE;
426 eg->ecd.cases = (struct ecase **)ckalloc(sizeof(struct ecase *) * (1+(objc/2)));
428 eg->ecd.count = 0;
534 eg->duration, exp_indirect_update2);
536 ec.i_list->cmdtype = eg->cmdtype;
539 ec.i_list->next = eg->i_list;
540 eg->i_list = ec.i_list;
558 &eg->timeout) != TCL_OK) {
561 eg->timeout_specified_by_flag = TRUE;
620 if (!eg->i_list) {
622 eg->i_list = exp_new_i_simple(default_esPtr,eg->duration);
626 eg->i_list = exp_new_i_simple(default_esPtr,eg->duration);
629 ec.i_list = eg->i_list;
638 if (eg->duration == EXP_PERMANENT) {
648 if (eg->duration == EXP_PERMANENT) Tcl_IncrRefCount(ec.body);
653 *(eg->ecd.cases[eg->ecd.count] = ecase_new()) = ec;
658 eg->ecd.count++;
665 if (eg->i_list == 0) {
667 eg->i_list = exp_new_i_simple(default_esPtr,eg->duration);
671 eg->i_list = exp_new_i_simple(default_esPtr,eg->duration);
682 free_ecases(interp,eg,0);
684 if (eg->i_list)
685 exp_free_i(interp,eg->i_list,exp_indirect_update2);
997 struct exp_cmd_descriptor *eg,
1012 if (o->e || status == EXP_TCLERROR || eg->ecd.count == 0) return(status);
1015 for (i=0;i<eg->ecd.count;i++) {
1016 e = eg->ecd.cases[i];
1024 for (i=0;i<eg->ecd.count;i++) {
1025 e = eg->ecd.cases[i];
1046 for (i=0;i<eg->ecd.count;i++) {
1050 e = eg->ecd.cases[i];
1389 struct exp_cmd_descriptor eg;
1424 exp_cmd_init(&eg,ecmd->cmdtype,EXP_PERMANENT);
1426 if (TCL_ERROR == parse_expect_args(interp,&eg,EXP_SPAWN_ID_BAD,
1438 for (exp_i=eg.i_list;exp_i;exp_i=exp_i->next) {
1463 for (exp_i=eg.i_list;exp_i;exp_i=exp_i->next) {
1502 /* empty i_lists have to be removed from global eg.i_list */
1511 for (exp_i=eg.i_list;exp_i;) {
1515 exp_i_remove(interp,&eg.i_list,exp_i);
1526 for (exp_i=eg.i_list;exp_i;exp_i=exp_i->next) {
1540 count = ecmd->ecd.count + eg.ecd.count;
1541 if (eg.ecd.count) {
1550 ecmd->ecd.cases = (struct ecase **)ckalloc(eg.ecd.count * sizeof(struct ecase *));
1553 memcpy(&ecmd->ecd.cases[start_index],eg.ecd.cases,
1554 eg.ecd.count*sizeof(struct ecase *));
1564 *eip = eg.i_list; /* connect new list to end of current list */
1572 for (exp_i=eg.i_list;exp_i;) {
1577 free_ecases(interp,&eg,1);
1579 if (eg.ecd.cases) ckfree((char *)eg.ecd.cases);
2534 struct exp_cmd_descriptor eg;
2598 exp_cmd_init(&eg,EXP_CMD_FG,EXP_TEMPORARY);
2601 if (TCL_ERROR == parse_expect_args(interp,&eg, (ExpState *)clientData,
2612 || (TCL_ERROR == update_expect_states(eg.i_list,&state_list))) {
2644 if (eg.timeout_specified_by_flag) {
2645 timeout = eg.timeout;
2708 cc = eval_cases(interp,&eg,
2771 free_ecases(interp,&eg,0); /* requires i_lists to be avail */
2772 exp_free_i(interp,eg.i_list,exp_indirect_update2);