on startUp
	-- this handler will loop endlessly if you turn off the
	-- compiler option to generate unquoted string literals
	-- as variables.
	put return&"about to start."
	repeat while myVar <> true
		put return&"looping..."
		put true into myVar
	end repeat
	put return&"finished."&return
end startUp