Difference between revisions of "Interfacing the Debugger"

m (Reverted edit of Seilerm, changed back to last version by Konradm)
m
Line 3: Line 3:
  
 
====Introduction====
 
====Introduction====
 +
 +
/* foo */
 +
 +
EIF_BOOLEAN Fadkw7f (EIF_REFERENCE Current, EIF_REFERENCE arg1, EIF_REFERENCE arg2)
 +
{
 +
  GTCX
 +
  RTEX;
 +
  EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
 +
  EIF_REFERENCE tp1 = NULL;
 +
  EIF_REFERENCE tp2 = NULL;
 +
  EIF_BOOLEAN Result = (EIF_BOOLEAN) 0;
 +
  RTSN;
 +
  RTDA;
 +
  RTLD;
 +
 
 +
  RTLI(5);
 +
  RTLR(1,tp1);
 +
  RTLR(0,arg1);
 +
  RTLR(2,arg2);
 +
  RTLR(4,Current);
 +
  RTLR(3,tp2);
 +
 
 +
  RTLU (SK_BOOL, &Result);
 +
  RTLU(SK_REF,&arg1);
 +
  RTLU(SK_REF,&arg2);
 +
  RTLU (SK_REF, &Current);
 +
  RTLU(SK_INT32, &loc1);
 +
  RTEAA("foo", RTUD(9), Current, 1, 2, 186);
 +
  RTGC;
 +
  RTSA(Dtype(Current));
 +
  RTSC;
 +
  RTIV2(Current, RTAL);
 +
  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;
 +
  RTVI2(Current, RTAL);
 +
  RTRS;
 +
  RTHOOK(4);
 +
  RTLE;
 +
  RTLO(5);
 +
  RTEE;
 +
  return Result;
 +
}

Revision as of 03:34, 20 January 2007

Warning.png Warning: Warning: Article under development

Introduction

/* foo */

EIF_BOOLEAN Fadkw7f (EIF_REFERENCE Current, EIF_REFERENCE arg1, EIF_REFERENCE arg2) {

  GTCX
  RTEX;
  EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0;
  EIF_REFERENCE tp1 = NULL;
  EIF_REFERENCE tp2 = NULL;
  EIF_BOOLEAN Result = (EIF_BOOLEAN) 0;
  RTSN;
  RTDA;
  RTLD;
  
  RTLI(5);
  RTLR(1,tp1);
  RTLR(0,arg1);
  RTLR(2,arg2);
  RTLR(4,Current);
  RTLR(3,tp2);
  
  RTLU (SK_BOOL, &Result);
  RTLU(SK_REF,&arg1);
  RTLU(SK_REF,&arg2);
  RTLU (SK_REF, &Current);
  RTLU(SK_INT32, &loc1);
  RTEAA("foo", RTUD(9), Current, 1, 2, 186);
  RTGC;
  RTSA(Dtype(Current));
  RTSC;
  RTIV2(Current, RTAL);
  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;
  RTVI2(Current, RTAL);
  RTRS;
  RTHOOK(4);
  RTLE;
  RTLO(5);
  RTEE;
  return Result;

}