// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: init_mark_functions
static void init_mark_functions(void)
    {
        mark_function[T_FREE]                = mark_noop;
        mark_function[T_UNDEFINED]           = just_mark;
        mark_function[T_EOF_OBJECT]          = mark_noop;
        mark_function[T_UNSPECIFIED]         = mark_noop;
        mark_function[T_NIL]                 = mark_noop;
        mark_function[T_UNUSED]              = mark_noop;
        mark_function[T_BOOLEAN]             = mark_noop;
        mark_function[T_SYNTAX]              = mark_noop;
        mark_function[T_CHARACTER]           = mark_noop;
        mark_function[T_SYMBOL]              = mark_noop; /* this changes to just_mark when gensyms are in the heap */
        mark_function[T_STRING]              = just_mark;
        mark_function[T_BYTE_VECTOR]         = just_mark;
        mark_function[T_INTEGER]             = just_mark;
        mark_function[T_RATIO]               = just_mark;
        mark_function[T_REAL]                = just_mark;
        mark_function[T_COMPLEX]             = just_mark;
        mark_function[T_BIG_INTEGER]         = just_mark;
        mark_function[T_BIG_RATIO]           = just_mark;
        mark_function[T_BIG_REAL]            = just_mark;
        mark_function[T_BIG_COMPLEX]         = just_mark;
        mark_function[T_RANDOM_STATE]        = just_mark;
        mark_function[T_GOTO]                = just_mark;
        mark_function[T_OUTPUT_PORT]         = just_mark;
        mark_function[T_BAFFLE]              = just_mark;
        mark_function[T_C_MACRO]             = just_mark;
        mark_function[T_C_POINTER]           = mark_c_pointer;
        mark_function[T_C_FUNCTION]          = just_mark;
        mark_function[T_C_FUNCTION_STAR]     = just_mark;  /* changes to mark_c_proc_star if defaults involve an expression */
        mark_function[T_C_ANY_ARGS_FUNCTION] = just_mark;
        mark_function[T_C_OPT_ARGS_FUNCTION] = just_mark;
        mark_function[T_C_RST_ARGS_FUNCTION] = just_mark;
        mark_function[T_PAIR]                = mark_pair;
        mark_function[T_CLOSURE]             = mark_closure;
        mark_function[T_CLOSURE_STAR]        = mark_closure;
        mark_function[T_CONTINUATION]        = mark_continuation;
        mark_function[T_INPUT_PORT]          = mark_input_port;
        mark_function[T_VECTOR]              = mark_vector; /* this changes if subvector created (similarly below) */
        mark_function[T_INT_VECTOR]          = mark_int_or_float_vector;
        mark_function[T_FLOAT_VECTOR]        = mark_int_or_float_vector;
        mark_function[T_MACRO]               = mark_closure;
        mark_function[T_BACRO]               = mark_closure;
        mark_function[T_MACRO_STAR]          = mark_closure;
        mark_function[T_BACRO_STAR]          = mark_closure;
        mark_function[T_C_OBJECT]            = mark_c_object;
        mark_function[T_CATCH]               = mark_catch;
        mark_function[T_DYNAMIC_WIND]        = mark_dynamic_wind;
        mark_function[T_HASH_TABLE]          = mark_hash_table;
        mark_function[T_ITERATOR]            = mark_iterator;
        mark_function[T_LET]                 = mark_let;
        mark_function[T_STACK]               = mark_stack;
        mark_function[T_COUNTER]             = mark_counter;
        mark_function[T_SLOT]                = mark_slot;
    }

