testsuite/bc_numbers2.bc

define f() {
	"ibase:";ibase
	a=A;a
	a=F;a
	a=G;a
	a=Z;a
	a=0A;a
	a=0F;a
	a=0G;a
	a=0Z;a
}
f()
ibase=9;f()
ibase=A;f()
ibase=F;f()
ibase=G;f()
#ibase=Z;f()
halt