	Index	Manual	Download	Source	Macros	Embedded word Case ins.
	Sitemap	Links	Forum	Tests	Projects	Embedded word Case ins.

Test t8762: COFF object module for 16bit DOS links COFF modules

Tested procedures: PfcomCompile

Source & expected listing t8762.htm.lst: | | EUROASM AUTOSEGMENT=ON,CPU=086,DUMPWIDTH=24,PRIV=ENABLED |7438373632 |%test %SET t8762 ; COFF.D16 link COFF.D16 |00000000: | | |;; Create the first auxilliary COFF module "%test.WB.obj". | |%test.WB PROGRAM FORMAT=COFF,WIDTH=16,MODEL=SMALL | |;; |[CODE] ::::Section changed. |0000: |Write.D16:: PROC ; Display ASCIIZ string pointed to by DS:SI using DOS. |0000:B402 | MOV AH,02h ; DOS service Teletype output. |0002:8A14 |.1:MOV DL,[SI] ; Load a character from string to DL, increment SI. |0004:80FA00 | CMP DL,0 ; Test if zero-terminator reached. |0007:7405 | JE .9: ; Exit the procedure if AL=0. |0009:CD21 | INT 21h ; Otherwise display the character DL and advance screen cursor. |000B:46 | INC SI ; Let DS:SI point to the next character. |000C:EBF4 | JMP .1: ; Repeat with following characters. |000E:C3 |.9:RET ; AX,BX,SI are clobbered. |000F: | ENDP Write.D16:: | |;; |000F: |Beep.D16:: PROC ; Display message "Beeping.." and play a sound using BIOS. |000F:BE[0000] | MOV SI,=B"Beeping..." ; Define a literal string. Assume DS=PARA# [RODATA}. |0012:E8EBFF | CALL Write.D16:: ; Display the notification "Beeping...". |0015:BE[0000] | MOV SI,=W(0x0007) ; Define ASCIIZ string with BEL character in [RODATA]. |0018:E8E5FF | CALL Write.D16:: ; Play the beep sound. |001B:C3 | RET ; AX,BX,SI are clobbered. |001C: | ENDP Beep.D16:: |[@LT2] ====ListLiterals in section [@LT2]. |0000:0700 =W(0x0007) |[@LT1] ====ListLiterals in section [@LT1]. |0000:42656570696E672E~=B"Beeping..." | | ENDPROGRAM %test.WB | **** ListMap "t8762.WB.obj",model=SMALL,groups=2,segments=2,entry=,stack= | [CGROUP],FA=00000064h,RVA=00000000h,size=0000001Ch=28,group [CODE] | [CODE],FA=00000064h,RVA=00000000h,size=0000001Ch=28,width=16,align=0010h,purpose=CODE | [DGROUP],FA=00000094h,RVA=00000000h,size=0000000Dh=13,group [RODATA] | [RODATA],FA=00000094h,RVA=00000000h,size=0000000Dh=13,width=16,align=0010h,purpose=RODATA+LITERAL | **** ListGlobals "t8762.WB.obj",Global=0,Public=2,Extern=0,eXport=0,Import=0 | Beep.D16,[CGROUP]:0000000Fh,scope='P' | Write.D16,[CGROUP]:00000000h,scope='P' | |;; | |;; Create the second auxilliary COFF module "%test.EX.obj". | |%test.EX PROGRAM FORMAT=COFF,WIDTH=16,MODEL=SMALL |[CODE] ::::Section changed. |0000: |Exit.D16:: PROC ; Display message "End", terminate Terminate the program. |0000:BE[0000] | MOV SI,.M: ; String "End" will be defined in segment [BSS] at DS:SI. |0003:C704456E | MOVW [SI+0],"En" ; Dynamically initialize the notification string. |0007:C744026420 | MOVW [SI+2],"d " ; Assume DS=PARA# [BSS]. |000C:C744040A0D | MOVW [SI+4],0x0D0A ; CR+LF. |0011:C6440600 | MOVB [SI+6],0 ; Zero-terminate the notification. |0015:E8(0000) | CALL Write.D16:: ; Display notification "End". |0018:B44C | MOV AH,4Ch ; DOS function EXIT. |001A:CD21 | INT 21h ; Terminate program and return to DOS. |[BSS] ::::Section changed. |0000:.............. |.M:DB 7*BYTE ; Reserve space for ASCIIZ string "End" in [BSS] segment. |[CODE] ::::Section changed. |001C: | ENDP Exit.D16:: | | ENDPROGRAM %test.EX | **** ListMap "t8762.EX.obj",model=SMALL,groups=2,segments=2,entry=,stack= | [CGROUP],FA=00000064h,RVA=00000000h,size=0000001Ch=28,group [CODE] | [CODE],FA=00000064h,RVA=00000000h,size=0000001Ch=28,width=16,align=0010h,purpose=CODE | [DGROUP],FA=00000000h,RVA=00000000h,size=00000007h=7,group [BSS] | [BSS],FA=00000000h,RVA=00000000h,size=00000007h=7,width=16,align=0010h,purpose=BSS | **** ListGlobals "t8762.EX.obj",Global=0,Public=1,Extern=1,eXport=0,Import=0 | Exit.D16,[CGROUP]:00000000h,scope='P' | Write.D16,[Write.D16]:00000000h,scope='E' | |;; | |;; Create the main COFF module "%test.obj" from two auxilliary COFF modules. | |%test PROGRAM FORMAT=COFF,WIDTH=16,MODEL=SMALL | | LINK %test.WB.obj, %test.EX.obj |[DATA] ::::Section changed. |0000:313662697420534D~|Msg::DB '%^WIDTH[]bit %^MODEL %^FORMAT program "%^OUTFILE".',13,10,0 | | ENDPROGRAM %test |# I0560 Linking COFF module ".\t8762.WB.obj". |# I0560 Linking COFF module ".\t8762.EX.obj". | **** ListMap "t8762.obj",model=SMALL,groups=1,segments=4,entry=,stack= | [CODE],FA=000000B4h,RVA=00000000h,size=0000003Ch=60,width=16,align=0010h,purpose=CODE | [DGROUP],FA=0000010Eh,RVA=00000000h,size=00000028h=40,group [DATA] | [DATA],FA=0000010Eh,RVA=00000000h,size=00000028h=40,width=16,align=0010h,purpose=DATA | [RODATA],FA=00000136h,RVA=00000000h,size=0000000Dh=13,width=16,align=0010h,purpose=RODATA | [BSS],FA=00000000h,RVA=00000000h,size=00000007h=7,width=16,align=0010h,purpose=BSS | **** ListGlobals "t8762.obj",Global=0,Public=4,Extern=0,eXport=0,Import=0 | Beep.D16,[CODE]:0000000Fh,scope='P' | Exit.D16,[CODE]:00000020h,scope='P' | Msg,[DGROUP]:00000000h,scope='P' | Write.D16,[CODE]:00000000h,scope='P'

