Changeset 7e64c6fe41df36edb22d2c3ddf7e1cbd7a4c767b

Timestamp:

05/19/10 16:32:56 (2 years ago)

Author:

redbrain <redbrain@…>

Parents:

bf8bfc6ff3bcd1af04da77ec59b7bce4fa7fc494

Children:

4e8affcbc31173092fe524cf14189dcca403ed19

git-committer:

redbrain <redbrain@crules.org> / 2010-05-19T16:32:56Z+0100

Message:

cleanup and added test case

Files:

• src/bb_builtin.c (modified) (2 diffs)
• src/rr_bin_eval.c (modified) (1 diff)
• src/rr_runtime.c (modified) (1 diff)
• tt.crl (added)

src/bb_builtin.c

@@ -47 +47 @@
   crl_obj_float_module_init( context );
 
+  /*
   crl_debug("init character module!\n");
   crl_obj_character_module_init( context );
@@ -58 +59 @@
   crl_debug("init list module!\n");
   crl_obj_list_module_init( context );
+  */
 
   crl_debug("init stdio module!\n");

src/rr_bin_eval.c

@@ -207 +207 @@
   crl_assert( t1->op_a_t == TYPE_OBJECT );
 
-  crl_symbol_obj *t2 = crl_runtime_obj_access( t1, opb, context);
+  retval = crl_runtime_obj_access( t1, opb, context);
 
   return retval;

src/rr_runtime.c

@@ -391 +391 @@
                               o->identifier, (void*) sym );
                   */
-                  fprintf( fd, "instance of <%s> at <%p>!\n", o->identifier, (void *)sym );
+                  fprintf( fd, "instance of <%s> at <%p>!", o->identifier,
+                           (void *)sym );
                 }
             }