X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2Fbipartition.c;h=aeb6977080ff182c1c044442b9a7e1e9e558aba3;hb=24fc6c03893f85a3f9ab3d088201b3731f3035b4;hp=86d5bbd299dabd8c241ea99e02e8a4fd261948a1;hpb=c827059eeafc8cbe41c812b26979543ab287803e;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);