mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-12 16:23:57 +00:00
Code Issues Releases Activity

(rootrelativepath) [MSDOS]: Define, expanding to dynamic

Browse Source 
location of data directory.
This commit is contained in:
Richard M. Stallman 1994-06-07 15:19:33 +00:00
parent 54133323d2
commit 35ebc5cf90
1 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
lib-src/yow.c
View File

@ -18,6 +18,18 @@
#define YOW_FILE "yow.lines"
#endif
#ifdef MSDOS
#define rootrelativepath(rel) \
({\
static char res[BUFSIZE], *p;\
strcpy (res, argv[0]);\
p = res + strlen (res);\
while (p != res && *p != '/' && *p != '\\' && *p != ':') p--;\
strcpy (p + 1, "../");\
strcpy (p + 4, rel);\
&res;})
#endif
main (argc, argv)
int argc;
char *argv[];