diff options
author | Hans Hagen <pragma@wxs.nl> | 2023-01-24 15:11:58 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2023-01-24 15:11:58 +0100 |
commit | b47e8c2cdeeab0bcdb1c4c32328c933f3f8599de (patch) | |
tree | 8e32282155744f2b0a812eff2fe88bbc919a70b4 /source/luametatex/source/luarest/lmtoslibext.c | |
parent | 0caec226a633182402b349c3ac5b3bf9e0bc76c2 (diff) | |
download | context-b47e8c2cdeeab0bcdb1c4c32328c933f3f8599de.tar.gz |
2023-01-24 13:50:00
Diffstat (limited to 'source/luametatex/source/luarest/lmtoslibext.c')
-rw-r--r-- | source/luametatex/source/luarest/lmtoslibext.c | 24 |
1 files changed, 15 insertions, 9 deletions
diff --git a/source/luametatex/source/luarest/lmtoslibext.c b/source/luametatex/source/luarest/lmtoslibext.c index 0dc5fb940..e49edd5a5 100644 --- a/source/luametatex/source/luarest/lmtoslibext.c +++ b/source/luametatex/source/luarest/lmtoslibext.c @@ -115,15 +115,21 @@ static int oslib_sleep(lua_State *L) osver.dwOSVersionInfoSize = sizeof(osver); GetSystemInfo(&sysinfo); strcpy(uts->sysname, "Windows"); - /* When |GetVersionEx| becomes obsolete the version and release fields will be set to "". */ - GetVersionEx(&osver); - sprintf(uts->version, "%ld.%02ld", osver.dwMajorVersion, osver.dwMinorVersion); - if (osver.szCSDVersion[0] != '\0' && (strlen(osver.szCSDVersion) + strlen(uts->version) + 1) < sizeof(uts->version)) { - strcat(uts->version, " "); - strcat(uts->version, osver.szCSDVersion); - } - sprintf(uts->release, "build %ld", osver.dwBuildNumber & 0xFFFF); - /* So far for the fragile and actually not that relevant part of |uts|. */ + /*tex When |GetVersionEx| becomes obsolete the version and release fields will be set to "". */ + // if (0) { + // GetVersionEx(&osver); + // sprintf(uts->version, "%ld.%02ld", osver.dwMajorVersion, osver.dwMinorVersion); + // if (osver.szCSDVersion[0] != '\0' && (strlen(osver.szCSDVersion) + strlen(uts->version) + 1) < sizeof(uts->version)) { + // strcat(uts->version, " "); + // strcat(uts->version, osver.szCSDVersion); + // } + // sprintf(uts->release, "build %ld", osver.dwBuildNumber & 0xFFFF); + // } else { + /*tex I can't motivate myself to figure this out. */ + strcpy(uts->version, ""); + strcpy(uts->release, ""); + // } + /*tex So far for the fragile and actually not that relevant part of |uts|. */ switch (sysinfo.wProcessorArchitecture) { case PROCESSOR_ARCHITECTURE_AMD64: strcpy(uts->machine, "x86_64"); |