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

Subversion Repositories diogenes

[/] [diogenes/] [trunk/] [old/] [eratost.asm] - Blame information for rev 106

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

Line No. Rev Author Line
1 106 fellnhofer
ldi     l7, 10
2
mov             l5, l7
3
ldi             l4, 0
4
ldi     l0, 0
5
ldi             l1, 1
6
1:
7
  st    l0, [l4]
8
  adi   l4, 1
9
  brnz  l5, :1
10
  adi   l5, -1
11
  ldi   l4, 2
12
  mov   l5, l7
13
2:
14
  mov   l2, l4
15
3:
16
  add   l2, l2, l4
17
  cmpl  l6, l2, l5
18
  brz   l6, :4
19
  nop
20
  brnz  l6, :3
21
  st    l1, [l2]
22
4:
23
  adi   l4, 1
24
  cmpg  l3, l4, l5
25
  brnz  l3, :10
26
  ld    l3, [l4]
27
  brnz  l3, :4
28
  nop
29
  brz   l3, :2
30
  nop
31
10:
32
  ldi   l3, 1
33
11:
34
  adi   l3, 1
35
  cmpl  l4, l3, l7
36
  brz   l4, :99
37
  ld    l5, [l3]
38
  brnz  l5, :11
39
  nop
40
  LDL   h0, :22
41
  call  h7,    @ 0x23
42
  mov   l0, l3
43
  brz   l5, :11
44
  nop
45
 
46
 
47
@ This is a function:
48
 
49
22:
50
  ldi   h3, 15
51
  ldi   h1, 48
52
  ldi   h2, 10
53
  shi   h0, l0, -4
54
  and   l1, h0, h3
55
  cmpl  h4, l1, h2
56
  brnz  h4, :23
57
  nop
58
  adi   l1, 7
59
23:
60
  add   l1, l1, h1
61
  stio  l1, [l1]
62
  and   l1, l0, h3
63
  cmpl  h4, l1, h2
64
  brnz  h4, :24
65
  nop
66
  adi   l1, 7
67
24:
68
  add   l1, l1, h1
69
  stio  l1, [l1]
70
  ldi   l1, 32
71
  jump  
72
  stio  l1, [l1]
73
99:
74
  ldi   l1, 10
75
  stio  l1, [l1]
76
 

powered by: WebSVN 2.1.0

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