diff options
Diffstat (limited to 'thumb2startup.s')
-rw-r--r-- | thumb2startup.s | 464 |
1 files changed, 313 insertions, 151 deletions
diff --git a/thumb2startup.s b/thumb2startup.s index 0bf6793..b753cf1 100644 --- a/thumb2startup.s +++ b/thumb2startup.s @@ -499,14 +499,14 @@ abc_main: sto r4,r12,start_address,0 .endif .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl init_clean tst r4,r4 bne init_error .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl init_timer @@ -515,7 +515,7 @@ abc_main: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl init_profiler .endif @@ -524,12 +524,12 @@ abc_main: lao r12,start_address,1 ldo r4,r12,start_address,1 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! blx r4 .else .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl __start .endif @@ -537,7 +537,7 @@ abc_main: .thumb_func exit: .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl exit_clean @@ -555,14 +555,14 @@ clean_init: sto r0,r12,dll_initisialised,0 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl init_clean tst r4,r4 bne init_dll_error .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl init_timer @@ -571,7 +571,7 @@ clean_init: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl init_profiler .endif @@ -604,7 +604,7 @@ clean_fini: ldo r9,r12,saved_a_stack_p,1 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl exit_clean @@ -874,7 +874,9 @@ no_mark2: .endif mov r4,#0 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr no_memory_2: lao r0,out_of_memory_string_1,0 @@ -884,7 +886,9 @@ no_memory_2: ? movl $1,@execution_aborted .endif mov r0,#1 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr no_memory_3: lao r0,out_of_memory_string_1,1 @@ -899,12 +903,14 @@ no_memory_3: bl free mov r0,#1 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func exit_clean: .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! blx add_execute_time @@ -921,7 +927,7 @@ exit_clean: ldo r4,r12,execute_time,0 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl print_time @@ -933,7 +939,7 @@ exit_clean: ldo r4,r12,garbage_collect_time,0 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl print_time @@ -951,7 +957,7 @@ exit_clean: add r4,r12 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl print_time @@ -970,12 +976,14 @@ no_print_execution_time: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl write_profile_information .endif - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func __driver: @@ -1138,7 +1146,9 @@ print_time: mov r0,r6 bl ew_print_text .endif - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func print_sc: @@ -1154,12 +1164,14 @@ print: .thumb_func end_print: - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func dump: .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl print b halt @@ -1256,19 +1268,25 @@ print_record: .thumb_func end_print_symbol: - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func print_int_node: ldr r0,[r6,#4] bl w_print_int - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func print_int: mov r0,r4 bl w_print_int - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func print_char_denotation: @@ -1287,20 +1305,26 @@ print_char_denotation: mov r0,#0x27 bl w_print_char - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func print_char_node: ldr r0,[r6,#4] bl w_print_char - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func print_char: str r4,[sp,#-4]! bl w_print_char add sp,sp,#4 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func print_bool: @@ -1313,14 +1337,18 @@ print_true: lao r0,true_c_string,0 otoa r0,true_c_string,0 bl w_print_string - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func print_false: lao r0,false_c_string,0 otoa r0,false_c_string,0 bl w_print_string - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func print_real: @@ -1343,13 +1371,17 @@ print_real_: mov sp,lr bl w_print_real mov sp,r11 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr print_string_a2: ldr r1,[r8] add r0,r8,#4 bl w_print_text - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func print__chars__sc: @@ -1365,7 +1397,9 @@ print__string__: bl w_print_text .thumb_func no_print_chars: - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func push_a_r_args: @@ -1488,7 +1522,9 @@ push_r_a_elements: bcs push_r_a_elements_lp ldr r4,[sp],#4 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr BtoAC: tst r4,r4 @@ -1496,11 +1532,15 @@ BtoAC: BtoAC_true: lao r6,true_string,0 otoa r6,true_string,0 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr BtoAC_false: lao r6,false_string,0 otoa r6,false_string,0 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr RtoAC: .if USE_CLIB @@ -1527,7 +1567,7 @@ ItoAC: lao r6,sprintf_buffer,2 otoa r6,sprintf_buffer,2 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl int_to_string @@ -1588,7 +1628,9 @@ reverse_digits: mov r12,#0 strb r12,[r6] - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .else mov r2,r4 lao r1,printf_int_string,0 @@ -1655,7 +1697,9 @@ D_to_S_cp_str_2: bcs D_to_S_cp_str_1 mov r6,r8 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr eqD: ldr r4,[r6] ldr r12,[r7] @@ -1680,7 +1724,9 @@ eqD: ldr r4,[r6] beq eqD_REAL mov r4,#1 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr eqD_CHAR: eqD_INT: @@ -1690,7 +1736,9 @@ eqD_INT: cmp r3,r12 it eq moveq r4,#1 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr eqD_BOOL: ldrb r3,[r6,#4] @@ -1699,7 +1747,9 @@ eqD_BOOL: cmp r3,r12 it eq moveq r4,#1 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr eqD_REAL: vldr.f64 d0,[r6,#4] @@ -1709,11 +1759,15 @@ eqD_REAL: vmrs APSR_nzcv,fpscr it eq moveq r4,#1 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr eqD_false: mov r4,#0 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr @ @ the timer @ @@ -1738,7 +1792,9 @@ init_timer: lao r12,IO_time,1 sto r4,r12,IO_time,1 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func get_time_diff: @@ -1755,12 +1811,14 @@ get_time_diff: ldr r7,[r6] str r4,[r6] subs r4,r4,r7 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func add_execute_time: .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl get_time_diff lao r6,execute_time,3 @@ -1771,12 +1829,14 @@ add_time: ldr r12,[r6] add r4,r4,r12 str r4,[r6] - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func add_garbage_collect_time: .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl get_time_diff lao r6,garbage_collect_time,3 @@ -1785,7 +1845,7 @@ add_garbage_collect_time: add_IO_time: .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl get_time_diff lao r6,IO_time,2 @@ -1897,7 +1957,7 @@ collect_3: lao r8,garbage_collector_name,0 otoa r8,garbage_collector_name,0 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_s .endif @@ -1912,7 +1972,9 @@ collect_3: .ifdef PROFILE b profile_r .else - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .endif collect_2: @@ -1921,7 +1983,7 @@ collect_2: lao r8,garbage_collector_name,1 otoa r8,garbage_collector_name,1 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_s .endif @@ -1934,7 +1996,9 @@ collect_2: .ifdef PROFILE b profile_r .else - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .endif collect_1: @@ -1943,7 +2007,7 @@ collect_1: lao r8,garbage_collector_name,2 otoa r8,garbage_collector_name,2 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_s .endif @@ -1953,7 +2017,9 @@ collect_1: .ifdef PROFILE b profile_r .else - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .endif .ifdef PROFILE @@ -1962,7 +2028,7 @@ collect_0: lao r8,garbage_collector_name,3 otoa r8,garbage_collector_name,3 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_s bl collect_0_ @@ -2135,7 +2201,7 @@ no_mark3: .thumb_func collect: .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl add_execute_time @@ -2210,7 +2276,7 @@ no_print_stack_sizes: add r4,r4,#63*4 lsr r4,r4,#8 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl zero_bit_vector @@ -2235,7 +2301,7 @@ no_print_stack_sizes: sto r14,r12,heap_end_after_copy_gc,3 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl zero_bit_vector b end_zero_bit_vector @@ -2246,7 +2312,7 @@ zero_all: ldo r4,r12,heap_copied_vector_size,3 lsr r4,r4,#2 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl zero_bit_vector @@ -2266,7 +2332,7 @@ end_zero_bit_vector: ldr r9,[sp],#4 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl add_garbage_collect_time @@ -2413,7 +2479,7 @@ no_mark_scan: str r6,[sp,#-4]! str r3,[sp,#-4]! .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl _munmap add sp,sp,#8 @@ -2499,7 +2565,7 @@ no_heap_use_message: .if FINALIZERS .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl call_finalizers .endif @@ -2747,7 +2813,9 @@ end_call_finalizers: laol r11,__Nil-4,__Nil_o_m4,2 otoa r11,__Nil_o_m4,2 sto r11,r12,free_finalizer_list,2 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .endif .if WRITE_HEAP @@ -2764,7 +2832,7 @@ copy_to_compact_with_alloc_in_extra_heap: out_of_memory_4: .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl add_garbage_collect_time @@ -2800,7 +2868,9 @@ zero_bits1_2: zero_bits1_5: subs r4,r4,#1 bhs zero_bits1_4 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func reorder: @@ -2853,7 +2923,9 @@ st_reorder_lp: add sp,sp,#8 ldr r8,[sp],#4 ldr r9,[sp],#4 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr @ @ the sliding compacting garbage collector @@ -3151,7 +3223,7 @@ vector_at_end_2: .thumb_func no_copy_garbage_collection: .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl add_garbage_collect_time @@ -3167,7 +3239,7 @@ no_copy_garbage_collection: .thumb_func stack_overflow: .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl add_execute_time @@ -3203,7 +3275,7 @@ halt: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl write_profile_stack .endif @@ -3263,7 +3335,7 @@ eval_fill: mov r6,r7 ldr r12,[r7] .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! blx r12 mov r7,r6 @@ -3275,7 +3347,9 @@ eval_fill: str r8,[r6,#4] ldr r8,[r7,#8] str r8,[r6,#8] - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .p2align 2 b e__system__eaind @@ -3304,7 +3378,9 @@ __indirection: str r8,[r6,#4] ldr r8,[r7,#8] str r8,[r6,#8] - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .if MARK_GC eval_fill2: @@ -3322,7 +3398,7 @@ eval_fill2: mov r6,r7 .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! blx r4 mov r7,r6 @@ -3334,12 +3410,14 @@ eval_fill2: str r8,[r6,#4] ldr r8,[r7,#8] str r8,[r6,#8] - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .endif .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3353,7 +3431,7 @@ eval_upd_0: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3369,7 +3447,7 @@ eval_upd_1: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3385,7 +3463,7 @@ eval_upd_2: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3403,7 +3481,7 @@ eval_upd_3: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3424,7 +3502,7 @@ eval_upd_4: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3447,7 +3525,7 @@ eval_upd_5: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3472,7 +3550,7 @@ eval_upd_6: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3510,7 +3588,7 @@ eval_upd_n_lp: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3522,7 +3600,7 @@ eval_upd_8: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3534,7 +3612,7 @@ eval_upd_9: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3546,7 +3624,7 @@ eval_upd_10: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3558,7 +3636,7 @@ eval_upd_11: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3570,7 +3648,7 @@ eval_upd_12: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3582,7 +3660,7 @@ eval_upd_13: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3594,7 +3672,7 @@ eval_upd_14: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3606,7 +3684,7 @@ eval_upd_15: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3618,7 +3696,7 @@ eval_upd_16: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3630,7 +3708,7 @@ eval_upd_17: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3642,7 +3720,7 @@ eval_upd_18: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3654,7 +3732,7 @@ eval_upd_19: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3666,7 +3744,7 @@ eval_upd_20: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3678,7 +3756,7 @@ eval_upd_21: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3690,7 +3768,7 @@ eval_upd_22: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3702,7 +3780,7 @@ eval_upd_23: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3714,7 +3792,7 @@ eval_upd_24: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3726,7 +3804,7 @@ eval_upd_25: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3738,7 +3816,7 @@ eval_upd_26: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3750,7 +3828,7 @@ eval_upd_27: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3762,7 +3840,7 @@ eval_upd_28: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3774,7 +3852,7 @@ eval_upd_29: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3786,7 +3864,7 @@ eval_upd_30: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3798,7 +3876,7 @@ eval_upd_31: .ifdef PROFILE .align - add lr,pc,#9 + add lr,pc,#8 str lr,[sp,#-4]! bl profile_n mov r8,r4 @@ -3883,7 +3961,9 @@ cat_string_11: @ align heap pointer add r10,r10,#3 and r10,r10,#-4 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr gc_3: bl collect_2 b gc_r_3 @@ -3892,7 +3972,9 @@ gc_3: bl collect_2 empty_string: lao r6,zero_length_string,0 otoa r6,zero_length_string,0 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .ifdef PIC ltol __STRING__+2,__STRING___o_2,1 @@ -3947,7 +4029,9 @@ sliceAC_copy_lp: bne sliceAC_copy_lp sliceAC_after_copy_lp: - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr gc_4: bl collect_1 @@ -4000,7 +4084,9 @@ updateAC_copy_lp: updateAC_after_copy_lp: strb r4,[r3] - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr gc_5: bl collect_1 b r_gc_5 @@ -4062,11 +4148,15 @@ equal_string_2: .thumb_func equal_string_eq: mov r4,#1 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func equal_string_ne: mov r4,#0 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .section .text.cmpAC,"ax" cmpAC: @@ -4124,7 +4214,9 @@ cmp_string_2: bne cmp_string_ne .thumb_func cmp_string_eq: - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr cmp_string_ne4: @ to do compare bytes using and instead of ldrb ldrb r3,[r7] @@ -4146,10 +4238,14 @@ cmp_string_ne4: cmp_string_ne: bhi cmp_string_r1 mov r4,#-1 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr cmp_string_r1: mov r4,#1 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .section .text.string_to_string_node,"ax" .thumb_func @@ -4181,7 +4277,9 @@ string_to_string_node_4: bge string_to_string_node_2 mov r6,r8 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func string_to_string_node_gc: @@ -4224,7 +4322,9 @@ int_array_to_node_4: subs r4,r4,#1 bge int_array_to_node_2 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func int_array_to_node_gc: @@ -4276,7 +4376,9 @@ real_array_to_node_4: subs r4,r4,#1 bge real_array_to_node_2 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func real_array_to_node_gc: @@ -4406,7 +4508,9 @@ no_collect_4574: str r12,[r10,#8] add r12,r10,#12 add r10,r12,r3,lsl #2 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr _create_arrayC: add r3,r4,#3 @@ -4424,7 +4528,9 @@ no_collect_4573: str r4,[r10,#4] add r12,r10,#8 add r10,r12,r3,lsl #2 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr _create_arrayI: add r12,r4,#3 @@ -4442,7 +4548,9 @@ no_collect_4572: str r12,[r10,#8] add r12,r10,#12 add r10,r12,r4,lsl #2 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr _create_arrayR: add r12,r4,r4 @@ -4465,7 +4573,9 @@ no_collect_4580: str r12,[r10,#8] add r12,r10,#12 add r10,r12,r4,lsl #3 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr @ r4: number of elements, r3: element descriptor @ r2: element size, r1: element a size, a0:a_element-> a0: array @@ -4506,7 +4616,9 @@ _create_r_array_0: lsl r2,r2,#2 mul r12,r4,r2 add r10,r10,r12 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr _create_r_array_1: lsl r2,r2,#2 @@ -4517,7 +4629,9 @@ _fillr1_array: _st_fillr1_array: subs r4,r4,#1 bcs _fillr1_array - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr _create_r_array_2: lsl r2,r2,#2 @@ -4529,7 +4643,9 @@ _fillr2_array: _st_fillr2_array: subs r4,r4,#1 bcs _fillr2_array - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr _create_r_array_3: lsl r2,r2,#2 @@ -4542,7 +4658,9 @@ _fillr3_array: _st_fillr3_array: subs r4,r4,#1 bcs _fillr3_array - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr _create_r_array_4: lsl r2,r2,#2 @@ -4556,7 +4674,9 @@ _fillr4_array: _st_fillr4_array: subs r4,r4,#1 bcs _fillr4_array - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr _create_r_array_5: sub r2,r2,r1 @@ -4581,7 +4701,9 @@ _st_fillr5_array: subs r4,r4,#1 bcs _fillr5_array - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr create_arrayB: mov r7,r3 @@ -4669,7 +4791,9 @@ st_filli_array: subs r3,r3,#1 bcs filli_array - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr create_arrayR: add r12,r4,r4 @@ -4710,7 +4834,9 @@ st_fillr_array: subs r4,r4,#1 bcs fillr_array - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func create_array: @@ -4789,7 +4915,9 @@ st_fillr1_array_1: subs r4,r4,#1 bcs fillr1_array_lp - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr create_R_array_2: @ r4: number of elements, r3: element descriptor @@ -4835,7 +4963,9 @@ st_fillr2_array: subs r4,r4,#1 bcs fillr2_array_1 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr create_R_array_3: @ r4: number of elements, r3: element descriptor @@ -5044,7 +5174,9 @@ repl_args_b_4: ldr r8,[r6,#4] str r8,[r9],#4 repl_args_b_1: - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func push_arg_b: @@ -5058,7 +5190,9 @@ push_arg_b_2: subs r3,r3,#2 push_arg_b_1: ldr r6,[r6,r3,lsl #2] - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func del_args: @@ -5073,7 +5207,9 @@ del_args: str r8,[r7,#4] ldr r8,[r6,#8] str r8,[r7,#8] - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr del_args_2: bne del_args_3 @@ -5084,7 +5220,9 @@ del_args_2: ldr r8,[r6,#8] ldr r8,[r8] str r8,[r7,#8] - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr del_args_3: subs r5,r5,r4 @@ -5104,7 +5242,9 @@ del_args_copy_args: subs r4,r4,#1 bgt del_args_copy_args - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .thumb_func del_args_gc: @@ -5121,7 +5261,9 @@ sin_real: .ifdef SOFT_FP_CC vmov d0,r0,r1 .endif - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .section .text.cos_real,"ax" .thumb_func @@ -5133,7 +5275,9 @@ cos_real: .ifdef SOFT_FP_CC vmov d0,r0,r1 .endif - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .section .text.tan_real,"ax" .thumb_func @@ -5145,7 +5289,9 @@ tan_real: .ifdef SOFT_FP_CC vmov d0,r0,r1 .endif - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .section .text.asin_real,"ax" .thumb_func @@ -5157,7 +5303,9 @@ asin_real: .ifdef SOFT_FP_CC vmov d0,r0,r1 .endif - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .section .text.acos_real,"ax" .thumb_func @@ -5169,7 +5317,9 @@ acos_real: .ifdef SOFT_FP_CC vmov d0,r0,r1 .endif - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .section .text.atan_real,"ax" .thumb_func @@ -5181,7 +5331,9 @@ atan_real: .ifdef SOFT_FP_CC vmov d0,r0,r1 .endif - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .section .text.ln_real,"ax" .thumb_func @@ -5193,7 +5345,9 @@ ln_real: .ifdef SOFT_FP_CC vmov d0,r0,r1 .endif - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .section .text.log10_real,"ax" log10_real: @@ -5204,7 +5358,9 @@ log10_real: .ifdef SOFT_FP_CC vmov d0,r0,r1 .endif - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .section .text.exp_real,"ax" .thumb_func @@ -5216,7 +5372,9 @@ exp_real: .ifdef SOFT_FP_CC vmov d0,r0,r1 .endif - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .section .text.pow_real,"ax" .thumb_func @@ -5233,7 +5391,9 @@ pow_real: .ifdef SOFT_FP_CC vmov d0,r0,r1 .endif - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .section .text.entier_real,"ax" .thumb_func @@ -5250,7 +5410,9 @@ entier_real: r_to_i_real: vcvtr.s32.f64 s0,d0 vmov r4,s0 - ldr pc,[sp],#4 + ldr lr,[sp],#4 + orr lr,lr,#1 + mov pc,lr .text |