diff options
| author | IOhannes m zmölnig <zmoelnig@users.sourceforge.net> | 2005-10-17 19:58:15 +0000 |
|---|---|---|
| committer | IOhannes m zmölnig <zmoelnig@users.sourceforge.net> | 2005-10-17 19:58:15 +0000 |
| commit | ff99518e60497a59342a53b153f951ccca8be1c5 (patch) | |
| tree | 278d0ae2d131e529409b5beb70f60b659bcafca4 /src/mtx_binop_generic.h | |
| parent | c6bc1aa9e44db101aa57fccb80bb70dfdb37439a (diff) | |
remade mtx_sub generic;
the helpsymbol in mtx_binop_generic can now be set via preprocessor-defines
svn path=/trunk/externals/iem/iemmatrix/; revision=3726
Diffstat (limited to 'src/mtx_binop_generic.h')
| -rw-r--r-- | src/mtx_binop_generic.h | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/src/mtx_binop_generic.h b/src/mtx_binop_generic.h index 03399e1..6c22cef 100644 --- a/src/mtx_binop_generic.h +++ b/src/mtx_binop_generic.h @@ -26,6 +26,12 @@ #define MTXBIN_SHORTNAME2(s1) MTXBIN_STRINGNAME ("mtx_",s1) #define MTXBIN_SHORTNAME MTXBIN_SHORTNAME2 (MTXBIN_GENERIC__OPERATOR) +#define MTXBIN_HELPNAME2(s1) MTXBIN_STRINGNAME("iemmatrix/",s1) +#ifdef MTXBIN_HELPNAME +# define MTXBIN_REALHELPNAME MTXBIN_HELPNAME2(MTXBIN_HELPNAME) +#else +# define MTXBIN_REALHELPNAME MTXBIN_HELPNAME2(MTXBIN_GENERIC__NAME) +#endif #define MTXBIN_IEMSETUP_EXPAND(s1) ie ## s1 ## _setup #define MTXBIN_IEMSETUP(s1) MTXBIN_IEMSETUP_EXPAND (s1) @@ -196,8 +202,8 @@ void MTXBIN_APPEND(_setup) (void) class_addlist (MTXBIN_APPEND(_scalarclass), mtxbin_scalar_list); class_addbang (MTXBIN_APPEND(_scalarclass), mtx_binscalar_bang); - class_sethelpsymbol(MTXBIN_APPEND(_class), gensym("iemmatrix/mtx_logical")); - class_sethelpsymbol(MTXBIN_APPEND(_scalarclass), gensym("iemmatrix/mtx_logical")); + class_sethelpsymbol(MTXBIN_APPEND(_class), gensym(MTXBIN_REALHELPNAME)); + class_sethelpsymbol(MTXBIN_APPEND(_scalarclass), gensym(MTXBIN_REALHELPNAME)); } void MTXBIN_IEMSETUP(MTXBIN_GENERIC__NAME) (void) |