include	clib.inc
include	dir.inc
include	wsub.inc

PPROC	wslocal, wsub:dword
	les	bx,wsub
	invoke	fullpath, es:[bx.ws_path], 0
	or	ax,dx
	jz	wslocal_end
	invoke	wssetflag, wsub
    wslocal_end:
	ret
PEND	wslocal

	END
