X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2Fbipartition.c;h=aeb6977080ff182c1c044442b9a7e1e9e558aba3;hb=d88302b4735b5b7c9132387090bb592d906fe1cb;hp=86d5bbd299dabd8c241ea99e02e8a4fd261948a1;hpb=2e3b8be33765d5311e071efb39871249d16f7e30;p=ape.git

diff --git a/src/bipartition.c b/src/bipartition.c
index 86d5bbd..aeb6977 100644
--- a/src/bipartition.c
+++ b/src/bipartition.c
@@ -112,7 +112,8 @@ SEXP bipartition(SEXP edge, SEXP nbtip, SEXP nbnode)
     return ans;
 } /* bipartition */
 
-/* From R-ext: */
+/* From R-ext manual
+   (not the same than in library/stats/src/nls.c) */
 SEXP getListElement(SEXP list, char *str)
 {
     SEXP elmt = R_NilValue, names = getAttrib(list, R_NamesSymbol);