Ignore:
Timestamp:
Oct 5, 2010, 4:18:58 PM (9 years ago)
Author:
mulligan
Message:

Manages to load and emulate a simple array program. A few obscure bugs.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • Deliverables/D4.1/ASMInterpret.ml

    r148 r150  
    11641164      (* DPM: What happens when we underflow? *)
    11651165       let high_bits = read_at_sp status in
    1166        let new_sp,_,_,_ = subb8_with_c status.sp (vect_of_int 1 `Eight) false in
     1166       let new_sp,cy,_,_ = subb8_with_c status.sp (vect_of_int 1 `Eight) false in
    11671167       let status = { status with sp = new_sp } in
    11681168       let low_bits = read_at_sp status in
    1169        let new_sp,_,_,_ = subb8_with_c status.sp (vect_of_int 1 `Eight) false in
     1169       let new_sp,_,_,_ = subb8_with_c status.sp (vect_of_int 1 `Eight) cy in
    11701170       let status = { status with sp = new_sp } in
    11711171         { status with pc = mk_word high_bits low_bits }
Note: See TracChangeset for help on using the changeset viewer.