Blame | Last modification | View Log | Download
# file opened: omega_struct_instance_pollution.asm1 0000 ; this test is based on Omega (CZ demo scener) issue report, when local label defined2 0000 ; after structure instance did use as "main" label the last inner-field of structure3 0000 ; instead of the main structure name. (ie. ".data" after "test: sss" got expanded as4 0000 ; "test.there.data" instead of expected "test.data")5 0000 ; - the initial test got extended also with macro emit and structure with local name6 0000 ; - and SLD file, as it took some effort to get at least somewhat meaningful output7 00008 0000 DEVICE ZXSPECTRUM489 000010 0000 STRUCT nestS11 0000 ~ nested1: byte12 0000 ~ nested2: word13 0000 ENDS14 000015 0000 STRUCT sss16 0000 ~ what: db 017 0000 ~ where: dw 018 0000 ~ how: nestS {$12, $3456}19 0000 ~ there: db 020 0000 ENDS21 000022 0000 ORG $ABCD23 ABCD 23 DB AB 12 test: sss $23,.data,{,.data},$4523 ABD1 DB AB 4524 ABD4 56 D4 AB 12 .t2: sss $56,.t2,{,.t2},$7824 ABD8 D4 AB 7825 ABDB EF .data db $EF26 ABDC27 ABDC ORG $987628 9876 MACRO defineStruct naam?29 9876 ~ naam? sss $23,.data,{,.data},$4530 9876 ~ .naam? sss $56,.naam?,{,.naam?},$7831 9876 ~ .data db $DC32 9876 ENDM33 987634 9876 defineStruct fromM34 9876 23 84 98 12 >fromM sss $23,.data,{,.data},$4534 987A 84 98 45 >34 987D 56 7D 98 12 >.fromM sss $56,.fromM,{,.fromM},$7834 9881 7D 98 78 >34 9884 DC >.data db $DC35 9885# file closed: omega_struct_instance_pollution.asmValue Label------ - -----------------------------------------------------------0x9884 0>data0x987D 0>fromM0x9880 X 0>fromM.how0x9880 X 0>fromM.how.nested10x9881 X 0>fromM.how.nested20x9883 X 0>fromM.there0x987D X 0>fromM.what0x987E X 0>fromM.where0x9876 X fromM0x9879 X fromM.how0x9879 X fromM.how.nested10x987A X fromM.how.nested20x987C X fromM.there0x9876 X fromM.what0x9877 X fromM.where0x0003 X nestS0x0000 X nestS.nested10x0001 X nestS.nested20x0007 X sss0x0003 X sss.how0x0003 X sss.how.nested10x0004 X sss.how.nested20x0006 X sss.there0x0000 X sss.what0x0001 X sss.where0xABCD X test0xABDB test.data0xABD0 X test.how0xABD0 X test.how.nested10xABD1 X test.how.nested20xABD4 test.t20xABD7 X test.t2.how0xABD7 X test.t2.how.nested10xABD8 X test.t2.how.nested20xABDA X test.t2.there0xABD4 X test.t2.what0xABD5 X test.t2.where0xABD3 X test.there0xABCD X test.what0xABCE X test.where