Interfacing the Debugger: Difference between revisions

From EiffelStudio: an EiffelSoftware project
Jump to navigation Jump to search
Konradm (talk | contribs)
Konradm (talk | contribs)
Line 10: Line 10:
                     EIF_REFERENCE arg2)
                     EIF_REFERENCE arg2)
{
{
  GTCX
  RTEX;
   EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
   EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
  EIF_REFERENCE tp1 = NULL;
  EIF_REFERENCE tp2 = NULL;
   EIF_BOOLEAN Result = (EIF_BOOLEAN) 0;
   EIF_BOOLEAN Result = (EIF_BOOLEAN) 0;
   RTSN;
   ...
  RTDA;
  RTLD;
 
  /*Some GC stuff omitted*/
 
   RTLU (SK_BOOL, &Result);
   RTLU (SK_BOOL, &Result);
   RTLU(SK_REF,&arg1);
   RTLU(SK_REF,&arg1);
Line 27: Line 18:
   RTLU (SK_REF, &Current);
   RTLU (SK_REF, &Current);
   RTLU(SK_INT32, &loc1);
   RTLU(SK_INT32, &loc1);
   RTEAA("foo", RTUD(9), Current, 1, 2, 186);
   ...
  RTGC;
  RTSA(Dtype(Current));
  RTSC;
  RTIV2(Current, RTAL);
   RTHOOK(1);
   RTHOOK(1);
   loc1 = (EIF_INTEGER_32)((EIF_INTEGER_32) 10L);
   loc1 = (EIF_INTEGER_32)((EIF_INTEGER_32) 10L);
Line 43: Line 30:
   RTHOOK(3);
   RTHOOK(3);
   Result = (EIF_BOOLEAN)(EIF_BOOLEAN) 1;
   Result = (EIF_BOOLEAN)(EIF_BOOLEAN) 1;
  RTVI2(Current, RTAL);
  RTRS;
   RTHOOK(4);
   RTHOOK(4);
  RTLE;
   RTLO(5);
   RTLO(5);
  RTEE;
 
   return Result;
   return Result;
}
}

Revision as of 14:11, 20 January 2007

Warning: Warning: Article under development

Introduction

/* foo */

EIF_BOOLEAN Fadkw7f (EIF_REFERENCE Current,

                    EIF_REFERENCE arg1, 
                    EIF_REFERENCE arg2)

{

  EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
  EIF_BOOLEAN Result = (EIF_BOOLEAN) 0;
  ...
  RTLU (SK_BOOL, &Result);
  RTLU(SK_REF,&arg1);
  RTLU(SK_REF,&arg2);
  RTLU (SK_REF, &Current);
  RTLU(SK_INT32, &loc1);
  ...
  RTHOOK(1);
  loc1 = (EIF_INTEGER_32)((EIF_INTEGER_32) 10L);
  RTHOOK(2);
  tp1 = (FUNCTION_CAST(EIF_REFERENCE, (EIF_REFERENCE)) 
     RTVF(100, 33, "first", arg1))(arg1);
  RTNHOOK(2);
  tp2 = RTCCL(arg2);
  (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_REFERENCE)) 
     RTVF(100, 39, "force", tp1))(tp1, tp2);
  RTHOOK(3);
  Result = (EIF_BOOLEAN)(EIF_BOOLEAN) 1;
  RTHOOK(4);
  RTLO(5);
  return Result;

}