


short d1
short d2
short d3
short d4
short depth

	let d1 := d2 := d3 := d4 := 0
	printToFile loopLog "## Stack Depth Test ##"
	if depth > 0
		while d1 := d1 + 1 < 3
			printToFile loopLog "D1: %.0f" d1
			if depth > 1
				printToFile loopLog "D2: %.0f" d2
				let d2 := 0
				while d2 := d2 + 1 < 3
					if depth > 2
						let d3 := 0
						while d3 := d3 + 1 < 3
							printToFile loopLog "D3: %.0f" d3
							if depth > 3
								let d4 := 0
								while d4 := d4 + 1 < 3
									printToFile loopLog "D4: %.0f BREAKING" d4
									break
								loop
							endif
							printToFile loopLog "D3: CONTINUING"
							continue
							printToFile loopLog "YOU SHOULD NOT SEE THIS"
						loop
					endif
				loop
			endif
		loop
	endif
	
