}
dlen = strlen (dir);
- add_slash = dlen != 0 && !ISSLASH (dir[dlen - 1]);
#ifdef __VMS
- if (dlen != 0 && dir[dlen - 1] == ':')
- add_slash = false;
+ add_slash = 0;
+#else
+ add_slash = dlen != 0 && !ISSLASH (dir[dlen - 1]);
#endif
/* check we have room for "${dir}/${pfx}XXXXXX\0" */
}
memcpy (tmpl, dir, dlen);
- sprintf (tmpl + dlen, &"/%.*sXXXXXX"[!add_slash], pfx, (int) plen);
+ sprintf (tmpl + dlen, &"/%.*sXXXXXX"[!add_slash], (int) plen, pfx);
return 0;
}