definition module EdMyIO;

import StdFile, StdString, deltaEventIO, deltaFileSelect;

	NoDate	:== {exists=False,yy=0,mm=0,dd=0,h=0,m=0,s=0};

::	DATE = {	exists	:: !Bool,
				yy		:: !Int,
				mm		:: !Int,
				dd		:: !Int,
				h		:: !Int,
				m		:: !Int,
				s		:: !Int }; 

FOpenDir :: !String !*Files -> (!Bool, !*Files);
FCloseDir :: !*Files -> !(Bool, !*Files);
FGetPlainFileName :: !*Files -> (!Bool, !String, !*Files);
FExists	:: !String !*Files -> (!Bool, !*Files);
FRemove	:: !String !*Files -> (!Bool, !*Files);
FModified :: !String !*Files -> (!DATE, !*Files);
FStartUpDir :: !String !*Files -> (!String, !*Files);

Older_Date	:: !DATE !DATE -> Bool;

FTempFileName :: !String !*Files -> (!String, !*Files);

SelectDir ::	!*state !(IOState *state)
				-> (!Bool, !String, !*state, !IOState *state);

Launch ::	!String *state !(IOState *state)
			-> (!Bool,!Int,!*state,!IOState *state);

GetFullApplicationPath :: !*Files -> ({#Char}, *Files);
from MacKeys import ShiftKeyIsDown;
