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

Subversion Repositories eco32

[/] [eco32/] [trunk/] [fp/] [implementation/] [mmix/] [permu-plain.mms] - Blame information for rev 54

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

Line No. Rev Author Line
1 15 hellwig
* Permutation generator a la plain-changes (mockup only)
2
t IS $255
3
a GREG 0
4
p GREG 0
5
c GREG 0
6
fmask GREG #f
7
magic GREG #8844221188442211
8
ffmask GREG #ff000000
9
u IS $0
10
    LOC  #100
11
    GREG @
12
T   OCTA #194cb4594cb4594c,#b44,0
13
Main SET a,#1234
14
    SLU a,a,12 [needed to make the MXOR stuff work]
15
    LDA p,T
16
    JMP 3F
17
 
18
1H  SRU u,a,12  (trace this)
19
 
20
%    SLU u,fmask,t
21
%    SLU t,a,4
22
%    XOR t,t,a
23
%    AND t,t,u
24
%    SRU u,t,4
25
%    OR  t,t,u
26
%    XOR a,a,t
27
    SLU  u,a,t
28
    MXOR u,magic,u
29
    AND  u,u,ffmask
30
    SRU  u,u,t
31
    XOR  a,a,u
32
 
33
    SRU c,c,3
34
2H  AND t,c,#1c
35
    PBNZ t,1B
36
    ADD  p,p,8
37
3H  LDO  c,p,0
38
    PBNZ c,2B
39
    TRAP 0,Halt,0
40
 

powered by: WebSVN 2.1.0

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