// this script was compiled with wurst 1.8.1.0-jenkins-Wurst-1366
globals
integer array A_nextFree
integer A_firstFree=0
integer A_maxIndex=0
integer array A_foo_0
integer array A_foo_1
integer array A_foo_2
integer array A_foo_3
integer array A_foo_4
integer array A_foo_5
integer array A_foo_6
integer array A_foo_7
integer array A_foo_8
integer array A_foo_9
integer array A_foo_10
integer array A_foo_11
integer array A_foo_12
integer array A_foo_13
integer array A_foo_14
integer array A_foo_15
integer array A_foo_16
integer array A_foo_17
integer array A_foo_18
integer array A_foo_19
endglobals
native testSuccess takes nothing returns nothing
function error takes string msg returns nothing
	call BJDebugMsg(msg + "\n" + "")
endfunction

function A_foo_get takes integer index1, integer index2 returns integer
	local integer returnVal
	if index2 < 0 or index2 >= 20 then
		call error("Index out of Bounds")
	elseif index2 <= 9 then
		if index2 <= 4 then
			if index2 <= 2 then
				if index2 <= 1 then
					if index2 <= 0 then
						set returnVal = A_foo_0[index1]
					else
						set returnVal = A_foo_1[index1]
					endif
				else
					set returnVal = A_foo_2[index1]
				endif
			elseif index2 <= 3 then
				set returnVal = A_foo_3[index1]
			else
				set returnVal = A_foo_4[index1]
			endif
		elseif index2 <= 7 then
			if index2 <= 6 then
				if index2 <= 5 then
					set returnVal = A_foo_5[index1]
				else
					set returnVal = A_foo_6[index1]
				endif
			else
				set returnVal = A_foo_7[index1]
			endif
		elseif index2 <= 8 then
			set returnVal = A_foo_8[index1]
		else
			set returnVal = A_foo_9[index1]
		endif
	elseif index2 <= 14 then
		if index2 <= 12 then
			if index2 <= 11 then
				if index2 <= 10 then
					set returnVal = A_foo_10[index1]
				else
					set returnVal = A_foo_11[index1]
				endif
			else
				set returnVal = A_foo_12[index1]
			endif
		elseif index2 <= 13 then
			set returnVal = A_foo_13[index1]
		else
			set returnVal = A_foo_14[index1]
		endif
	elseif index2 <= 17 then
		if index2 <= 16 then
			if index2 <= 15 then
				set returnVal = A_foo_15[index1]
			else
				set returnVal = A_foo_16[index1]
			endif
		else
			set returnVal = A_foo_17[index1]
		endif
	elseif index2 <= 18 then
		set returnVal = A_foo_18[index1]
	else
		set returnVal = A_foo_19[index1]
	endif
	return returnVal
endfunction

function A_foo_set takes integer instanceId, integer arrayIndex, integer value returns nothing
	if arrayIndex < 0 or arrayIndex >= 20 then
		call error("Index out of Bounds")
	elseif arrayIndex <= 9 then
		if arrayIndex <= 4 then
			if arrayIndex <= 2 then
				if arrayIndex <= 1 then
					if arrayIndex <= 0 then
						set A_foo_0[instanceId] = value
					else
						set A_foo_1[instanceId] = value
					endif
				else
					set A_foo_2[instanceId] = value
				endif
			elseif arrayIndex <= 3 then
				set A_foo_3[instanceId] = value
			else
				set A_foo_4[instanceId] = value
			endif
		elseif arrayIndex <= 7 then
			if arrayIndex <= 6 then
				if arrayIndex <= 5 then
					set A_foo_5[instanceId] = value
				else
					set A_foo_6[instanceId] = value
				endif
			else
				set A_foo_7[instanceId] = value
			endif
		elseif arrayIndex <= 8 then
			set A_foo_8[instanceId] = value
		else
			set A_foo_9[instanceId] = value
		endif
	elseif arrayIndex <= 14 then
		if arrayIndex <= 12 then
			if arrayIndex <= 11 then
				if arrayIndex <= 10 then
					set A_foo_10[instanceId] = value
				else
					set A_foo_11[instanceId] = value
				endif
			else
				set A_foo_12[instanceId] = value
			endif
		elseif arrayIndex <= 13 then
			set A_foo_13[instanceId] = value
		else
			set A_foo_14[instanceId] = value
		endif
	elseif arrayIndex <= 17 then
		if arrayIndex <= 16 then
			if arrayIndex <= 15 then
				set A_foo_15[instanceId] = value
			else
				set A_foo_16[instanceId] = value
			endif
		else
			set A_foo_17[instanceId] = value
		endif
	elseif arrayIndex <= 18 then
		set A_foo_18[instanceId] = value
	else
		set A_foo_19[instanceId] = value
	endif
endfunction

function initGlobals takes nothing returns nothing
endfunction

function new_A takes nothing returns integer
	local integer this
	local integer this_1
	if A_firstFree == 0 then
		if A_maxIndex < 32768 then
			set A_maxIndex = A_maxIndex + 1
			set this_1 = A_maxIndex
		else
			call error("Out of memory: Could not create A.")
			set this_1 = 0
		endif
	else
		set A_firstFree = A_firstFree - 1
		set this_1 = A_nextFree[A_firstFree]
	endif
	set this = this_1
	return this
endfunction

function main takes nothing returns nothing
	local integer a
	call initGlobals()
	set a = new_A()
	call A_foo_set(a, 13, 42)
	if A_foo_get(a, 13) == 42 then
		call testSuccess()
	endif
endfunction

function config takes nothing returns nothing
endfunction