Could someone help me write a J-5 version of the following getpath
procedure (which returns the directory of a source file)?  The only
trick I know in migrating from J6 to J5 is to watch out for y. and
friends, and they aren't here.
 
> getpath =: 3 : 0
>        dirname=. #~  '/\' +./\...@e.~ ]
>        dirname (4!:4<'dirname') {:: 4!:3''
> )

Thanks!
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to