ttp://kansai2channeler.hp.infoseek.co.jp/cgi-bin/joyful/img/4275.txt

main文付でやってみました。
表示は>>216で
free_list(obj)の部分を
disp(obj)にしただけです。