removed the helpsymbol ugliness

svn path=/trunk/externals/iem/iemmatrix/; revision=5408

12 files changed, 6 insertions, 23 deletions

diff --git a/src/mtx_binop_generic.h b/src/mtx_binop_generic.h
index 70e1838..6a91f85 100644
--- a/src/mtx_binop_generic.h
+++ b/src/mtx_binop_generic.h
@@ -26,7 +26,7 @@
 #define MTXBIN_SHORTNAME2(s1) MTXBIN_STRINGNAME ("mtx_",s1)
 #define MTXBIN_SHORTNAME MTXBIN_SHORTNAME2 (MTXBIN_GENERIC__OPERATOR)
 
-#define MTXBIN_HELPNAME2(s1) MTXBIN_STRINGNAME("iemmatrix/",s1)
+#define MTXBIN_HELPNAME2(s1) MTXBIN_STRINGNAME("",s1)
 #ifdef MTXBIN_HELPNAME
 # define MTXBIN_REALHELPNAME MTXBIN_HELPNAME2(MTXBIN_HELPNAME)
 #else
diff --git a/src/mtx_concat.c b/src/mtx_concat.c
index 3ab6b29..8e353e5 100644
--- a/src/mtx_concat.c
+++ b/src/mtx_concat.c
@@ -184,7 +184,6 @@ void mtx_concat_setup (void)
    class_addmethod (mtx_concat_class, (t_method) mTXConcatMatrix, gensym("matrix"), A_GIMME,0);
    class_addmethod (mtx_concat_class, (t_method) mTXConcatMatrix2, gensym(""), A_GIMME,0);
    class_addmethod (mtx_concat_class, (t_method) mTXSetConcatMode, gensym("mode"), A_DEFSYMBOL,0);
-   class_sethelpsymbol (mtx_concat_class, gensym("mtx_concat-help"));
 
    row_sym = gensym("row");
 }
diff --git a/src/mtx_cumsum.c b/src/mtx_cumsum.c
index 8938765..8e98052 100644
--- a/src/mtx_cumsum.c
+++ b/src/mtx_cumsum.c
@@ -260,7 +260,6 @@ void mtx_cumsum_setup (void)
    class_addmethod (mtx_cumsum_class, (t_method) mTXCumsumMatrix, gensym("matrix"), A_GIMME,0);
    class_addmethod (mtx_cumsum_class, (t_method) mTXSetCumsumMode, gensym("mode"), A_DEFSYMBOL,0);
    class_addmethod (mtx_cumsum_class, (t_method) mTXSetCumsumDirection, gensym("direction"), A_DEFFLOAT,0);
-   class_sethelpsymbol (mtx_cumsum_class, gensym("mtx_cumsum-help"));
 
    row_sym = gensym("row");
    col_sym = gensym("col");
diff --git a/src/mtx_diff.c b/src/mtx_diff.c
index f06e78a..cdc743c 100644
--- a/src/mtx_diff.c
+++ b/src/mtx_diff.c
@@ -252,7 +252,6 @@ void mtx_diff_setup (void)
    class_addmethod (mtx_diff_class, (t_method) mTXdiffMatrix, gensym("matrix"), A_GIMME,0);
    class_addmethod (mtx_diff_class, (t_method) mTXSetdiffMode, gensym("mode"), A_DEFSYMBOL,0);
    class_addmethod (mtx_diff_class, (t_method) mTXSetdiffDirection, gensym("direction"), A_DEFFLOAT,0);
-   class_sethelpsymbol (mtx_diff_class, gensym("mtx_diff-help"));
 
    row_sym = gensym("row");
    col_sym = gensym("col");
diff --git a/src/mtx_fill.c b/src/mtx_fill.c
index cc0b972..84a022e 100644
--- a/src/mtx_fill.c
+++ b/src/mtx_fill.c
@@ -349,8 +349,6 @@ void mtx_fill_setup (void)
    class_addmethod (mtx_fill_class, (t_method) mTXBigMatrix, gensym("fill_mtx"), A_GIMME,0);
    class_addmethod (mtx_fill_class, (t_method) mTXFillIndexMatrix, gensym("index"), A_GIMME,0);
    class_addfloat (mtx_fill_class, (t_method) mTXFillScalar);