Expected messages t8762.out: I0180 Assembling source file "t8762.htm". I0270 Assembling source "t8762". I0310 Assembling source pass 1. I0330 Assembling source pass 2 - final. I0470 Assembling program "t8762.WB". "t8762.htm"{52} I0510 Assembling program pass 1. "t8762.htm"{52} I0510 Assembling program pass 2. "t8762.htm"{52} I0530 Assembling program pass 3 - final. "t8762.htm"{52} I0660 16bit SMALL COFF file "t8762.WB.obj" created, size=478. "t8762.htm"{77} I0650 Program "t8762.WB" assembled in 3 passes with errorlevel 0. "t8762.htm"{77} I0470 Assembling program "t8762.EX". "t8762.htm"{88} I0510 Assembling program pass 1. "t8762.htm"{88} I0510 Assembling program pass 2. "t8762.htm"{88} I0530 Assembling program pass 3 - final. "t8762.htm"{88} I0660 16bit SMALL COFF file "t8762.EX.obj" created, size=335. "t8762.htm"{103} I0650 Program "t8762.EX" assembled in 3 passes with errorlevel 0. "t8762.htm"{103} I0470 Assembling program "t8762". "t8762.htm"{114} I0510 Assembling program pass 1. "t8762.htm"{114} I0510 Assembling program pass 2. "t8762.htm"{114} I0530 Assembling program pass 3 - final. "t8762.htm"{114} I0560 Linking COFF module ".\t8762.WB.obj". "t8762.htm"{118} I0560 Linking COFF module ".\t8762.EX.obj". "t8762.htm"{118} I0660 16bit SMALL COFF file "t8762.obj" created, size=777. "t8762.htm"{118} I0650 Program "t8762" assembled in 3 passes with errorlevel 0. "t8762.htm"{118} I0750 Source "t8762" (217 lines) assembled in 2 passes with errorlevel 0. I0860 Listing file "t8762.htm.lst" created, size=6055. I0990 EuroAssembler terminated with errorlevel 0.

