Changeset: 95b61753c755 for MonetDB
URL: https://dev.monetdb.org/hg/MonetDB/rev/95b61753c755
Modified Files:
        clients/Tests/exports.stable.out
        ctest/monetdb5/mal/test_malInclude.c
        monetdb5/mal/mal.c
        monetdb5/mal/mal.h
        monetdb5/mal/mal_embedded.c
        monetdb5/mal/mal_prelude.c
        monetdb5/mal/mal_prelude.h
        monetdb5/mal/mal_session.c
        monetdb5/mal/mal_session.h
        tools/monetdbe/monetdbe.c
        tools/mserver/mserver5.c
        tools/mserver/shutdowntest.c
Branch: default
Log Message:

Add const.


diffs (167 lines):

diff --git a/clients/Tests/exports.stable.out b/clients/Tests/exports.stable.out
--- a/clients/Tests/exports.stable.out
+++ b/clients/Tests/exports.stable.out
@@ -1052,20 +1052,20 @@ const char lookupRef[];
 const char mainRef[];
 str mal2str(MalBlkPtr mb, int first, int last);
 int malAtomSize(int size, const char *name);
-str malBootstrap(char *modules[], bool embedded, const char *initpasswd);
+str malBootstrap(const char *modules[const], bool embedded, const char 
*initpasswd);
 str malEmbeddedBoot(int workerlimit, int memorylimit, int querytimeout, int 
sessionlimit, bool with_mapi_server);
 void malEmbeddedReset(void);
 _Noreturn void malEmbeddedStop(int status);
 str malExtraModulesBoot(Client c, str extraMalModules[], char *mal_scripts);
 str malInclude(Client c, const char *name, int listing);
-str malIncludeModules(Client c, char *modules[], int listing, bool embedded, 
const char *initpasswd);
+str malIncludeModules(Client c, const char *modules[const], int listing, bool 
embedded, const char *initpasswd);
 str malIncludeString(Client c, const char *name, str mal, int listing, MALfcn 
address);
 const char malRef[];
 void mal_atom_reset(void);
 ClientRec *mal_clients;
 MT_Lock mal_contextLock;
 _Noreturn void mal_exit(int status);
-int mal_init(char *modules[], bool embedded, const char *initpasswd, const 
char *caller_revision);
+int mal_init(const char *modules[const], bool embedded, const char 
*initpasswd, const char *caller_revision);
 void mal_instruction_reset(void);
 void mal_module(const char *name, mel_atom *atoms, mel_func *funcs);
 void mal_module2(const char *name, mel_atom *atoms, mel_func *funcs, mel_init 
initfunc, const char *code);
diff --git a/ctest/monetdb5/mal/test_malInclude.c 
b/ctest/monetdb5/mal/test_malInclude.c
--- a/ctest/monetdb5/mal/test_malInclude.c
+++ b/ctest/monetdb5/mal/test_malInclude.c
@@ -29,7 +29,7 @@ main(void)
                fprintf(stderr, "GDKinit() failed\n");
                return 1;
     }
-    char *modules[2];
+    const char *modules[2];
     modules[0] = "sql";
     modules[1] = 0;
     mal_init(modules, true, NULL, NULL);
diff --git a/monetdb5/mal/mal.c b/monetdb5/mal/mal.c
--- a/monetdb5/mal/mal.c
+++ b/monetdb5/mal/mal.c
@@ -53,7 +53,7 @@ mal_version(void)
  */
 
 int
