MonetDB: Jul2021 - Add some const.

[Sjoerd Mullender]

Changeset: 32bd2162d606 for MonetDB
URL: https://dev.monetdb.org/hg/MonetDB/rev/32bd2162d606
Modified Files:
        monetdb5/mal/mal_prelude.c
        monetdb5/mal/mel.h
Branch: Jul2021
Log Message:

Add some const.


diffs (69 lines):

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
@@ -164,7 +164,7 @@ addAtom( mel_atom *atoms)
 }
 
 static str
-makeArgument(MalBlkPtr mb, mel_arg *a, int *idx)
+makeArgument(MalBlkPtr mb, const mel_arg *a, int *idx)
 {
        int tpe = TYPE_any;//, l;
 
@@ -245,7 +245,7 @@ addFunctions(mel_func *fcn){
                }
                int i;
                for (i = 0; i<fcn->retc; i++ ){
-                       mel_arg *a = fcn->args+i;
+                       const mel_arg *a = fcn->args+i;
                        msg = makeArgument(mb, a, &idx);
                        if( msg)
                                return msg;
@@ -266,7 +266,7 @@ addFunctions(mel_func *fcn){
                }
                /* add the arguments */
                for (i = fcn->retc; i<fcn->argc; i++ ){
-                       mel_arg *a = fcn->args+i;
+                       const mel_arg *a = fcn->args+i;
                        msg = makeArgument(mb, a, &idx);
                        if( msg)
                                return msg;
@@ -311,7 +311,7 @@ makeFuncArgument(MalBlkPtr mb, mel_func_
 }
 
 int
-melFunction(bool command, const char *mod, char *fcn, fptr imp, char *fname, 
bool unsafe, char *comment, int retc, int argc, ... )
+melFunction(bool command, const char *mod, const char *fcn, fptr imp, const 
char *fname, bool unsafe, const char *comment, int retc, int argc, ... )
 {
        int i, idx;
        Module c;
diff --git a/monetdb5/mal/mel.h b/monetdb5/mal/mel.h
--- a/monetdb5/mal/mel.h
+++ b/monetdb5/mal/mel.h
@@ -71,7 +71,7 @@ typedef struct __attribute__((__designat
 typedef struct __attribute__((__designated_init__)) mel_func {
        char mod[14];
        char fcn[30];
-       char *cname;
+       const char *cname;
        uint16_t command:1,
                unsafe:1,
                retc:6,
@@ -80,7 +80,7 @@ typedef struct __attribute__((__designat
        //char *comment;
 //#endif
        fptr imp;
-       mel_arg *args;
+       const mel_arg *args;
 } mel_func;
 
 #else
@@ -137,7 +137,7 @@ typedef struct __attribute__((__designat
 } mel_func_arg;
 
 /* var arg of arguments of type mel_func_arg */
-int melFunction(bool command, const char *mod, char *fcn, fptr imp, char 
*fname, bool unsafe, char *comment, int retc, int argc, ...);
+int melFunction(bool command, const char *mod, const char *fcn, fptr imp, 
const char *fname, bool unsafe, const char *comment, int retc, int argc, ...);
 
 #ifdef SPECS
 typedef struct __attribute__((__designated_init__)) mal_spec{
_______________________________________________
checkin-list mailing list
checkin-list@monetdb.org
https://www.monetdb.org/mailman/listinfo/checkin-list