qasm/testdata/3013-len-pos-link.S


	ovr all

	asm 3013-len-pos-1.S
	asm 3013-len-pos-2.S

	lnk 3013-len-pos-1.L

	len my_len_1
	pos my_pos_1

	lnk 3013-len-pos-2.L

	len my_len_2
	pos my_pos_2

	pos
	pos my_pos_0


	sav 3013-len-pos

	ent
qlinkgs - implement the len/pos linker opcodes len [label] sets label = size of most recently linked/imported file pos [label] sets label = size of current segment. If no label, resets the position variable to 0. label is added to the symbol table as an absolute entry. Testing in merlin 16+, these are absolute entry labels, not gequ labels Merlin does not include any ds fill in the len/pos, but that decision seems questionable. these do include a ds fill for both. 2021-04-28 03:53:54 +00:00
			`ovr all`

			`asm 3013-len-pos-1.S`
			`asm 3013-len-pos-2.S`

			`lnk 3013-len-pos-1.L`

			`len my_len_1`
			`pos my_pos_1`

			`lnk 3013-len-pos-2.L`

			`len my_len_2`
			`pos my_pos_2`

			`pos`
			`pos my_pos_0`



			`sav 3013-len-pos`

			`ent`