1 ;; program to test inter-segment production and linkage of RDF objects 2 3 ;; [1] should produce segment base ref 4 ;; [2] should produce standard relocation 5 6[GLOBAL _main] 7[EXTERN _puts: far] 8[BITS 16] 9 10_main: 11 mov ax, seg _message ; 0000 [1] 12 mov ds, ax ; 0003 13 mov dx, _message ; 0005 [2] 14 call far _puts ; 0008 [2][1] 15 xor ax,ax ; 000D 16 int 21h ; 000F 17 18[SECTION .data] 19_message: db 'Hello, World', 10, 13, 0 20