Added display of VMS host system type and OS version to SHOW VERSION output

This commit is contained in:
Mark Pizzolato 2013-04-24 06:43:04 -07:00
parent d71e53feb0
commit 9a172154f0

12
scp.c
View file

@ -2813,7 +2813,17 @@ if (flag) {
fprintf (st, "\n\t\t%s", sim_toffset_64 ? "Large File (>2GB) support" : "No Large File support"); fprintf (st, "\n\t\t%s", sim_toffset_64 ? "Large File (>2GB) support" : "No Large File support");
fprintf (st, "\n\t\tOS clock tick size: %dms", os_tick_size); fprintf (st, "\n\t\tOS clock tick size: %dms", os_tick_size);
#if defined(__VMS) #if defined(__VMS)
fprintf (st, "\n\t\tOS: VMS"); if (1) {
char *arch =
#if defined(__ia64)
"I64";
#elif defined(__ALPHA)
"Alpha";
#else
"VAX";
#endif
fprintf (st, "\n\t\tOS: OpenVMS %s %s", arch, __VMS_VERSION);
}
#elif defined(_WIN32) #elif defined(_WIN32)
fprintf (st, "\n\t\tOS: Windows: "); fprintf (st, "\n\t\tOS: Windows: ");
fflush (st); fflush (st);