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

Subversion Repositories eco32

[/] [eco32/] [trunk/] [fp/] [implementation/] [mmix/] [echo.mms] - Rev 138

Go to most recent revision | Compare with Previous | Blame | View Log

argc    IS    $0
argv    IS    $1
        LOC   #100
Main    SUB   argc,argc,2
        PBNN  argc,2F
        JMP   9F
Blank   BYTE  ' ',0
1H      GETA  $255,Blank
        TRAP  0,Fputs,StdOut
        SUB   argc,argc,1
        ADD   argv,argv,8
2H      LDOU  $255,argv,8
        TRAP  0,Fputs,StdOut
        PBNZ  argc,1B
9H      GETA  $255,NewLine
        TRAP  0,Fputs,StdOut
        TRAP  0,Halt,0
NewLine BYTE #a,0

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.