Subversion Repositories NedoOS

Rev

Details | Last modification | View Log

Rev Author Line No. Line
1537 lvd 1 
    ORG $1000
2 
 
3 
    RELOCATE_START
4 
 
5 
    dw      relocate_count
6 
    dw      relocate_size
7 
 
8 
table:
9 
    dw      label1          ; to be relocated
10 
    dw      label2          ; to be relocated
11 
    dw      $1111, label1, $2222, label2    ; single line having multiple values
12 
    ; warn about unstable expression
13 
    db      high label1
14 
    db      high label1     ; relunstable-ok ; supressed warning
15 
    ; correct + no relocation data
16 
    dw      label2-label1
17 
    db      label2-label1
18 
 
19 
label1:
20 
    ld      hl,0+table
21 
    ld      (hl),low table  ; warn about unstable
22 
    ld      (hl),low table  ; relunstable-ok ; suppressed warning
23 
label2:
24 
    ld      de,table+4
25 
    ld      (label1+1),de
26 
 
27 
    ; these should warn about unstable result, but only once
28 
    db      12, low label1, 23, high label1, 34, label1, 56
29 
 
30 
    RELOCATE_END
31 
 
32 
    RELOCATE_TABLE