alloc_bignum assign_double bignum_value bn_cmp_type boolean boolean_desc boolean_f boolean_t bytevector c_opaque closure closure0 closure1 closureN cond_var cvar Cyc_EOF defprimitive defsymbol double_value forward function_type function_type_va inline_function_type integer_value list macro make_c_opaque make_cell make_cvar make_double make_empty_bytevector make_empty_vector make_pair make_port make_string make_string_noalloc make_string_with_len mclosure0 mclosure1 mmacro mutex object object_tag opaque_ptr pair prim prim_name primitive quote_void set_pair string_len string_str symbol symbol_desc tag_type type_of vector

assign_double #define assign_double (   pobj,   v  ) Value: ((double_type *)pobj)->hdr.mark = gc_color_red; \ ((double_type *)pobj)->hdr.grayed = 0; \ ((double_type *)pobj)->tag = double_tag; \ double_value(pobj) = v; Assign given double value to the given double object pointer