File ksh93-unset-f.dif of Package ksh

--- src/cmd/ksh93/sh/xec.c
+++ src/cmd/ksh93/sh/xec.c	2011-07-04 15:09:52.252426415 +0000
@@ -2780,7 +2780,8 @@ int sh_funscope(int argn, char *argv[],i
 	jmpval = sigsetjmp(buff.buff,0);
 	if(!fun)
 	{
-		shp->st.filename = fp->node->nvalue.rp->fname;
+		if (fp->node->nvalue.rp)
+			shp->st.filename = fp->node->nvalue.rp->fname;
 		shp->st.funname = nv_name(fp->node);
 		shp->last_root = nv_dict(DOTSHNOD);
 		nv_putval(SH_PATHNAMENOD,shp->st.filename,NV_NOFREE);