?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download | RSS feed

  1.     call    label_out_relocate  ; outside of relocation area
  2.  
  3.     ORG $1000
  4.     RELOCATE_START
  5.     dw      relocate_count      ; should be zero
  6.     dw      relocate_size       ; should be zero
  7.     nop
  8.     call    label_out_relocate  ; should be absolute call (not in relocate data)
  9. equ_label   equ     $1001
  10.     ld      hl,equ_label        ; should be absolute (equ) value (not in relocate data)
  11. unused_label:                   ; should not produce any relocation data, just defines "relocatable" label
  12.     RELOCATE_TABLE              ; should emit no relocation data
  13.     RELOCATE_END
  14.     ; outside of relocation area
  15. label_out_relocate:
  16.     ret
  17.