26.10.2013 Views

Sieve of Eratosthenes benchmarks for the Z8 FORTH microcontroller

Sieve of Eratosthenes benchmarks for the Z8 FORTH microcontroller

Sieve of Eratosthenes benchmarks for the Z8 FORTH microcontroller

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

APPENDIX B<br />

IMPLEMENTATION OF ROW-FILL FOR 28 <strong>FORTH</strong><br />

28 Instruction Comnents<br />

POP UR6<br />

POP UR7<br />

CALL m C A 8<br />

POP URlL<br />

wp UR15<br />

ADD UR13, UR 15<br />

ADC UR 12, UR 14<br />

ADD R9,RlS<br />

ADC R8,R14<br />

LM3p:LDC 6R8,R7<br />

ADD R9,Rll<br />

AD C R8,R10<br />

CP R12,R8<br />

JR ULT, EX1 T<br />

JR UGT,LOOP<br />

CP R13,RP<br />

JR UGT, LOOP<br />

EXIT: JP@ EXIT-VECTOR<br />

POP INITIALIZATION VALUE TO UR7<br />

POP VALUE OF MATRIX SIZE TO UR12f13<br />

POP VALUE OF COLUMN LENGTH TO WR70/11<br />

POP VALUE OF ROU INDEX TO UR8/9<br />

POP MATRIX ADDRESS TO UR14/15<br />

ADD MATRIX ADDRESS TO MATRIX SIZE<br />

ADD MATRIX ADDRESS TO ROW INDEX<br />

STORE INITIALIZATIWS VALUE VIA R14/15<br />

INCREMENT POINTER USING COLUWN LENGTH<br />

TEST HIGH BYTE OF NEW VALUE OF POINTER AGAINST LIMIT<br />

TEST LOU BYTE IF HIGH BYTES ARE EQUAL<br />

23

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!