/ Replace string offsets by a pointer. */ /
| 2056 | /* Replace string offsets by a pointer. */ |
| 2057 | /***********************************************************************/ |
| 2058 | PVL SWAP::MptrVal(PVL ovl) { |
| 2059 | PVL vlp = (PVL)MakePtr(Base, (size_t)ovl); |
| 2060 | |
| 2061 | if (vlp->Type == TYPE_STRG) |
| 2062 | vlp->Strp = (PSZ)MakePtr(Base, (size_t)vlp->Strp); |
| 2063 | |
| 2064 | return vlp; |
| 2065 | } // end of MptrValue |
| 2066 | #endif // 0 |