void test_module() { Class *mod; mod = (Class*)G(module); TS_ASSERT_EQUALS(mod->class_object(state), G(klass)); TS_ASSERT_EQUALS(mod->superclass(), G(object)); check_const(module, "Module"); }
void test_taskprobe() { Class *cls; cls = G(taskprobe); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(object)); TS_ASSERT_EQUALS(G(rubinius)->get_const(state, "TaskProbe"), G(taskprobe)); }
void test_memory_pointer() { Class *cls; cls = G(memory_pointer); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(object)); check_const(memory_pointer, "MemoryPointer"); }
void test_array() { Class *cls; cls = G(array); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(object)); check_const(array, "Array"); }
void test_cmethod() { Class *cls; cls = G(cmethod); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(executable)); check_const(cmethod, "CompiledMethod"); }
void test_symbol() { Class *cls; cls = G(symbol); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(object)); check_const(symbol, "Symbol"); }
void test_exception() { Class *cls; cls = G(exception); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(object)); check_const(exception, "Exception"); }
void test_class() { Class *cls; cls = G(klass); Class* o = cls->class_object(state); TS_ASSERT_EQUALS(cls, o); TS_ASSERT_EQUALS(cls->superclass(), G(module)); check_const(klass, "Class"); }
void test_compiled_code() { Class *cls; cls = G(compiled_code); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(executable)); TS_ASSERT_EQUALS(G(rubinius)->get_const(state, "CompiledCode"), G(compiled_code)); }
void test_time_class() { Class *cls; cls = G(time_class); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(object)); TS_ASSERT_EQUALS(cls->instance_type(), Fixnum::from(TimeType)); check_const(time_class, "Time"); }
void test_lookuptable() { Class *lt; lt = G(lookuptable); TS_ASSERT_EQUALS(lt->class_object(state), G(klass)); TS_ASSERT_EQUALS(lt->superclass(), G(object)); TS_ASSERT_EQUALS(lt->instance_type(), Fixnum::from(LookupTableType)); TS_ASSERT_EQUALS(G(rubinius)->get_const(state, "LookupTable"), G(lookuptable)); }
void test_tuple() { Class *tup; tup = G(tuple); TS_ASSERT_EQUALS(tup->class_object(state), G(klass)); TS_ASSERT_EQUALS(tup->superclass(), G(object)); TS_ASSERT_EQUALS(tup->instance_type(), Fixnum::from(TupleType)); TS_ASSERT_EQUALS(G(rubinius)->get_const(state, "Tuple"), G(tuple)); }
void test_metaclass() { Class *meta; meta = G(metaclass); TS_ASSERT_EQUALS(meta->class_object(state), G(klass)); TS_ASSERT_EQUALS(meta->superclass(), G(klass)); TS_ASSERT_EQUALS(meta->instance_type(), Fixnum::from(MetaClassType)); check_const(metaclass, "MetaClass"); }
void test_compactlookuptable() { Class *cls; cls = G(compactlookuptable); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(tuple)); TS_ASSERT_EQUALS(cls->instance_type(), Fixnum::from(CompactLookupTableType)); check_const(compactlookuptable, "CompactLookupTable"); }
void test_dir() { Class *cls; cls = G(dir); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(object)); TS_ASSERT_EQUALS(cls->instance_type(), Fixnum::from(DirType)); check_const(dir, "Dir"); }
void test_string() { Class *cls; cls = G(string); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(object)); TS_ASSERT_EQUALS((object_type)cls->instance_type()->to_native(), StringType); check_const(string, "String"); }
void test_bytearray() { Class *cls; cls = G(bytearray); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(object)); TS_ASSERT_EQUALS((object_type)cls->instance_type()->to_native(), ByteArrayType); TS_ASSERT_EQUALS(G(rubinius)->get_const(state, "ByteArray"), G(bytearray)); }
void test_methtbl() { Class *cls; cls = G(methtbl); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(object)); TS_ASSERT_EQUALS((object_type)cls->instance_type()->to_native(), MethodTableType); TS_ASSERT_EQUALS(G(rubinius)->get_const(state, "MethodTable"), G(methtbl)); }
void test_memory_pointer() { Class *cls; cls = G(ffi_pointer); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(object)); Module* ffi = as<Module>(G(object)->get_const(state, "FFI")); TS_ASSERT_EQUALS(cls, ffi->get_const(state, "Pointer")); }
void test_methtbl() { Class *cls; cls = G(methtbl); TS_ASSERT_EQUALS(cls->class_object(state), G(klass)); TS_ASSERT_EQUALS(cls->superclass(), G(lookuptable)); TS_ASSERT_EQUALS((object_type)cls->instance_type()->to_native(), MethodTableType); check_const(methtbl, "MethodTable"); }