"Test expression library file."

((Dictionary new) add: (#'one-shot' -> '"This expression will activate the breakpoint
only once.  Before accepting the text you must
define the local debug variable ''firstTime''.
If you wish to refire the breakpoint, you must first
do; ''firstTime := nil'' "

^DebugActive and: [firstTime == nil
	and: [firstTime := true]]'); yourself)