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 boolean_f boolean_t bytevector c_opaque closure closure0 closure1 closureN complex_num_value cond_var cvar CYC_BINARY_PORT_FLAG Cyc_EOF CYC_IO_BUF_LEN Cyc_RECORD_MARKER Cyc_VOID defprimitive defsymbol double_value forward function_type inline_function_type integer_value 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 mclosure0 mclosure1 mmacro mutex object object_tag opaque_collect_ptr opaque_ptr pair prim prim_name primitive primitive_function_type quote_void return_copy set_cell_as_expr set_pair set_pair_as_expr string_len string_num_cp string_str symbol symbol_desc tag_type type_of vector

make_input_port #define make_input_port (   p,   f,   rl  ) Value: port_type p; \ p.hdr.mark = gc_color_red; \ p.hdr.grayed = 0; \ p.hdr.immutable = 0; \ p.tag = port_tag; \ p.fp = f; \ p.mode = 1; \ p.flags = 1; \ p.line_num = 1; \ p.col_num = 1; \ p.buf_idx = 0; \ p.tok_start = 0; \ p.tok_end = 0; \ p.tok_buf = malloc(CYC_IO_BUF_LEN); \ p.tok_buf_len = CYC_IO_BUF_LEN; \ p.mem_buf = malloc(CYC_IO_BUF_LEN); \ p.mem_buf_len = 0; \ p.str_bv_in_mem_buf = NULL; \ p.str_bv_in_mem_buf_len = 0; \ p.read_len = rl; Create a new input port object in the nursery