.globl _start
.data
msg:    .ascii "ok\n"
.text
_start:
	basr	%r1, 0
base:
	la	%r2, base
	sr	%r1, %r2
	lhi	%r2, 1
	la	%r3, msg(%r1)
	lhi	%r4, 3
	svc	4

	xr	%r2, %r2
	svc	1

.globl _start
.data
msg:    .ascii "ok\n"
.text
_start:
	basr	%r1, 0
base:
	la	%r2, base
	sr	%r1, %r2
	lhi	%r2, 1
	la	%r3, msg(%r1)
	lghi	%r4, 3
	svc	4

	xr	%r2, %r2
	svc	1

Fix string length in 64-bit mode
Fix string length in 64-bit mode

"Load Halfword Immediate" leaves higher register bits untouched, and
that caused extra output beyond "ok" on s390x architecture.

This patch fixes the issue by loading an immediate into all 64 bits.
