update to 0.9.18

Author: mgondan

src/crolog.cpp

@@ -768,12 +768,12 @@ RObject pl2r(term_t pl, CharacterVector& names, term_t& vars, List options)
   if(PL_is_integer(pl))
     return pl2r_integer(pl) ;
 
-  if(PL_is_float(pl))
-    return pl2r_real(pl) ;
-
   if(PL_is_string(pl))
     return pl2r_char(pl) ;
 
+  if(PL_is_float(pl))
+    return pl2r_real(pl) ;
+
   if(PL_is_atom(pl))
     return pl2r_symbol(pl) ;