URL https://opencores.org/ocsvn/eco32/eco32/trunk

Subversion Repositories eco32

[/] [eco32/] [trunk/] [fp/] [implementation/] [mmix/] [cp.mms] - Blame information for rev 15

Details | Compare with Previous | View Log


% copy from StdIn to StdOut, no error checking
     LOC  Data_Segment
     GREG @
ArgR OCTA Buf,2  one char at a time
ArgW OCTA Buf,1  ditto
Buf  LOC  @+2
 
     LOC  #100
Main LDA  $255,ArgR
     TRAP 0,Fgets,StdIn
     BN   $255,Done
     LDA  $255,ArgW
     TRAP 0,Fwrite,StdOut
     JMP  Main
Done TRAP 0,0,Halt

Line No.	Rev	Author	Line
1	15	hellwig	`% copy from StdIn to StdOut, no error checking`
2			`LOC Data_Segment`
3			`GREG @`
4			`ArgR OCTA Buf,2 one char at a time`
5			`ArgW OCTA Buf,1 ditto`
6			`Buf LOC @+2`
7
8			`LOC #100`
9			`Main LDA $255,ArgR`
10			`TRAP 0,Fgets,StdIn`
11			`BN $255,Done`
12			`LDA $255,ArgW`
13			`TRAP 0,Fwrite,StdOut`
14			`JMP Main`
15			`Done TRAP 0,0,Halt`

Browse

Tools

Subversion Repositories eco32

[/] [eco32/] [trunk/] [fp/] [implementation/] [mmix/] [cp.mms] - Blame information for rev 15