#
# local_label.pasm
#
# Copyright (C) 2001 The Parrot Team. All rights reserved.
# This program is free software. It is subject to the same
# license as The Parrot Interpreter.
#
# $Id: local_label.pasm,v 1.2 2001/10/03 17:30:41 gregor Exp $
#

main:	print		"test 1\n"
	branch		$ok
$ng:	print		"ng 1\n"
	branch		test2
$ok:	print		"ok 1\n"

test2:	print		"test 2\n"
	branch		$ok
$ng:	print		"ng 2\n"
	branch		done
$ok:	print		"ok 2\n"

done:	end