-   class_sethelpsymbol (mtx_fill_class, gensym("mtx_fill-help"));
-
 }
 
 void iemtx_fill_setup(void){
diff --git a/src/mtx_find.c b/src/mtx_find.c
index ebd6af5..8ff2796 100644
--- a/src/mtx_find.c
+++ b/src/mtx_find.c
@@ -342,7 +342,6 @@ void mtx_find_setup (void)
 //   class_addmethod (mtx_find_class, (t_method) mTXSetFindDimension, gensym("dimension"), A_DEFFLOAT,0);
    class_addmethod (mtx_find_class, (t_method) mTXSetFindMode, gensym("mode"), A_DEFSYMBOL,0);
    class_addmethod (mtx_find_class, (t_method) mTXSetFindDirection, gensym("direction"), A_DEFFLOAT,0);
-   class_sethelpsymbol (mtx_find_class, gensym("mtx_find-help"));
 
    row_sym = gensym("row");
    col_sym = gensym("col");
diff --git a/src/mtx_index.c b/src/mtx_index.c
index c91652e..dfa226a 100644
--- a/src/mtx_index.c
+++ b/src/mtx_index.c
@@ -208,8 +208,6 @@ void mtx_index_setup (void)
    class_addbang (mtx_index_class, (t_method) mTXIndexBang);
    class_addmethod (mtx_index_class, (t_method) mTXIndexMatrix, gensym("matrix"), A_GIMME,0);
    class_addmethod (mtx_index_class, (t_method) mTXIndexRightMatrix, gensym(""), A_GIMME,0);
-   class_sethelpsymbol (mtx_index_class, gensym("mtx_index-help"));
-
 }
 
 void iemtx_index_setup(void){
diff --git a/src/mtx_mul.c b/src/mtx_mul.c
index 42fd406..bd6aace 100644
--- a/src/mtx_mul.c
+++ b/src/mtx_mul.c
@@ -210,6 +210,7 @@ void mtx_mul_setup(void)
   class_addmethod(mtx_mulelement_class, (t_method)mtx_bin_matrix2, gensym(""), A_GIMME, 0);
   class_addfloat (mtx_mulelement_class, mtx_mul_float);
   class_addbang  (mtx_mulelement_class, mtx_binmtx_bang);
+  class_sethelpsymbol(mtx_mulelement_class, gensym("mtx_mul-help"));
 
   mtx_mulscalar_class = class_new(gensym("mtx_mul"), 0, (t_method)mtx_binscalar_free,
                                   sizeof(t_mtx_binscalar), 0, 0);
@@ -218,9 +219,6 @@ void mtx_mul_setup(void)
   class_addmethod(mtx_mulscalar_class, (t_method)mtx_mulscalar_matrix, gensym("matrix"), A_GIMME, 0);
   class_addlist  (mtx_mulscalar_class, mtx_mulscalar_list);
   class_addbang  (mtx_mulscalar_class, mtx_binscalar_bang);
-
-  class_sethelpsymbol(mtx_mulelement_class, gensym("mtx_mul-help"));
-  class_sethelpsymbol(mtx_mulscalar_class, gensym("mtx_mul-help"));
 }
 
 
diff --git a/src/mtx_reverse.c b/src/mtx_reverse.c
index bc7d8ec..816bec6 100644
--- a/src/mtx_reverse.c
+++ b/src/mtx_reverse.c
@@ -80,14 +80,13 @@ static void copyList (int n, t_atom *x, t_atom *y)
 }
 static void reverseList (int n, t_atom *y)
 {
-   t_atom *read = y;
+   t_atom *read = y+n-1;
    t_atom tmp;
-   y += n-1;
    n >>= 1;
-   for (;n--;) { 
+   while(n-->0) { 
       tmp = *y;
-      *y-- = *read;
-      *read++ = tmp;
+      *y++ = *read;
+      *read-- = tmp;
    }
 }
 static void reverseListStep (int n, int step, t_atom *y)
diff --git a/src/mtx_rowrfft.c b/src/mtx_rowrfft.c
index 807129b..daa1f3f 100644
--- a/src/mtx_rowrfft.c
+++ b/src/mtx_rowrfft.c
@@ -182,8 +182,6 @@ void mtx_rowrfft_setup (void)
      CLASS_DEFAULT, A_GIMME, 0);
   class_addbang (mtx_rowrfft_class, (t_method) mTXrowrfftBang);
   class_addmethod (mtx_rowrfft_class, (t_method) mTXrowrfftMatrix, gensym("matrix"), A_GIMME,0);
-  class_sethelpsymbol (mtx_rowrfft_class, gensym("mtx_rowrfft-help"));
-
 }
 
 void iemtx_rowrfft_setup(void){
diff --git a/src/mtx_rowrifft.c b/src/mtx_rowrifft.c
index 54577ef..ea803da 100644
--- a/src/mtx_rowrifft.c
+++ b/src/mtx_rowrifft.c
@@ -217,8 +217,6 @@ static void mtx_rowrifft_setup (void)
   class_addbang (mtx_rowrifft_class, (t_method) mTXrowrifftBang);
   class_addmethod (mtx_rowrifft_class, (t_method) mTXrowrifftMatrixHot, gensym("matrix"), A_GIMME,0);
   class_addmethod (mtx_rowrifft_class, (t_method) mTXrowrifftMatrixCold, gensym(""), A_GIMME,0);
-  class_sethelpsymbol (mtx_rowrifft_class, gensym("mtx_rowrifft-help"));
-
 }
 
 void iemtx_rowrifft_setup(void){
diff --git a/src/mtx_slice.c b/src/mtx_slice.c
index 2fbfc6f..3adfe5c 100644
--- a/src/mtx_slice.c
+++ b/src/mtx_slice.c
@@ -206,8 +206,6 @@ void mtx_slice_setup (void)
   class_addbang (mtx_slice_class, (t_method) mTXSliceBang);
   class_addmethod (mtx_slice_class, (t_method) mTXSliceMatrix, gensym("matrix"), A_GIMME,0);
   class_addmethod (mtx_slice_class, (t_method) mTXSliceIndexList, gensym(""), A_GIMME,0);
-  class_sethelpsymbol (mtx_slice_class, gensym("mtx_slice-help"));
-
 }
 
 void iemtx_slice_setup(void){