/*
 * BSD/Unix expansion library for Amiga.
 *
 * telldir() -- system independent directory code
 */

#include "dir.h"

/*
 * telldir and seekdir don't work quite right. The problem is that you have
 * to save more than a long's worth of stuff to indicate position, and it's
 * socially unacceptable to alloc stuff that you don't free later under
 * AmigaDOS. So we fake it - you get one level of seek, and dat's all.
 * As of now, these things are untested.
 */

#define DIR_SEEK_RETURN		((long) 1)	/* Not 0! */
long
telldir(my_dir)
   DIR *my_dir;
{
	my_dir->d_seek = my_dir->d_info ;
	return (long) DIR_SEEK_RETURN ;
}