00144                    :
00145 
00146     This function dumps 
the contents of an exception registration record,
00147     unless Object == 
NULL, in which 
case it dumps 
the entire registration
00148     chain.
00149 
00150     Currently, 
it does not dump floating point context.
00151 
00152 Arguments:
00153 
00154     Object - Address of 
the record to dump.
00155 
00156     Control - Ignored, here so we look like a standard dump 
procedure.
00157 
00158 Return Value:
00159 
00160     none
00161 
00162 --*/
00163 
00164 {
00165     PEXCEPTION_REGISTRATION_RECORD RegistrationPointer;
00166 
00167     RegistrationPointer = (PEXCEPTION_REGISTRATION_RECORD)Object;
00168 
00169     
if (RegistrationPointer != EXCEPTION_CHAIN_END) {
00170         
DbgPrint(
"Record @ %lx\n", (ULONG)RegistrationPointer);
00171         
DbgPrint(
"   Next: %lx\n", RegistrationPointer->Next);
00172         
DbgPrint(
"Handler: %lx\n", RegistrationPointer->Handler);
00173         
DbgPrint(
"\n");
00174     } 
else {
00175         RegistrationPointer = 
RtlpGetRegistrationHead();
00176 
00177         
while (RegistrationPointer != EXCEPTION_CHAIN_END) {
00178             
DbgPrint(
"Record @ %lx\n", (ULONG)RegistrationPointer);
00179             
DbgPrint(
"   Next: %lx\n", RegistrationPointer->Next);
00180             
DbgPrint(
"Handler: %lx\n", RegistrationPointer->Handler);
00181             
DbgPrint(
"\n");
00182         }
00183     }
00184     
return;
00185 }
}