Deriving a new dialect of Very Tiny Language from VTL-2 6800 version
| Revision | 2458e94408dc7fef19bb5d2a436041bc9c4a915a (tree) |
|---|---|
| Time | 2022-10-14 16:06:22 |
| Author |  Joel Matthew Rees <joel.rees@gmai...> |
| Commiter | Joel Matthew Rees |
explicitly terminate the powers of ten array.
VTL_6800_exorsim.ASM (diff) VTL_6800_exorsim_clr_dp.ASM (diff) VTL_6801.ASM (diff) VTL_6801_exorsim.asm (diff) VTL_6801_exorsim_stkblast.asm (diff) VTL_6801_mc10.asm (diff) VTL_6809_coco.asm (diff) VTL_6809_coco_translit.asm (diff)| @@ -497,6 +497,10 @@ PWRS10 FCB $27 ; 10000 | ||
| 497 | 497 | FCB $0A |
| 498 | 498 | FCB $00 ; 1 |
| 499 | 499 | FCB $01 |
| 500 | + FCB 0 ; Explicit list termination. (Oh, so clever!) | |
| 501 | + FCB 0 ; (CLR SAVE1 was extended mode, high byte 0.) | |
| 502 | +* Funny how it worked unterminated with variables moved anyway -- | |
| 503 | +* integer limits, interaction between conversion buffers, etc. | |
| 500 | 504 | * |
| 501 | 505 | DIVIDE CLR SAVE1 ; DEVIDE 16-BITS |
| 502 | 506 | GOT INC SAVE1 |
| @@ -524,6 +524,10 @@ PWRS10 FCB $27 ; 10000 | ||
| 524 | 524 | FCB $0A |
| 525 | 525 | FCB $00 ; 1 |
| 526 | 526 | FCB $01 |
| 527 | + FCB 0 ; Explicit list termination. (Oh, so clever!) | |
| 528 | + FCB 0 ; (CLR SAVE1 was extended mode, high byte 0.) | |
| 529 | +* Funny how it worked unterminated with variables moved anyway -- | |
| 530 | +* integer limits, interaction between conversion buffers, etc. | |
| 527 | 531 | * |
| 528 | 532 | DIVIDE CLR SAVE1 ; DEVIDE 16-BITS |
| 529 | 533 | GOT INC SAVE1 |
| @@ -479,6 +479,10 @@ PWRS10 FCB $27 ; 10000 | ||
| 479 | 479 | FCB $0A |
| 480 | 480 | FCB $00 ; 1 |
| 481 | 481 | FCB $01 |
| 482 | + FCB 0 ; Explicit list termination. (Oh, so clever!) | |
| 483 | + FCB 0 ; (CLR SAVE1 was extended mode, high byte 0.) | |
| 484 | +* Funny how it worked unterminated with variables moved anyway -- | |
| 485 | +* integer limits, interaction between conversion buffers, etc. | |
| 482 | 486 | * |
| 483 | 487 | DIVIDE CLR SAVE1 ; DEVIDE 16-BITS |
| 484 | 488 | GOT INC SAVE1 |
| @@ -571,6 +571,10 @@ PWRS10 FCB $27 ; 10000 | ||
| 571 | 571 | FCB $0A |
| 572 | 572 | FCB $00 ; 1 |
| 573 | 573 | FCB $01 |
| 574 | + FCB 0 ; Explicit list termination. (Oh, so clever!) | |
| 575 | + FCB 0 ; (CLR SAVE1 was extended mode, high byte 0.) | |
| 576 | +* Funny how it worked unterminated with variables moved anyway -- | |
| 577 | +* integer limits, interaction between conversion buffers, etc. | |
| 574 | 578 | * |
| 575 | 579 | DIVIDE CLR MLDVCT ; DEVIDE 16-BITS |
| 576 | 580 | GOT INC MLDVCT |
| @@ -534,6 +534,10 @@ PWRS10 FCB $27 ; 10000 | ||
| 534 | 534 | FCB $0A |
| 535 | 535 | FCB $00 ; 1 |
| 536 | 536 | FCB $01 |
| 537 | + FCB 0 ; Explicit list termination. (Oh, so clever!) | |
| 538 | + FCB 0 ; (CLR SAVE1 was extended mode, high byte 0.) | |
| 539 | +* Funny how it worked unterminated with variables moved anyway -- | |
| 540 | +* integer limits, interaction between conversion buffers, etc. | |
| 537 | 541 | * |
| 538 | 542 | DIVIDE CLR MLDVCT ; DEVIDE 16-BITS |
| 539 | 543 | GOT INC MLDVCT |
| @@ -602,6 +602,10 @@ PWRS10 FCB $27 ; 10000 | ||
| 602 | 602 | FCB $0A |
| 603 | 603 | FCB $00 ; 1 |
| 604 | 604 | FCB $01 |
| 605 | + FCB 0 ; Explicit list termination. (Oh, so clever!) | |
| 606 | + FCB 0 ; (CLR SAVE1 was extended mode, high byte 0.) | |
| 607 | +* Funny how it worked unterminated with variables moved anyway -- | |
| 608 | +* integer limits, interaction between conversion buffers, etc. | |
| 605 | 609 | * |
| 606 | 610 | DIVIDE CLR MLDVCT ; DEVIDE 16-BITS |
| 607 | 611 | GOT INC MLDVCT |
| @@ -451,6 +451,10 @@ PWRS10 FCB $27 ; 10000 | ||
| 451 | 451 | FCB $0A |
| 452 | 452 | FCB $00 ; 1 |
| 453 | 453 | FCB $01 |
| 454 | + FCB 0 ; Explicit list termination. (Oh, so clever in original 6800.) | |
| 455 | + FCB 0 ; (CLR SAVE1 was extended mode, high byte 0.) | |
| 456 | +* Funny how it worked unterminated with variables moved anyway -- | |
| 457 | +* integer limits, interaction between conversion buffers, etc. | |
| 454 | 458 | * |
| 455 | 459 | PRNT PULS B ; PRINT DECIMAL |
| 456 | 460 | PRNT2 LDX #DECBUF ; CONVERT TO DECIMAL ** fix local variables later |
| @@ -609,6 +609,10 @@ PWRS10 FCB $27 ; 10000 | ||
| 609 | 609 | FCB $0A |
| 610 | 610 | FCB $00 ; 1 |
| 611 | 611 | FCB $01 |
| 612 | + FCB 0 ; Explicit list termination. (Oh, so clever!) | |
| 613 | + FCB 0 ; (CLR SAVE1 was extended mode, high byte 0.) | |
| 614 | +* Funny how it worked unterminated with variables moved anyway -- | |
| 615 | +* integer limits, interaction between conversion buffers, etc. | |
| 612 | 616 | * |
| 613 | 617 | DIVIDE CLR MLDVCT ; DEVIDE 16-BITS |
| 614 | 618 | GOT INC MLDVCT |
Fork