Changeset 13849
- Timestamp:
- Jun 16, 2010, 9:47:43 AM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/arm/lisp-kernel/arm-spentry.s
r13845 r13849 802 802 __(cmp arg_z,arg_y) 803 803 __(_rplaca(arg_y,arg_z)) 804 __(bx hslr)804 __(bxlo lr) 805 805 __(ref_global(temp0,ref_base)) 806 806 __(sub imm0,arg_y,temp0) … … 828 828 __(cmp arg_z,arg_y) 829 829 __(_rplacd(arg_y,arg_z)) 830 __(bx hslr)830 __(bxlo lr) 831 831 __(ref_global(temp0,ref_base)) 832 832 __(sub imm0,arg_y,temp0) … … 857 857 __(add imm0,arg_y,#misc_data_offset) 858 858 __(str arg_z,[arg_x,imm0]) 859 __(bx hs lr)859 __(bxlo lr) 860 860 __(add imm0,imm0,arg_x) 861 861 __(ref_global(temp0,ref_base)) … … 879 879 880 880 881 dnl/* This is a special case of storing into a gvector: if we need to memoize */882 dnl/* the store, record the address of the hash-table vector in the refmap, */883 dnl/* as well. */881 /* This is a special case of storing into a gvector: if we need to memoize */ 882 /* the store, record the address of the hash-table vector in the refmap, */ 883 /* as well. */ 884 884 .globl C(egc_set_hash_key) 885 885 _spentry(set_hash_key) … … 888 888 __(add imm0,arg_y,#misc_data_offset) 889 889 __(str arg_z,[arg_x,imm0]) 890 __(bx hslr)890 __(bxlo lr) 891 891 __(add imm0,imm0,arg_x) 892 892 __(ref_global(temp0,ref_base)) … … 961 961 __(bne 1b) 962 962 __(cmp arg_z,arg_x) 963 __(b hi4f)963 __(blo 4f) 964 964 965 965 __(ref_global(imm0,ref_base)) … … 1000 1000 __(bne 0b) 1001 1001 __(cmp arg_z,arg_x) 1002 __(b hi4f)1002 __(blo 4f) 1003 1003 __(ref_global(temp0,ref_base)) 1004 1004 __(sub imm0,imm2,temp0) … … 1429 1429 1430 1430 _spentry(stack_cons_rest_arg) 1431 __(sub imm1,nargs,imm0) 1432 __(cmp imm1,#0) 1431 __(subs imm1,nargs,imm0) 1433 1432 __(mov arg_z,#nil_value) 1434 1433 __(ble 2f) /* always temp-push something. */ 1434 __(mov temp0,imm1) 1435 1435 __(add imm1,imm1,imm1) 1436 __(mov temp0,imm1)1437 1436 __(add imm1,imm1,#node_size) 1438 1437 __(dnode_align(imm0,imm1,node_size))
Note: See TracChangeset
for help on using the changeset viewer.