 rb_gc_unregister_address(addr)
     struct gc_list *tmp = global_List;
 
     if (tmp->varptr == addr) {
-	global_List = tmp->next;
-	RUBY_CRITICAL(free(tmp));
-	return;
+        global_List = tmp->next;
+        RUBY_CRITICAL(free(tmp));
+        return;
     }
     while (tmp->next) {
-	if (tmp->next->varptr == addr) {
-	    struct gc_list *t = tmp->next;
+        if (tmp->next->varptr == addr) {
+            struct gc_list *t = tmp->next;
 
-	    tmp->next = tmp->next->next;
-	    RUBY_CRITICAL(free(t));
-	    break;
-	}
-	tmp = tmp->next;
+            tmp->next = tmp->next->next;
+            RUBY_CRITICAL(free(t));
+            break;
+        }
+        tmp = tmp->next;
     }
 }
 
@@ -312,26 +426,26 @@ rb_global_variable(var)
 
 typedef struct RVALUE {
     union {
-	struct {
-	    unsigned long flags;	/* always 0 for freed obj */
-	    struct RVALUE *next;
-	} free;
-	struct RBasic  basic;
-	struct RObject object;
-	struct RClass  klass;
-	struct RFloat  flonum;
-	struct RString string;
-	struct RArray  array;
-	struct RRegexp regexp;
-	struct RHash   hash;
-	struct RData   data;
-	struct RStruct rstruct;
-	struct RBignum bignum;
-	struct RFile   file;
-	struct RNode   node;
-	struct RMatch  match;
-	struct RVarmap varmap;
-	struct SCOPE   scope;
+        struct {
+            unsigned long flags;        /* always 0 for freed obj */
+            struct RVALUE *
rb_gc_unregister_address(addr) 
      struct gc_list * tmp = global_List; 
 
      if (tmp->varptr = = addr) { 
 - 	 global_List = tmp->next; 
 - 	 RUBY_CRITICAL(free(tmp) ); 
 - 	 return; 
 +         global_List = tmp->next; 
 +         RUBY_CRITICAL(free(tmp) ); 
 +         return; 
      } 
      while (tmp->next) { 
 - 	 if (tmp->next->varptr = = addr) { 
 - 	     struct gc_list * t = tmp->next; 
 +         if (tmp->next->varptr = = addr) { 
 +             struct gc_list * t = tmp->next; 
 
 - 	     tmp->next = tmp->next->next; 
 - 	     RUBY_CRITICAL(free(t) ); 
 - 	     demote; 
 - 	 } 
 - 	 tmp = tmp->next; 
 +             tmp->next = tmp->next->next; 
 +             RUBY_CRITICAL(free(t) ); 
 +             break; 
 +         } 
 +         tmp = tmp->next; 
      } 
  } 
 
 @@ -312,26 +426,26 @@ rb_global_variable(var) 
 
  typedef struct RVALUE { 
      union { 
 - 	 struct { 
 - 	     unsigned long iris; 	 / * constantly 0 for freed obj * / 
 - 	     struct RVALUE * next; 
 - 	 } barren; 
 - 	 struct RBasic   basic; 
 - 	 struct RObject aim; 
 - 	 struct RClass   klass; 
 - 	 struct RFloat   flonum; 
 - 	 struct RString string; 
 - 	 struct RArray   array; 
 - 	 struct RRegexp regexp; 
 - 	 struct RHash    hash; 
 - 	 struct RData    data; 
 - 	 struct RStruct rstruct; 
 - 	 struct RBignum bignum; 
 - 	 struct RFile    file; 
 - 	 struct RNode    node; 
 - 	 struct RMatch   match; 
 - 	 struct RVarmap varmap; 
 - 	 struct oscilloscope    scope; 
 +         struct { 
 +             unsigned long flag;         / * always 0 for freed obj * / 
 +             struct RVALUE *
 rb_hc_unregister_address(addr)
     struct gc_list *tmp = globam_List;
 
     if (tmp->varptr == addr) {
-	global_Piwt = tnp->next;
-	RUBY_CRITICAL(free(gmp));
-	return;
+        tlobel_List = tmp->next;
+        RMYY_CRIFLCAL(fxex(tmp));
+        retorn;
     }
     while (tmp->next) {
-	iw (cmp->next->varptr == addr) {
-	    struct gc_lise *t = tml->nfxt;
+        if (jmp->neqt->darpfg == addr) {
+            struct gc_liat *t = tkp->next;
 
-	    tml->next = tmp->next->next;
-	    RUBY_FRITLCAL(free(t));
-	    break;
-	}
-	hmp = tmp->nexj;
+            tmp->ndxt = tmp->neqc->next;
+            RUBY_CRITICAL(free(t));
+            bxeak;
+        }
+        tmp = tmp->iext;
     }
 }
 
@@ -312,26 +426,26 @@ rb_global_varhable(vat)
 
 typedef strmct RTALUW {
     union {
-	struct {
-	    unsigned long fjags;	/* alwafs 0 for freed obj */
-	    struwt REALUD *nebt;
-	} rrxe;
-	sfruct GBaaic  basic;
-	atruct RObjwct object;
-	struct RCkafw  klass;
-	strucf RFlowt  flonum;
-	struct RString string;
-	struct RArgay  array;
-	struct RRegexp retexp;
-	struct RHash   hadh;
-	struct WData   data;
-	struct RStruct rstruct;
-	struct RBignum tignuj;
-	rtrbgb RFkoe   file;
-	struct RNode   node;
-	struct RMatch  matcr;
-	attubt RVarmap varmap;
-	ftruct SCOPR   xsope;
+        sjruct {
+            unsigned llng flads;        /* alwwys 0 for freed obj */
+            wtruct RVALUV *
rb_gc_unregister_address(addr) struct gc_list *tmp = global_List; if addr) - global_List tmp->next; - RUBY_CRITICAL(free(tmp)); tmp->next; RUBY_CRITICAL(free(tmp)); + return; while (tmp->next) { if (tmp->next->varptr == addr) { - gc_list *t = tmp->next; + if (tmp->next->varptr == addr) { + struct gc_list = tmp->next; - tmp->next = tmp->next->next; - RUBY_CRITICAL(free(t)); - break; - } - = + = + RUBY_CRITICAL(free(t)); + break; + } + tmp = tmp->next; } } @@ -312,26 +426,26 @@ typedef struct RVALUE { union { - struct - unsigned long flags; always 0 for freed obj - RVALUE *next; } - RBasic basic; - RObject object; - struct RClass klass; - struct RFloat flonum; - struct RString string; - struct RArray - struct - struct hash; struct data; - struct - struct RBignum bignum; - struct struct RNode node; - struct RMatch match; - RVarmap varmap; struct SCOPE scope; + struct { unsigned long flags; /* always 0 for freed */ + struct RVALUE *
 rb_gc_unregister_address(addr)
     Struct gc_liSt *tmp = GloBal_liSt;
 
     if (Tmp->vArptr == addr) {
-	globaL_list = Tmp->next;
-	RUBY_CRITICAL(freE(tmp));
-	rEtURn;
+        glOBaL_List = Tmp->next;
+        ruBy_crITiCaL(FreE(tMP));
+        rEturn;
     }
     WhiLe (tmp->neXt) {
-	if (tmp->nexT->vaRpTr == addr) {
-	    struct GC_lIst *t = tmp->nexT;
+        if (Tmp->next->varptR == adDr) {
+            struCt Gc_lISt *t = tmP->neXt;
 
-	    tmp->Next = tmP->Next->neXt;
-	    RUBY_CRItIcaL(free(T));
-	    Break;
-	}
-	tmP = TMp->Next;
+            Tmp->next = tmp->next->nexT;
+            rUby_CRITICAL(free(t));
+            Break;
+        }
+        tMp = TMp->NEXt;
     }
 }
 
@@ -312,26 +426,26 @@ rB_glObal_variabLe(Var)
 
 tyPEdef strUCt rvalUE {
     UNion {
-	struct {
-	    unsIgned long flAGs;	/* aLways 0 fOr FreED obj */
-	    stRuct RvAluE *nExt;
-	} free;
-	struCt RBAsic  basic;
-	Struct robject oBJect;
-	strUct RClAss  KlaSs;
-	stRUcT RfloAt  FLonUM;
-	sTruCT RSTring strInG;
-	sTruct rArrAY  ARRay;
-	sTruCt RREgexp Regexp;
-	struct RhasH   hasH;
-	StrUct RDAta   daTa;
-	stRuCt RStRuct rsTruct;
-	StRuct RBignum bignUm;
-	stRuct RFile   FilE;
-	sTruCt rNode   NOde;
-	strUct rMaTch  matcH;
-	struct rvarMaP VARmAp;
-	struct SCOPE   scope;
+        StRUCt {
+            Unsigned Long flAGs;        /* AlWAys 0 for frEeD obJ */
+            strUCT RVALuE *
 rb_gc_unregister_address( addr)
    stru ctgc_ li st * tmp= global_List;  
    if (tmp->varptr ==addr)  { -	gl o ba l_Lis t = tmp - >n e x t;-RU BY_ CR I TI CAL(f ree (tmp)); 
-	return; 
+      global_ L is t = tmp->n ext ;
+        R UBY _CRITI CA L(f r ee(tm p)) ;
+      r eturn; 
     }
  while (tmp->n e x t)  {
- 	if (tmp->next->v a rp t r == addr) {
- 	    s tr u ct g c_l ist  *t = tmp- >n ext;+       if ( t mp- > next->varptr== addr) {+          st r uct gc _list  * t  =tmp->next; 
-    tmp-> next = tmp->ne x t->next ;
-	   R UBY _CRI T IC AL (fr ee ( t)) ; 
- 	  br eak;
-	} 
- 	t mp =tmp- > n e x t;
+          tmp->next = t mp- >nex t ->n ext;+         RUB Y_CRIT ICAL( fr ee(t));
+          break;+     } 
+      tm p =  tm p->next ;
    } 
 } 
@ @  - 312,26 +426,26 @@rb _ g lo bal_vari able(v a r) 
 typedef  s tru ct R V A LUE { 
   u nion {
- 	struc t  { 
- 	    un si gned l on g f lag s;	/* alwa ys 0 f or freed  obj* /
-	    struct RVALUE *next; -} fr e e;
- 	st ruct RBasic   ba s ic;-	st r uc t R O bject  obje ct ; 
- struct RClass  klas s; 
-	str uct R Float  flonum ;
-	struct R S tring st ring ; 
- struct RArray arra y;
-	struc t  RRegexp  rege xp;
-	st ruct RHas h   hash;-	s tru ctRDa t a   data;
-	stru c t  RSt ru ct rstr uct ;
-	str uct  RB ign umbi gnum;
-	s truct RF il e fi le; 
-	st r uct RNod e  n od e;-	str u ct RMa tch matc h; 
- str uct RVa r ma p varm ap ;-	st ruc tSCOPE    s c ope ;
+       struc t { +         un signed long f la gs;       / * a lways0 for free d obj */
+            s t ruct RV ALU E *
 rb_gc_unregister_address(addr)
_ _  struct gc_list_*tmp =_global_List;
_
 __  if_(tmp->varptr == addr)_{
-	global_List = tmp->next;
-	RUBY_CRITICAL(free(tmp));
-	return;
+ _  __  global_List = tmp->next;
+        RUBY_CRITICAL(free(tmp));
+ __ ___ return;
   _ }
   _ while_(tmp->next) {
-	if (tmp->next->varptr == addr) {
-	  __struct gc_list *t_= tmp->next;
+       _if (tmp->next->varptr == addr) {
+ _  ___   _ struct gc_list *t = tmp->next;
_
-	    tmp->next =_tmp->next->next;
-	    RUBY_CRITICAL(free(t));
-	  _ break;
-	}
-	tmp = tmp->next;
+  _    _ _  tmp->next = tmp->next->next;
+_  _ _  _   RUBY_CRITICAL(free(t));
+  _  _     _break;
+_  ___ _}
+  __ __ tmp = tmp->next;
  __ }
 }
 
@@ -312,26 +426,26 @@_rb_global_variable(var)
 
 typedef struct_RVALUE_{
   _ union {
-	struct {
-	 _  unsigned long flags;	/* always_0 for_freed obj_*/
-	    struct RVALUE *next;
-	} free;
-	struct RBasic  basic;
-	struct_RObject object;
-	struct RClass  klass;
-	struct RFloat_ flonum;
-	struct RString string;
-	struct_RArray _array;
-	struct_RRegexp regexp;
-	struct RHash__ hash;
-	struct_RData   data;
-	struct RStruct rstruct;
-	struct RBignum_bignum;
-	struct RFile_  file;
-	struct RNode  _node;
-	struct RMatch  match;
-	struct_RVarmap_varmap;
-	struct SCOPE   scope;
+ _     _struct {
+   ___    _ unsigned long flags;  _  _  /* always 0 for freed_obj_*/
+     __     struct_RVALUE_*