Second call of dlerror should return NULL by the POSIX standard.

git-svn-id: svn://kolibrios.org@7851 a494cfbc-eb01-0410-851d-a64ba20cac60
2020-04-30 11:01:55 +00:00 · 2020-04-30 11:01:55 +00:00 · be1d6256c6
commit be1d6256c6
parent ef6d8a9089
1 changed files with 3 additions and 1 deletions
--- a/programs/develop/ktcc/trunk/libc/dlfcn/dlfcn.c
+++ b/programs/develop/ktcc/trunk/libc/dlfcn/dlfcn.c
@ -85,5 +85,7 @@ int dlclose(void *handle) {

 // https://pubs.opengroup.org/onlinepubs/007908799/xsh/dlerror.html
 char *dlerror(void) {
-    return strdup(__error);
+    char *ret = __error ? strdup(__error) : NULL;
+    __error = NULL;
+    return ret;
 }