Lines Matching refs:namedFormal
433 || (t->type == T_NAME && t->namedFormal
434 && (!t->namedFormal->subscripted)
435 && (t->namedFormal->type == T_FLOAT || t->namedFormal->type == T_DOUBLE))
436 || ((t->type == T_SUBSCRIPTED) && ((t->namedFormal->type == T_FLOAT)
437 || (t->namedFormal->type == T_DOUBLE))))
483 if (t->namedFormal == NULL) {
489 Assert(IsCharType(t->namedFormal->type));
495 if (t->namedFormal != NULL) {
496 if (IsCharType(t->namedFormal->type) ||
497 IsNumStrType(t->namedFormal->type))
500 if (t->namedFormal->subscripted)
512 if (t->namedFormal != NULL) {
546 if (t->namedFormal->subscript->constant)
547 nextAdr.cnst += t->namedFormal->subscript->val * DPS_BINOBJ_SIZE;
569 if (t->namedFormal->subscripted && t->namedFormal->subscript->constant) {
570 if (IsNumStrType(t->namedFormal->type))
575 length = t->namedFormal->subscript->val + WORD_ALIGN;
579 nextAdr.cnst += t->namedFormal->subscript->val;
639 if (t->namedFormal == NULL) {
645 Assert(IsCharType(t->namedFormal->type));
647 if (!(t->namedFormal->subscripted && t->namedFormal->subscript->constant))
653 if (t->namedFormal == NULL) {
660 if (IsCharType(t->namedFormal->type)
661 || IsNumStrType(t->namedFormal->type)) {
663 if (!(t->namedFormal->subscripted
664 && t->namedFormal->subscript->constant))
667 if (t->namedFormal->subscripted) {
669 if (!(t->namedFormal->subscript->constant))
676 Assert(t->namedFormal == NULL || IsCharType(t->namedFormal->type));
677 if (t->namedFormal == NULL) {
725 Assert(t && t->type == T_NAME && t->namedFormal);
726 Assert(t->namedFormal->subscripted && !t->namedFormal->starred);
730 if (t->namedFormal->subscript->constant)
731 nextAdr.cnst += t->namedFormal->subscript->val * DPS_BINOBJ_SIZE;
765 if (t->namedFormal->subscripted && t->namedFormal->subscript->constant) {
766 if (IsNumStrType(t->namedFormal->type)) {
772 length = t->namedFormal->subscript->val + WORD_ALIGN;
776 nextAdr.cnst += t->namedFormal->subscript->val;
874 if (t->namedFormal == NULL) {
882 Item item = t->namedFormal;
901 else if (t->namedFormal == NULL) {
920 else if (t->namedFormal == NULL) {
930 Item item = t->namedFormal;
932 if (item->subscripted && t->namedFormal->subscript->constant) {
934 t->namedFormal->subscript->val, t->body.cnst);
944 if (t->namedFormal->subscript->constant) {
947 ATT_SEP, t->namedFormal->subscript->val
951 ATT_SEP, t->namedFormal->subscript->val,
973 Item item = t->namedFormal;
976 /* Assert(t->namedFormal) */
1029 if ((t->namedFormal == NULL) && PSWStringLength(t->val))
1034 if ((t->namedFormal == NULL) && PSWHexStringLength(t->val))
1039 if (t->namedFormal == NULL) {
1045 if ((t->namedFormal->subscripted)
1046 && (!IsCharType(t->namedFormal->type))
1047 && (!IsNumStrType(t->namedFormal->type))
1054 if (!t->namedFormal && !t->wellKnownName)
1290 if (t->namedFormal == NULL) return false;
1382 t = tl->token; item = t->namedFormal;
1393 t = tl->token; item = t->namedFormal;
1398 if(IsNumStrType(t->namedFormal->type)) {
1399 if(pad & IsPadNumStrType(t->namedFormal->type))
1401 item->subscript->val,TypeToText(t->namedFormal->type),
1405 item->subscript->val,TypeToText(t->namedFormal->type),
1416 if(IsNumStrType(t->namedFormal->type)) {
1417 if(pad & IsPadNumStrType(t->namedFormal->type))
1419 item->subscript->name,TypeToText(t->namedFormal->type),
1423 item->subscript->name,TypeToText(t->namedFormal->type),
1491 if (t->namedFormal && t->namedFormal == item) {
1498 if (t->namedFormal && t->namedFormal == item) {
1572 if (t->namedFormal == item) {
1686 CTypeToResultType(t->namedFormal->type),
1687 t->namedFormal->name);
1688 if (t->namedFormal->subscript->constant)
1689 printf("%d);\n", t->namedFormal->subscript->val);
1691 printf("%s);\n", t->namedFormal->subscript->name);
1697 if(IsNumStrType(t->namedFormal->type)) {
1699 CTypeToResultType(t->namedFormal->type), t->namedFormal->name);
1700 if (t->namedFormal->subscript->constant)
1701 printf("%d, ", t->namedFormal->subscript->val);
1703 printf("%s, ", t->namedFormal->subscript->name);
1704 if (t->namedFormal->scaled) {
1705 if (t->namedFormal->scale->constant)
1706 printf("%d);\n", t->namedFormal->scale->val);
1708 printf("%s);\n", t->namedFormal->scale->name);
1713 ctxName, t->namedFormal->name);
1714 if (!t->namedFormal->subscripted) {
1722 if (t->namedFormal->subscript->constant) {
1723 int val = t->namedFormal->subscript->val;
1734 printf("%s);\n", t->namedFormal->subscript->name);
1737 ctxName,t->namedFormal->subscript->name,