/ Replace all object offsets by pointers. */ /
| 1997 | /* Replace all object offsets by pointers. */ |
| 1998 | /***********************************************************************/ |
| 1999 | PJOB SWAP::MptrObject(PJOB ojob) { |
| 2000 | PJOB jobp = (PJOB)MakePtr(Base, (size_t)ojob); |
| 2001 | |
| 2002 | jobp = (PJOB)new((long long)jobp) JOBJECT(0); |
| 2003 | |
| 2004 | if (jobp->First) { |
| 2005 | jobp->First = (PJPR)MptrPair(jobp->First); |
| 2006 | jobp->Last = (PJPR)MakePtr(Base, (size_t)jobp->Last); |
| 2007 | } // endif First |
| 2008 | |
| 2009 | return jobp; |
| 2010 | } // end of MptrObject |
| 2011 | |
| 2012 | /***********************************************************************/ |
| 2013 | /* Replace all pair offsets by pointers. */ |