-mal_init(char *modules[], bool embedded, const char *initpasswd,
+mal_init(const char *modules[const], bool embedded, const char *initpasswd,
                 const char *caller_revision)
 {
 /* Any error encountered here terminates the process
diff --git a/monetdb5/mal/mal.h b/monetdb5/mal/mal.h
--- a/monetdb5/mal/mal.h
+++ b/monetdb5/mal/mal.h
@@ -68,8 +68,8 @@ mal_export char monet_cwd[FILENAME_MAX];
 
 mal_export MT_Lock mal_contextLock;
 
-mal_export int mal_init(char *modules[], bool embedded, const char *initpasswd,
-                                               const char *caller_revision);
+mal_export int mal_init(const char *modules[const], bool embedded,
+                                               const char *initpasswd, const 
char *caller_revision);
 mal_export _Noreturn void mal_exit(int status);
 mal_export void mal_reset(void);
 mal_export const char *mal_version(void);
diff --git a/monetdb5/mal/mal_embedded.c b/monetdb5/mal/mal_embedded.c
--- a/monetdb5/mal/mal_embedded.c
+++ b/monetdb5/mal/mal_embedded.c
@@ -119,7 +119,7 @@ malEmbeddedBoot(int workerlimit, int mem
                MT_thread_set_qry_ctx(qc_old);
                return msg;
        }
-       static /*const*/ char *modules[7] = { "embedded", "sql", "generator", 
"udf", "csv", "monetdb_loader" };
+       static const char *modules[7] = { "embedded", "sql", "generator", 
"udf", "csv", "monetdb_loader" };
        if ((msg = malIncludeModules(c, modules, 0, !with_mapi_server, NULL)) 
!= MAL_SUCCEED) {
                MCcloseClient(c);
                MT_thread_set_qry_ctx(qc_old);
diff --git a/monetdb5/mal/mal_prelude.c b/monetdb5/mal/mal_prelude.c
--- a/monetdb5/mal/mal_prelude.c
+++ b/monetdb5/mal/mal_prelude.c
@@ -434,8 +434,8 @@ malPrelude(Client c, int listing, int *s
 }
 
 str
-malIncludeModules(Client c, char *modules[], int listing, bool no_mapi_server,
-                                 const char *initpasswd)
+malIncludeModules(Client c, const char *modules[const], int listing,
+                                 bool no_mapi_server, const char *initpasswd)
 {
        str msg;
        int sql = -1, mapi = -1;
diff --git a/monetdb5/mal/mal_prelude.h b/monetdb5/mal/mal_prelude.h
--- a/monetdb5/mal/mal_prelude.h
+++ b/monetdb5/mal/mal_prelude.h
@@ -24,7 +24,8 @@ mal_export void mal_module2(const char *
                                                        mel_func * funcs, 
mel_init initfunc,
                                                        const char *code);
 
-mal_export str malIncludeModules(Client c, char *modules[], int listing,
-                                                                bool embedded, 
const char *initpasswd);
+mal_export str malIncludeModules(Client c, const char *modules[const],
+                                                                int listing, 
bool embedded,
+                                                                const char 
*initpasswd);
 
 #endif /*  _MAL_PRELUDE_H */
diff --git a/monetdb5/mal/mal_session.c b/monetdb5/mal/mal_session.c
--- a/monetdb5/mal/mal_session.c
+++ b/monetdb5/mal/mal_session.c
@@ -31,7 +31,7 @@
  * The startup script is run as user Admin.
  */
 str
-malBootstrap(char *modules[], bool embedded, const char *initpasswd)
+malBootstrap(const char *modules[const], bool embedded, const char *initpasswd)
 {
        Client c;
 
diff --git a/monetdb5/mal/mal_session.h b/monetdb5/mal/mal_session.h
--- a/monetdb5/mal/mal_session.h
+++ b/monetdb5/mal/mal_session.h
@@ -14,7 +14,7 @@
 #include "mal_client.h"
 #include "mal_resolve.h"
 
-mal_export str malBootstrap(char *modules[], bool embedded,
+mal_export str malBootstrap(const char *modules[const], bool embedded,
                                                        const char *initpasswd);
 mal_export str MSinitClientPrg(Client cntxt, const char *mod, const char *nme);
 
diff --git a/tools/monetdbe/monetdbe.c b/tools/monetdbe/monetdbe.c
--- a/tools/monetdbe/monetdbe.c
+++ b/tools/monetdbe/monetdbe.c
@@ -994,8 +994,8 @@ monetdbe_load_extension(monetdbe_databas
        if ((mdbe->msg = validate_database_handle(mdbe, 
"embedded.monetdbe_dump_database")) != MAL_SUCCEED) {
                return mdbe->msg;
        }
-       char *modules[2];
-       modules[0] = (char*)file;
+       const char *modules[2];
+       modules[0] = file;
        modules[1] = NULL;
        char *msg = loadLibrary(file, -1);
        if (msg)
diff --git a/tools/mserver/mserver5.c b/tools/mserver/mserver5.c
--- a/tools/mserver/mserver5.c
+++ b/tools/mserver/mserver5.c
@@ -368,7 +368,7 @@ main(int argc, char **av)
        };
 
 #define MAX_MODULES 32
-       char *modules[MAX_MODULES + 1];
+       const char *modules[MAX_MODULES + 1];
        int mods = 0;
 
        modules[mods++] = "sql";
diff --git a/tools/mserver/shutdowntest.c b/tools/mserver/shutdowntest.c
--- a/tools/mserver/shutdowntest.c
+++ b/tools/mserver/shutdowntest.c
@@ -254,7 +254,7 @@ static str monetdb_initialize(void) {
                assert(MT_thread_getallocator() != NULL);
        }
 
-       char *modules[2];
+       const char *modules[2];
        modules[0] = "sql";
        modules[1] = 0;
        if (mal_init(modules, true, NULL, NULL) != 0) { // mal_init() does not 
return meaningful codes on failure
_______________________________________________
checkin-list mailing list -- [email protected]
To unsubscribe send an email to [email protected]

Reply via email to