Expected output file t8762. obj

0000: 4C 01 04 00 00 00 00 00 44 01 00 00 15 00 00 00  L··°°°°°D·°°·°°°
0010: 00 00 00 00 43 4F 44 45 00 00 00 00 00 00 00 00  °°°°CODE°°°°°°°°
0020: 00 00 00 00 3C 00 00 00 B4 00 00 00 F0 00 00 00  °°°°<°°°¤°°°¤°°°
0030: 00 00 00 00 03 00 00 00 20 00 50 60 44 41 54 41  °°°°·°°°¯°P`DATA
0040: 00 00 00 00 00 00 00 00 00 00 00 00 28 00 00 00  °°°°°°°°°°°°(°°°
0050: 0E 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00  ··°°°°°°°°°°°°°°
0060: 40 00 50 C0 52 4F 44 41 54 41 00 00 00 00 00 00  @°P¤RODATA°°°°°°
0070: 00 00 00 00 0D 00 00 00 36 01 00 00 00 00 00 00  °°°°·°°°6·°°°°°°
0080: 00 00 00 00 00 00 00 00 40 00 50 40 42 53 53 00  °°°°°°°°@°P@BSS°
0090: 00 00 00 00 00 00 00 00 00 00 00 00 07 00 00 00  °°°°°°°°°°°°·°°°
00A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00  °°°°°°°°°°°°°°°°
00B0: 80 00 50 C0 B4 02 8A 14 80 FA 00 74 05 CD 21 46  ¤°P¤¤·¤·¤¤°t·¤!F
00C0: EB F4 C3 BE 02 00 E8 EB FF BE 00 00 E8 E5 FF C3  ¤¤¤¤·°¤¤¤¤°°¤¤¤¤
00D0: 90 90 90 90 BE 00 00 C7 04 45 6E C7 44 02 64 20  ¤¤¤¤¤°°¤·En¤D·d¯
00E0: C7 44 04 0A 0D C6 44 06 00 E8 C8 FF B4 4C CD 21  ¤D·¬·¤D·°¤¤¤¤L¤!
00F0: 10 00 00 00 08 00 00 00 01 00 16 00 00 00 08 00  ·°°°·°°°·°·°°°·°
0100: 00 00 01 00 21 00 00 00 02 00 00 00 01 00 31 36  °°·°!°°°·°°°·°16
0110: 62 69 74 20 53 4D 41 4C 4C 20 43 4F 46 46 20 70  bit¯SMALL¯COFF¯p
0120: 72 6F 67 72 61 6D 20 22 74 38 37 36 32 2E 6F 62  rogram¯"t8762.ob
0130: 6A 22 2E 0D 0A 00 07 00 42 65 65 70 69 6E 67 2E  j".·¬°·°Beeping.
0140: 2E 2E 00 00 2E 66 69 6C 65 00 00 00 00 00 00 00  ..°°.file°°°°°°°
0150: FE FF 00 00 67 01 74 38 37 36 32 2E 68 74 6D 00  ¤¤°°g·t8762.htm°
0160: 00 00 00 00 00 00 00 00 42 53 53 00 00 00 00 00  °°°°°°°°BSS°°°°°
0170: 00 00 00 00 04 00 00 00 03 01 00 00 00 00 00 00  °°°°·°°°··°°°°°°
0180: 00 00 00 00 00 00 00 00 00 00 00 00 43 4F 44 45  °°°°°°°°°°°°CODE
0190: 00 00 00 00 00 00 00 00 01 00 00 00 03 01 3C 00  °°°°°°°°·°°°··<°
01A0: 00 00 03 00 00 00 00 00 00 00 00 00 00 00 00 00  °°·°°°°°°°°°°°°°
01B0: 44 41 54 41 00 00 00 00 00 00 00 00 02 00 00 00  DATA°°°°°°°°·°°°
01C0: 03 01 28 00 00 00 00 00 00 00 00 00 00 00 00 00  ··(°°°°°°°°°°°°°
01D0: 00 00 00 00 52 4F 44 41 54 41 00 00 00 00 00 00  °°°°RODATA°°°°°°
01E0: 03 00 00 00 03 01 0D 00 00 00 00 00 00 00 00 00  ·°°°···°°°°°°°°°
01F0: 00 00 00 00 00 00 00 00 00 00 00 00 04 00 00 00  °°°°°°°°°°°°·°°°
0200: 02 00 00 00 03 00 0C 00 03 00 00 00 00 00 13 00  ·°°°·°·°·°°°°°·°
0210: 00 00 00 00 00 00 03 00 0D 00 03 00 40 4C 54 31  °°°°°°·°·°·°@LT1
0220: 00 00 00 00 02 00 00 00 03 00 01 01 03 00 40 4C  °°°°·°°°·°···°@L
0230: 54 32 00 00 00 00 00 00 00 00 03 00 01 01 03 00  T2°°°°°°°°·°···°
0240: 00 00 00 00 1E 00 00 00 00 00 00 00 04 00 0C 00  °°°°·°°°°°°°·°·°
0250: 03 00 00 00 00 00 29 00 00 00 02 00 00 00 01 00  ·°°°°°)°°°·°°°·°
0260: 01 01 03 00 00 00 00 00 35 00 00 00 0E 00 00 00  ···°°°°°5°°°·°°°
0270: 01 00 01 01 03 00 42 65 65 70 2E 44 31 36 0F 00  ·°···°Beep.D16·°
0280: 00 00 01 00 01 02 02 00 45 78 69 74 2E 44 31 36  °°·°···°Exit.D16
0290: 20 00 00 00 01 00 01 02 02 00 4D 73 67 00 00 00  ¯°°°·°···°Msg°°°
02A0: 00 00 00 00 00 00 02 00 0C 00 02 00 00 00 00 00  °°°°°°·°·°·°°°°°
02B0: 41 00 00 00 00 00 00 00 01 00 01 02 02 00 4B 00  A°°°°°°°·°···°K°
02C0: 00 00 3D 42 22 42 65 65 70 69 6E 67 2E 2E 2E 22  °°=B"Beeping..."
02D0: 00 3D 57 28 30 78 30 30 30 37 29 00 45 78 69 74  °=W(0x0007)°Exit
02E0: 2E 44 31 36 2E 4D 00 57 72 69 74 65 2E 44 31 36  .D16.M°Write.D16
02F0: 2E 31 00 57 72 69 74 65 2E 44 31 36 2E 39 00 57  .1°Write.D16.9°W
0300: 72 69 74 65 2E 44 31 36 00                       rite.D16°

▲Back to the top▲