Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/branches/SMLNJ/src/runtime/mach-dep/signal-util.c
ViewVC logotype

Diff of /sml/branches/SMLNJ/src/runtime/mach-dep/signal-util.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 438, Wed Sep 15 16:37:27 1999 UTC revision 439, Wed Sep 15 16:37:27 1999 UTC
# Line 31  Line 31 
31      vsp->vp_sigCode = vsp->vp_pendingSigQ[vsp->vp_nextPendingSig].sigNum;      vsp->vp_sigCode = vsp->vp_pendingSigQ[vsp->vp_nextPendingSig].sigNum;
32      vsp->vp_sigCount = vsp->vp_pendingSigQ[vsp->vp_nextPendingSig].count;      vsp->vp_sigCount = vsp->vp_pendingSigQ[vsp->vp_nextPendingSig].count;
33      if (IS_SYSTEM_SIG(vsp->vp_sigCode))      if (IS_SYSTEM_SIG(vsp->vp_sigCode))
         vsp->vp_numPendingSigs -= vsp->vp_sigCount;  
     else  
34          vsp->vp_numPendingSysSigs -= vsp->vp_sigCount;          vsp->vp_numPendingSysSigs -= vsp->vp_sigCount;
35        else
36            vsp->vp_numPendingSigs -= vsp->vp_sigCount;
37    
38    /* advance the pending queue */    /* advance the pending queue */
39      if ((--vsp->vp_numInQ == 0) || (++vsp->vp_nextPendingSig == NUM_SIGS))      if ((--vsp->vp_numInQ == 0) || (++vsp->vp_nextPendingSig == NUM_SIGS))
# Line 153  Line 153 
153    
154      contClosure = PTR_MLtoC(ml_val_t, msp->ml_closure);      contClosure = PTR_MLtoC(ml_val_t, msp->ml_closure);
155    
156      msp->ml_arg                 = contClosure[2];      msp->ml_arg                 = contClosure[1];
157      msp->ml_cont                = contClosure[3];      msp->ml_cont                = contClosure[2];
158      msp->ml_closure             = contClosure[4];      msp->ml_closure             = contClosure[3];
159      msp->ml_linkReg             = contClosure[5];      msp->ml_linkReg             = contClosure[4];
160      msp->ml_linkReg             = contClosure[6];      msp->ml_pc                  = contClosure[5];
161      msp->ml_exnCont             = contClosure[7];      msp->ml_exnCont             = contClosure[6];
162      msp->ml_varReg              = contClosure[8];      msp->ml_varReg              = contClosure[7];
163      msp->ml_calleeSave[0]       = contClosure[9];      msp->ml_calleeSave[0]       = contClosure[8];
164      msp->ml_calleeSave[1]       = contClosure[10];      msp->ml_calleeSave[1]       = contClosure[9];
165      msp->ml_calleeSave[2]       = contClosure[11];      msp->ml_calleeSave[2]       = contClosure[10];
166    
167  } /* end of LoadResumeState */  } /* end of LoadResumeState */
168    

Legend:
Removed from v.438  
changed lines
  Added in v.439

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0