c_src/utils._sep.c

   1 /* This C file is generated by NIT to compile module utils. */
   2 #include "utils._sep.h"
   3 static const char LOCATE_utils___Object___cmangle[] = "utils::Object::cmangle";
   4 val_t utils___Object___cmangle(val_t p0, val_t p1){
   5   struct {struct stack_frame_t me; val_t MORE_REG[6];} fra;
   6   val_t REGB0;
   7   val_t REGB1;
   8   val_t REGB2;
   9   val_t tmp;
  10   static val_t once_value_1; /* Once value */
  11   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
  12   fra.me.file = LOCATE_utils;
  13   fra.me.line = 23;
  14   fra.me.meth = LOCATE_utils___Object___cmangle;
  15   fra.me.has_broke = 0;
  16   fra.me.REG_size = 7;
  17   fra.me.nitni_local_ref_head = NULL;
  18   fra.me.REG[0] = NIT_NULL;
  19   fra.me.REG[1] = NIT_NULL;
  20   fra.me.REG[2] = NIT_NULL;
  21   fra.me.REG[3] = NIT_NULL;
  22   fra.me.REG[4] = NIT_NULL;
  23   fra.me.REG[5] = NIT_NULL;
  24   fra.me.REG[6] = NIT_NULL;
  25   fra.me.REG[0] = p0;
  26   fra.me.REG[1] = p1;
  27   /* utils.nit:23 */
  28   fra.me.REG[2] = fra.me.REG[0];
  29   REGB0 = TAG_Bool(VAL_ISA(fra.me.REG[1], COLOR_standard___collection___array___Array, ID_standard___collection___array___Array)) /*cast Array[Symbol]*/;
  30   if (UNTAG_Bool(REGB0)) {
  31   } else {
  32     nit_abort("Cast failed", NULL, LOCATE_utils, 23);
  33   }
  34   /* utils.nit:26 */
  35   if (!once_value_1) {
  36     fra.me.REG[2] = CALL_utils___Object___cmangle_table(fra.me.REG[2])(fra.me.REG[2]);
  37     once_value_1 = fra.me.REG[2];
  38     register_static_object(&once_value_1);
  39   } else fra.me.REG[2] = once_value_1;
  40   fra.me.REG[2] = fra.me.REG[2];
  41   /* utils.nit:27 */
  42   fra.me.REG[0] = NEW_Buffer_standard___string___Buffer___init();
  43   /* ../lib/standard/collection/array.nit:269 */
  44   REGB0 = TAG_Int(0);
  45   /* ../lib/standard/collection/array.nit:270 */
  46   REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
  47   if (UNTAG_Bool(REGB1)) {
  48   } else {
  49     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 270);
  50   }
  51   REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
  52   /* ../lib/standard/collection/array.nit:271 */
  53   fra.me.REG[3] = ATTR_standard___collection___array___Array____items(fra.me.REG[1]);
  54   /* ../lib/standard/collection/array.nit:272 */
  55   while(1) {
  56     /* ../lib/standard/collection/array.nit:24 */
  57     REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
  58     if (UNTAG_Bool(REGB1)) {
  59     } else {
  60       nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
  61     }
  62     REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
  63     REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
  64     if (UNTAG_Bool(REGB2)) {
  65     } else {
  66       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
  67     }
  68     /* ../lib/standard/kernel.nit:235 */
  69     REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
  70     /* ../lib/standard/collection/array.nit:272 */
  71     if (UNTAG_Bool(REGB1)) {
  72       /* ../lib/standard/collection/array.nit:273 */
  73       REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
  74       if (UNTAG_Bool(REGB1)) {
  75         nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 273);
  76       }
  77       /* ../lib/standard/collection/array.nit:724 */
  78       fra.me.REG[4] = ((Nit_NativeArray)fra.me.REG[3])->val[UNTAG_Int(REGB0)];
  79       /* utils.nit:29 */
  80       REGB1 = CALL_standard___collection___abstract_collection___Collection___is_empty(fra.me.REG[0])(fra.me.REG[0]);
  81       REGB1 = TAG_Bool(!UNTAG_Bool(REGB1));
  82       if (UNTAG_Bool(REGB1)) {
  83         /* utils.nit:30 */
  84         REGB1 = TAG_Char('_');
  85         CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], REGB1);
  86         /* utils.nit:31 */
  87         REGB1 = TAG_Char('_');
  88         CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], REGB1);
  89         /* utils.nit:32 */
  90         REGB1 = TAG_Char('_');
  91         CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], REGB1);
  92       }
  93       /* utils.nit:34 */
  94       REGB1 = TAG_Bool(0);
  95       fra.me.REG[5] = REGB1;
  96       /* utils.nit:35 */
  97       REGB1 = TAG_Bool(1);
  98       fra.me.REG[6] = REGB1;
  99       /* utils.nit:36 */
 100       fra.me.REG[4] = CALL_standard___string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]);
 101       CALL_standard___collection___abstract_collection___Collection___iterate(fra.me.REG[4])(fra.me.REG[4], (&(fra.me)), ((fun_t)OC_utils___Object___cmangle_2));
 102       /* ../lib/standard/collection/array.nit:274 */
 103       REGB1 = TAG_Int(1);
 104       /* ../lib/standard/kernel.nit:238 */
 105       REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
 106       /* ../lib/standard/collection/array.nit:274 */
 107       REGB0 = REGB1;
 108     } else {
 109       /* ../lib/standard/collection/array.nit:272 */
 110       goto label3;
 111     }
 112   }
 113   label3: while(0);
 114   /* utils.nit:57 */
 115   fra.me.REG[0] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
 116   goto label4;
 117   label4: while(0);
 118   stack_frame_head = fra.me.prev;
 119   return fra.me.REG[0];
 120 }
 121       void OC_utils___Object___cmangle_2(struct stack_frame_t *closctx, val_t p0){
 122         struct {struct stack_frame_t me;} fra;
 123         val_t REGB0;
 124         val_t REGB1;
 125         val_t REGB2;
 126         val_t REGB3;
 127         val_t tmp;
 128         /* utils.nit:37 */
 129         fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 130         fra.me.file = LOCATE_utils;
 131         fra.me.line = 0;
 132         fra.me.meth = LOCATE_utils___Object___cmangle;
 133         fra.me.has_broke = 0;
 134         fra.me.REG_size = 1;
 135         fra.me.nitni_local_ref_head = NULL;
 136         fra.me.REG[0] = NIT_NULL;
 137         fra.me.REG[0] = p0;
 138         REGB0 = fra.me.REG[0];
 139         /* utils.nit:38 */
 140         REGB1 = TAG_Char('a');
 141         REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
 142         if (UNTAG_Bool(REGB2)) {
 143         } else {
 144           nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
 145         }
 146         /* ../lib/standard/kernel.nit:387 */
 147         REGB1 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB1));
 148         /* utils.nit:38 */
 149         if (UNTAG_Bool(REGB1)) {
 150           REGB1 = TAG_Char('z');
 151           REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
 152           if (UNTAG_Bool(REGB2)) {
 153           } else {
 154             nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
 155           }
 156           /* ../lib/standard/kernel.nit:385 */
 157           REGB1 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB1));
 158         } else {
 159           /* utils.nit:38 */
 160           REGB2 = TAG_Bool(0);
 161           REGB1 = REGB2;
 162         }
 163         if (UNTAG_Bool(REGB1)) {
 164           REGB1 = TAG_Bool(1);
 165         } else {
 166           REGB2 = TAG_Char('A');
 167           REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
 168           if (UNTAG_Bool(REGB3)) {
 169           } else {
 170             nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
 171           }
 172           /* ../lib/standard/kernel.nit:387 */
 173           REGB2 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB2));
 174           /* utils.nit:38 */
 175           if (UNTAG_Bool(REGB2)) {
 176             REGB2 = TAG_Char('Z');
 177             REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
 178             if (UNTAG_Bool(REGB3)) {
 179             } else {
 180               nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
 181             }
 182             /* ../lib/standard/kernel.nit:385 */
 183             REGB2 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB2));
 184           } else {
 185             /* utils.nit:38 */
 186             REGB3 = TAG_Bool(0);
 187             REGB2 = REGB3;
 188           }
 189           REGB1 = REGB2;
 190         }
 191         if (UNTAG_Bool(REGB1)) {
 192           REGB1 = TAG_Bool(1);
 193         } else {
 194           REGB2 = TAG_Char('0');
 195           REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
 196           if (UNTAG_Bool(REGB3)) {
 197           } else {
 198             nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
 199           }
 200           /* ../lib/standard/kernel.nit:387 */
 201           REGB2 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB2));
 202           /* utils.nit:38 */
 203           if (UNTAG_Bool(REGB2)) {
 204             REGB2 = TAG_Char('9');
 205             REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
 206             if (UNTAG_Bool(REGB3)) {
 207             } else {
 208               nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
 209             }
 210             /* ../lib/standard/kernel.nit:385 */
 211             REGB2 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB2));
 212           } else {
 213             /* utils.nit:38 */
 214             REGB3 = TAG_Bool(0);
 215             REGB2 = REGB3;
 216           }
 217           REGB1 = REGB2;
 218         }
 219         if (UNTAG_Bool(REGB1)) {
 220           /* utils.nit:39 */
 221           CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx->REG[0])(closctx->REG[0], REGB0);
 222           /* utils.nit:40 */
 223           REGB1 = TAG_Bool(0);
 224           closctx->REG[5] = REGB1;
 225           /* utils.nit:41 */
 226           REGB1 = TAG_Bool(1);
 227           closctx->REG[6] = REGB1;
 228         } else {
 229           /* utils.nit:42 */
 230           REGB1 = TAG_Char('_');
 231           REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
 232           if (UNTAG_Bool(REGB2)) {
 233           } else {
 234             /* ../lib/standard/kernel.nit:381 */
 235             REGB1 = TAG_Bool((REGB0)==(REGB1));
 236             /* utils.nit:42 */
 237             REGB2 = REGB1;
 238           }
 239           if (UNTAG_Bool(REGB2)) {
 240             REGB2 = TAG_Bool(!UNTAG_Bool(closctx->REG[5]));
 241           } else {
 242             REGB1 = TAG_Bool(0);
 243             REGB2 = REGB1;
 244           }
 245           if (UNTAG_Bool(REGB2)) {
 246             /* utils.nit:43 */
 247             CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx->REG[0])(closctx->REG[0], REGB0);
 248             /* utils.nit:44 */
 249             REGB2 = TAG_Bool(1);
 250             closctx->REG[5] = REGB2;
 251             /* utils.nit:45 */
 252             REGB2 = TAG_Bool(1);
 253             closctx->REG[6] = REGB2;
 254           } else {
 255             /* utils.nit:46 */
 256             REGB2 = CALL_standard___collection___abstract_collection___MapRead___has_key(closctx->REG[2])(closctx->REG[2], REGB0);
 257             if (UNTAG_Bool(REGB2)) {
 258               /* utils.nit:47 */
 259               if (UNTAG_Bool(closctx->REG[6])) {
 260                 /* utils.nit:48 */
 261                 REGB2 = TAG_Char('_');
 262                 CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx->REG[0])(closctx->REG[0], REGB2);
 263                 /* utils.nit:49 */
 264                 REGB2 = TAG_Char('_');
 265                 CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx->REG[0])(closctx->REG[0], REGB2);
 266               }
 267               /* utils.nit:51 */
 268               fra.me.REG[0] = CALL_standard___collection___abstract_collection___MapRead_____bra(closctx->REG[2])(closctx->REG[2], REGB0);
 269               CALL_standard___collection___abstract_collection___Sequence___append(closctx->REG[0])(closctx->REG[0], fra.me.REG[0]);
 270               /* utils.nit:52 */
 271               REGB0 = TAG_Bool(0);
 272               closctx->REG[6] = REGB0;
 273               /* utils.nit:53 */
 274               REGB0 = TAG_Bool(0);
 275               closctx->REG[5] = REGB0;
 276             }
 277           }
 278         }
 279         stack_frame_head = fra.me.prev;
 280         return;
 281       }
 282 static const char LOCATE_utils___Object___cmangle_table[] = "utils::Object::cmangle_table";
 283 val_t utils___Object___cmangle_table(val_t p0){
 284   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
 285   val_t REGB0;
 286   val_t REGB1;
 287   val_t tmp;
 288   static val_t once_value_1; /* Once value */
 289   static val_t once_value_2; /* Once value */
 290   static val_t once_value_3; /* Once value */
 291   static val_t once_value_4; /* Once value */
 292   static val_t once_value_5; /* Once value */
 293   static val_t once_value_6; /* Once value */
 294   static val_t once_value_7; /* Once value */
 295   static val_t once_value_8; /* Once value */
 296   static val_t once_value_9; /* Once value */
 297   static val_t once_value_10; /* Once value */
 298   static val_t once_value_11; /* Once value */
 299   static val_t once_value_12; /* Once value */
 300   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 301   fra.me.file = LOCATE_utils;
 302   fra.me.line = 60;
 303   fra.me.meth = LOCATE_utils___Object___cmangle_table;
 304   fra.me.has_broke = 0;
 305   fra.me.REG_size = 2;
 306   fra.me.nitni_local_ref_head = NULL;
 307   fra.me.REG[0] = NIT_NULL;
 308   fra.me.REG[1] = NIT_NULL;
 309   fra.me.REG[0] = p0;
 310   /* utils.nit:63 */
 311   fra.me.REG[0] = NEW_HashMap_standard___collection___hash_collection___HashMap___init();
 312   /* utils.nit:64 */
 313   REGB0 = TAG_Char('+');
 314   if (!once_value_1) {
 315     fra.me.REG[1] = BOX_NativeString("plus");
 316     REGB1 = TAG_Int(4);
 317     fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
 318     once_value_1 = fra.me.REG[1];
 319     register_static_object(&once_value_1);
 320   } else fra.me.REG[1] = once_value_1;
 321   fra.me.REG[1] = fra.me.REG[1];
 322   CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
 323   /* utils.nit:65 */
 324   REGB0 = TAG_Char('-');
 325   if (!once_value_2) {
 326     fra.me.REG[1] = BOX_NativeString("minus");
 327     REGB1 = TAG_Int(5);
 328     fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
 329     once_value_2 = fra.me.REG[1];
 330     register_static_object(&once_value_2);
 331   } else fra.me.REG[1] = once_value_2;
 332   fra.me.REG[1] = fra.me.REG[1];
 333   CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
 334   /* utils.nit:66 */
 335   REGB0 = TAG_Char('*');
 336   if (!once_value_3) {
 337     fra.me.REG[1] = BOX_NativeString("star");
 338     REGB1 = TAG_Int(4);
 339     fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
 340     once_value_3 = fra.me.REG[1];
 341     register_static_object(&once_value_3);
 342   } else fra.me.REG[1] = once_value_3;
 343   fra.me.REG[1] = fra.me.REG[1];
 344   CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
 345   /* utils.nit:67 */
 346   REGB0 = TAG_Char('/');
 347   if (!once_value_4) {
 348     fra.me.REG[1] = BOX_NativeString("slash");
 349     REGB1 = TAG_Int(5);
 350     fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
 351     once_value_4 = fra.me.REG[1];
 352     register_static_object(&once_value_4);
 353   } else fra.me.REG[1] = once_value_4;
 354   fra.me.REG[1] = fra.me.REG[1];
 355   CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
 356   /* utils.nit:68 */
 357   REGB0 = TAG_Char('%');
 358   if (!once_value_5) {
 359     fra.me.REG[1] = BOX_NativeString("percent");
 360     REGB1 = TAG_Int(7);
 361     fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
 362     once_value_5 = fra.me.REG[1];
 363     register_static_object(&once_value_5);
 364   } else fra.me.REG[1] = once_value_5;
 365   fra.me.REG[1] = fra.me.REG[1];
 366   CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
 367   /* utils.nit:69 */
 368   REGB0 = TAG_Char('[');
 369   if (!once_value_6) {
 370     fra.me.REG[1] = BOX_NativeString("bra");
 371     REGB1 = TAG_Int(3);
 372     fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
 373     once_value_6 = fra.me.REG[1];
 374     register_static_object(&once_value_6);
 375   } else fra.me.REG[1] = once_value_6;
 376   fra.me.REG[1] = fra.me.REG[1];
 377   CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
 378   /* utils.nit:70 */
 379   REGB0 = TAG_Char('=');
 380   if (!once_value_7) {
 381     fra.me.REG[1] = BOX_NativeString("eq");
 382     REGB1 = TAG_Int(2);
 383     fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
 384     once_value_7 = fra.me.REG[1];
 385     register_static_object(&once_value_7);
 386   } else fra.me.REG[1] = once_value_7;
 387   fra.me.REG[1] = fra.me.REG[1];
 388   CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
 389   /* utils.nit:71 */
 390   REGB0 = TAG_Char('<');
 391   if (!once_value_8) {
 392     fra.me.REG[1] = BOX_NativeString("l");
 393     REGB1 = TAG_Int(1);
 394     fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
 395     once_value_8 = fra.me.REG[1];
 396     register_static_object(&once_value_8);
 397   } else fra.me.REG[1] = once_value_8;
 398   fra.me.REG[1] = fra.me.REG[1];
 399   CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
 400   /* utils.nit:72 */
 401   REGB0 = TAG_Char('>');
 402   if (!once_value_9) {
 403     fra.me.REG[1] = BOX_NativeString("g");
 404     REGB1 = TAG_Int(1);
 405     fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
 406     once_value_9 = fra.me.REG[1];
 407     register_static_object(&once_value_9);
 408   } else fra.me.REG[1] = once_value_9;
 409   fra.me.REG[1] = fra.me.REG[1];
 410   CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
 411   /* utils.nit:73 */
 412   REGB0 = TAG_Char('!');
 413   if (!once_value_10) {
 414     fra.me.REG[1] = BOX_NativeString("n");
 415     REGB1 = TAG_Int(1);
 416     fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
 417     once_value_10 = fra.me.REG[1];
 418     register_static_object(&once_value_10);
 419   } else fra.me.REG[1] = once_value_10;
 420   fra.me.REG[1] = fra.me.REG[1];
 421   CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
 422   /* utils.nit:74 */
 423   REGB0 = TAG_Char('_');
 424   if (!once_value_11) {
 425     fra.me.REG[1] = BOX_NativeString("u");
 426     REGB1 = TAG_Int(1);
 427     fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
 428     once_value_11 = fra.me.REG[1];
 429     register_static_object(&once_value_11);
 430   } else fra.me.REG[1] = once_value_11;
 431   fra.me.REG[1] = fra.me.REG[1];
 432   CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
 433   /* utils.nit:75 */
 434   REGB0 = TAG_Char('@');
 435   if (!once_value_12) {
 436     fra.me.REG[1] = BOX_NativeString("at");
 437     REGB1 = TAG_Int(2);
 438     fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
 439     once_value_12 = fra.me.REG[1];
 440     register_static_object(&once_value_12);
 441   } else fra.me.REG[1] = once_value_12;
 442   fra.me.REG[1] = fra.me.REG[1];
 443   CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
 444   /* utils.nit:76 */
 445   goto label13;
 446   label13: while(0);
 447   stack_frame_head = fra.me.prev;
 448   return fra.me.REG[0];
 449 }