add_mutation alloc_bignum alloc_bytevector alloc_string alloca_cell alloca_complex_num alloca_double alloca_empty_bytevector alloca_empty_vector alloca_pair assign_complex_num assign_double atomic BIGNUM_CALL bignum_value bn_cmp_type boolean boolean_desc bytevector c_opaque caaaar caaadr caaar caadar caaddr caadr caar cadaar cadadr cadar caddar cadddr caddr cadr car cdaaar cdaadr cdaar cdadar cdaddr cdadr cdar cddaar cddadr cddar cdddar cddddr cdddr cddr cdr char_type clear_mutations closure closure0 closure1 closureN complex_num_value cond_var cvar Cyc_bignum_cmp CYC_BINARY_PORT_FLAG Cyc_caaaar Cyc_caaadr Cyc_caaar Cyc_caadar Cyc_caaddr Cyc_caadr Cyc_caar Cyc_cadaar Cyc_cadadr Cyc_cadar Cyc_caddar Cyc_cadddr Cyc_caddr Cyc_cadr Cyc_cdaaar Cyc_cdaadr Cyc_cdaar Cyc_cdadar Cyc_cdaddr Cyc_cdadr Cyc_cdar Cyc_cddaar Cyc_cddadr Cyc_cddar Cyc_cdddar Cyc_cddddr Cyc_cdddr Cyc_cddr CYC_FIXNUM_MAX CYC_FIXNUM_MIN Cyc_import_shared_object Cyc_int2bignum CYC_IO_BUF_LEN Cyc_make_shared_object Cyc_scm_call Cyc_scm_call_no_gc cyc_thread_state_type DEBUG_SHOW_DIAG defprimitive defsymbol double_value forward function_type gc_add_mutator gc_add_new_unrunning_mutator gc_alloc gc_alloc_bignum gc_alloc_from_bignum gc_alloc_rest gc_allocated_bytes GC_COLLECT_UNDER_UNSWEPT_HEAP_COUNT GC_COLLECTION_THRESHOLD gc_collector_trace gc_color_blue gc_color_red gc_copy_obj GC_DEBUG_SHOW_SWEEP_DIAG GC_DEBUG_TRACE GC_DEBUG_VERBOSE gc_empty_collector_stack gc_free_list GC_FREE_THRESHOLD gc_grow_heap gc_handshake gc_header_type gc_heap gc_heap_create gc_heap_create_rest gc_heap_free gc_heap_last gc_heap_merge gc_heap_root gc_heap_type gc_init_fixed_size_free_list gc_initialize gc_is_mutator_active gc_is_mutator_new gc_is_stack_obj gc_mark_globals gc_mark_gray gc_mark_gray2 gc_merge_all_heaps gc_minor gc_mut_cooperate gc_mut_update gc_mutator_thread_blocked gc_mutator_thread_runnable gc_post_handshake gc_print_stats gc_remove_mutator gc_request_mark_globals GC_SAFETY_CHECKS gc_sleep_ms gc_stage_type gc_start_collector gc_status_type gc_sweep gc_thr_grow_move_buffer gc_thread_data gc_thread_data_free gc_thread_data_init gc_try_alloc gc_try_alloc_rest gc_try_alloc_slow gc_wait_handshake grayed GROW_HEAP_BY_SIZE HEAP_SIZE immutable INITIAL_HEAP_SIZE inline_function_type integer_value is_object_type is_value_type LAST_FIXED_SIZE_HEAP_TYPE list maclosure0 macro make_boolean make_c_opaque make_cell make_complex_num make_cvar make_double make_empty_bytevector make_empty_vector make_input_port make_pair make_port make_string make_string_noalloc make_string_with_len make_utf8_string make_utf8_string_noalloc make_utf8_string_with_len mark mark_buffer MAX_STACK_OBJ MAX_STACK_TRACES mclosure0 mclosure1 mmacro mutex NANOSECONDS_PER_MILLISECOND NUM_GC_ARGS NUM_HEAP_TYPES obj_char2obj obj_int2obj obj_is_char obj_is_int obj_is_not_closure obj_obj2char obj_obj2int object object_tag opaque_collect_ptr opaque_ptr pair prim prim_name primitive primitive_function_type return_copy return_thread_runnable return_thread_runnable_with_obj set_cell_as_expr set_pair set_pair_as_expr set_thread_blocked STACK_GROWTH_IS_DOWNWARD stack_overflow STACK_SIZE string_len string_num_cp string_str symbol symbol_desc tag_type transport_stack_value type_of vector vp_add vp_create vpbuffer vpbuffer_add vpbuffer_free vpbuffer_realloc

obj_is_not_closure #define obj_is_not_closure (   obj )    ((obj == NULL) || is_value_type(obj) || (type_of(obj) > macro_tag)) Returns a true value if object is not a closure, or false otherwise