fun with function tests

[Betelgeuse]

Just thought it might be cool to share some code that tests how a function works. What do you think this code displays and what does that mean for the functions in this example?

Code: Select all

				(block Nil
					(plyRedirectMessage gPlayer True)
					(plyMessage gplayer "redirect") 
					(if (plyGetRedirectMessage gPlayer)
						(plyMessage gplayer " ") 
						)
					(plyMessage gplayer "redirectother") 
					(plyRedirectMessage gPlayer Nil)
					(plyMessage gplayer "after") 
					(plyMessage gplayer "afterafter") 
					(plyMessage gplayer (plyGetRedirectMessage gPlayer))
					(plyRedirectMessage gPlayer True)
					(plyRedirectMessage gPlayer Nil)
					(plyMessage gplayer (plyGetRedirectMessage gPlayer))
					)

[Ttech]

it brokey me game. B


ut I think I did something wrong.

[Betelgeuse]

well this code does assume you are just flying along when run. I made a global function called testFunction and stuck it in there. If you still have problems show me the code.

[digdug]

if added to an <Invoke> tag it prints exacly:

Nil
redirect redirectothers
afterafter
after


I'm still reading the code, but it's a little to complicated without explanations for me.

[Betelgeuse]

I'm still reading the code, but it's a little to complicated without explanations for me.

That the fun of it. To try to come up with an explanation that works and can be tested further.

Also that is what it displays.