// Assembly:
leaq 0x62939(%rip), %rax     # 0xc0f30
movq %rax, 0x1b7ca2(%rip)    # 0x2162a0
leaq 0x6569b(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7cb4(%rip)    # 0x2162c0
leaq 0x6291d(%rip), %rax     # 0xc0f30
movq %rax, 0x1b7cb6(%rip)    # 0x2162d0
leaq 0x6290f(%rip), %rax     # 0xc0f30
movq %rax, 0x1b7ca0(%rip)    # 0x2162c8
leaq 0x62901(%rip), %rax     # 0xc0f30
movq %rax, 0x1b7c7a(%rip)    # 0x2162b0
leaq 0x628f3(%rip), %rax     # 0xc0f30
movq %rax, 0x1b7c74(%rip)    # 0x2162b8
leaq 0x628e5(%rip), %rax     # 0xc0f30
movq %rax, 0x1b7c86(%rip)    # 0x2162d8
leaq 0x628d7(%rip), %rax     # 0xc0f30
movq %rax, 0x1b7c88(%rip)    # 0x2162e8
leaq 0x628c9(%rip), %rax     # 0xc0f30
movq %rax, 0x1b7c72(%rip)    # 0x2162e0
leaq 0x628bb(%rip), %rax     # 0xc0f30
movq %rax, 0x1b7c74(%rip)    # 0x2162f0
leaq 0x6561d(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7cae(%rip)    # 0x216338
leaq 0x6560f(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7cc8(%rip)    # 0x216360
leaq 0x65601(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7c52(%rip)    # 0x2162f8
leaq 0x655f3(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7c4c(%rip)    # 0x216300
leaq 0x655e5(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7c46(%rip)    # 0x216308
leaq 0x655d7(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7c40(%rip)    # 0x216310
leaq 0x655c9(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7c3a(%rip)    # 0x216318
leaq 0x655bb(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7c34(%rip)    # 0x216320
leaq 0x655ad(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7c2e(%rip)    # 0x216328
leaq 0x6559f(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7c28(%rip)    # 0x216330
leaq 0x65591(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7caa(%rip)    # 0x2163c0
leaq 0x65583(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7cac(%rip)    # 0x2163d0
leaq 0x65575(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7c7e(%rip)    # 0x2163b0
leaq 0x65567(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7c98(%rip)    # 0x2163d8
leaq 0x65559(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7cc2(%rip)    # 0x216410
leaq 0x1421db(%rip), %rax    # 0x1a0930
movq %rax, 0x1b7c4c(%rip)    # 0x2163a8
leaq 0x6553d(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7cb6(%rip)    # 0x216420
leaq 0x6552f(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7ca0(%rip)    # 0x216418
leaq 0x65521(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7ca2(%rip)    # 0x216428
leaq 0x65513(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7c9c(%rip)    # 0x216430
leaq 0x65505(%rip), %rax     # 0xc3ca0
movq %rax, 0x1b7c96(%rip)    # 0x216438
leaq 0x65467(%rip), %rax     # 0xc3c10
movq %rax, 0x1b7af8(%rip)    # 0x2162a8
leaq 0x1421b9(%rip), %rax    # 0x1a0970
movq %rax, 0x1b7c22(%rip)    # 0x2163e0
leaq 0x1421ab(%rip), %rax    # 0x1a0970
movq %rax, 0x1b7c1c(%rip)    # 0x2163e8
leaq 0x1421ed(%rip), %rax    # 0x1a09c0
movq %rax, 0x1b7bee(%rip)    # 0x2163c8
leaq 0x14224f(%rip), %rax    # 0x1a0a30
movq %rax, 0x1b7bd0(%rip)    # 0x2163b8
leaq 0x654d1(%rip), %rax     # 0xc3cc0
movq %rax, 0x1b7b52(%rip)    # 0x216348
leaq 0x142273(%rip), %rax    # 0x1a0a70
movq %rax, 0x1b7b4c(%rip)    # 0x216350
leaq 0x142265(%rip), %rax    # 0x1a0a70
movq %rax, 0x1b7b46(%rip)    # 0x216358
leaq 0x142157(%rip), %rax    # 0x1a0970
movq %rax, 0x1b7bd0(%rip)    # 0x2163f0
leaq 0x142149(%rip), %rax    # 0x1a0970
movq %rax, 0x1b7bd2(%rip)    # 0x216400
leaq 0x14213b(%rip), %rax    # 0x1a0970
movq %rax, 0x1b7bbc(%rip)    # 0x2163f8
leaq 0x14212d(%rip), %rax    # 0x1a0970
movq %rax, 0x1b7bbe(%rip)    # 0x216408
leaq 0x14223f(%rip), %rax    # 0x1a0a90
movq %rax, 0x1b7ae8(%rip)    # 0x216340
leaq 0x142261(%rip), %rax    # 0x1a0ac0
movq %rax, 0x1b7b02(%rip)    # 0x216368
leaq 0x142293(%rip), %rax    # 0x1a0b00
movq %rax, 0x1b7afc(%rip)    # 0x216370
leaq 0x1422d5(%rip), %rax    # 0x1a0b50
movq %rax, 0x1b7af6(%rip)    # 0x216378
leaq 0x1424c7(%rip), %rax    # 0x1a0d50
movq %rax, 0x1b7af8(%rip)    # 0x216388
leaq 0x65129(%rip), %rax     # 0xc39c0
movq %rax, 0x1b7ae2(%rip)    # 0x216380
leaq 0x1424fb(%rip), %rax    # 0x1a0da0
movq %rax, 0x1b7ae4(%rip)    # 0x216390
leaq 0x14250d(%rip), %rax    # 0x1a0dc0
movq %rax, 0x1b7ade(%rip)    # 0x216398
leaq 0x6628f(%rip), %rax     # 0xc4b50
movq %rax, 0x1b7ad8(%rip)    # 0x2163a0
retq
nopl (%rax)