#!/bin/sh
if [ /dev/photon -ef /dev/photon ]; then
	phlisp hanoi.lsp $*
else
	qwlisp hanoi.lsp $*
fi

#ifdef __USAGE
#%C	[num-disks [seconds-per-move]]
#    num-disks         - disks, default = 8
#    seconds-per-move  - delay time between moves, default = 0.01
#
#    Runs the tower of hanoi problem in a windon in either Photon or
#    QNX Windows, depending on whether the program is run with phlisp
#    or qwlisp.
#endif
