Lines Matching refs:val
137 while((temp->next != NULL) && strcmp((char *)(temp->token->val), (char *)(t->val)))
289 tag = PSWDictLookup(wellKnownPSNames, (char *)(t->val));
473 c->token = (Body)c->token->val;
484 if ((t->type == T_STRING) ? PSWStringLength(t->val)
485 : PSWHexStringLength(t->val))
547 nextAdr.cnst += t->namedFormal->subscript->val * DPS_BINOBJ_SIZE;
553 if (PSWDictLookup(wrapDict, (char *)t->val) == -1) {
555 PSWDictEnter(wrapDict, t->val, 0);
559 ln = PSWStringLength((char *)t->val);
561 ln = PSWHexStringLength((char *)t->val);
575 length = t->namedFormal->subscript->val + WORD_ALIGN;
579 nextAdr.cnst += t->namedFormal->subscript->val;
625 c->token = (Body)c->token->val;
640 if ((t->type == T_STRING) ? PSWStringLength(t->val)
641 : PSWHexStringLength(t->val))
731 nextAdr.cnst += t->namedFormal->subscript->val * DPS_BINOBJ_SIZE;
739 loc = PSWDictLookup(wrapDict, (char *)t->val);
743 PSWDictEnter(wrapDict, (char *)t->val, nextAdr.cnst);
747 ln = PSWStringLength((char *)t->val);
749 ln = PSWHexStringLength((char *)t->val);
772 length = t->namedFormal->subscript->val + WORD_ALIGN;
776 nextAdr.cnst += t->namedFormal->subscript->val;
854 fprintf(datafil, "DPS_LITERAL%cDPS_BOOL, 0, 0, %d", ATT_SEP, (int)(long)t->val);
857 fprintf(datafil, "DPS_LITERAL%cDPS_INT, 0, 0, %d", ATT_SEP, (int)(long)t->val);
860 fprintf(datafil, "DPS_LITERAL%cDPS_REAL, 0, 0, %s", ATT_SEP, (char *)t->val);
865 NumTokens((Body) (t->val)), t->body.cnst);
869 NumTokens((Body) (t->val)), t->body.cnst);
877 ln = PSWStringLength((char *)t->val);
878 else ln = PSWHexStringLength((char *)t->val);
885 ATT_SEP,item->subscript->val, t->body.cnst);
892 commentName = (char *)t->val;
897 commentName = (char *)t->val;
904 ln = PSWStringLength((char *)t->val);
916 commentName = (char *)t->val;
923 ln = PSWStringLength((char *)t->val);
934 t->namedFormal->subscript->val, t->body.cnst);
947 ATT_SEP, t->namedFormal->subscript->val
951 ATT_SEP, t->namedFormal->subscript->val,
979 commentName = (char *)t->val;
1029 if ((t->namedFormal == NULL) && PSWStringLength(t->val))
1034 if ((t->namedFormal == NULL) && PSWHexStringLength(t->val))
1066 bodies = ConsToken((Body)t->val, bodies);
1082 if (PSWDictLookup(wrapDict, (char *)t->val) == -1) {
1084 PSWDictEnter(wrapDict, (char *)t->val, 0);
1089 PSWOutputStringChars((char *)t->val);
1091 PSWOutputHexStringChars((char *)t->val);
1152 printf(" _dpsR[%d].count = %d;\n",count, s->val);
1200 if (strcmp(last_str,(char *)n->token->val)) {
1201 strcpy(last_str,(char *)n->token->val);
1202 printf("\t\"%s\"", (char *)n->token->val);
1229 printf(" _dps_nameVals[%d] = (int *)&_dpsP[%d].val.nameVal;\n",
1294 if (!AllLiterals((Body)t->val)) return false;
1321 if (!AllLiterals((Body)t->val)) {
1325 b = (Body)t->val;
1342 else FlattenSomeArrays((Body)t->val, inSquiggles);
1346 FlattenSomeArrays((Body)t->val, true);
1383 printf(" _dpsP[%d].val.arrayVal = _dps_offset;\n",t->tokenIndex);
1386 printf("%d * sizeof(DPSBinObjGeneric);\n",item->subscript->val);
1394 printf(" _dpsP[%d].val.stringVal = _dps_offset;\n",t->tokenIndex);
1401 item->subscript->val,TypeToText(t->namedFormal->type),
1405 item->subscript->val,TypeToText(t->namedFormal->type),
1409 int val = item->subscript->val;
1410 val += WORD_ALIGN;
1411 val &= ~WORD_ALIGN;
1412 printf("%d;\n", val);
1414 printf("%d;\n",item->subscript->val);
1445 strOffset = PSWDictLookup(wrapDict, (char *)t->val);
1448 PSWDictEnter(wrapDict, (char *)t->val, stringOffset);
1452 printf(" _dpsP[%d].val.stringVal = _dps_offset;\n",
1455 printf(" _dpsP[%d].val.stringVal = _dps_offset + %d;\n",
1460 ? PSWStringLength((char *)t->val)
1461 : PSWHexStringLength((char *)t->val);
1464 printf(" _dpsP[%d].val.stringVal = _dps_offset;\n",
1467 printf(" _dpsP[%d].val.stringVal = _dps_offset + %d;\n",
1509 printf("\n _dpsP[%d].val.booleanVal =",
1522 printf("\n _dpsP[%d].val.integerVal =",
1530 printf("\n _dpsP[%d].val.realVal =",
1556 gotit += EmitValueAssignments((Body) (t->val),item);
1575 printf("\n _dpsP[%d].val.booleanVal = (int)(0 != %s[%s]);",
1585 printf("\n _dpsP[%d].val.integerVal = %s[%s];",
1591 printf("\n _dpsP[%d].val.realVal = %s[%s];",
1622 printf(" (%d * sizeof(%s)) + %d;",item->subscript->val,
1625 printf(" %d;",item->subscript->val);
1668 printf(" _dpsP[%d].val.nameVal = _dpsCodes[%d];\n",
1689 printf("%d);\n", t->namedFormal->subscript->val);
1701 printf("%d, ", t->namedFormal->subscript->val);
1706 printf("%d);\n", t->namedFormal->scale->val);
1723 int val = t->namedFormal->subscript->val;
1724 printf("%d);\n", val);
1726 val = ~(val + WORD_ALIGN) & WORD_ALIGN;
1727 if(val) {
1729 ctxName,val);
1943 free (t->val);
1950 free (t->val); free(t->body.var);
1954 FreeBody((Body) (t->val));