@prog baz.muf
1 99 d
1 i
: main
	callers
	intostr
	begin
		depth 1 >
	while
		swap int intostr "#" swap strcat " " strcat swap strcat
	loop
	me @ swap notify
;
.
c
q