updated to r2244 from svn repo

functionobj.c

@@ -1,5 +1,5 @@
 /*
-    $Id: functionobj.c 2226 2020-06-27 20:10:25Z soci $
+    $Id: functionobj.c 2244 2020-08-19 18:31:35Z soci $
 
     This program is free software; you can redistribute it and/or modify
     it under the terms of the GNU General Public License as published by
@@ -287,7 +287,7 @@ static MUST_CHECK Obj *function_random(Funcargs *vals, linepos_t epoint) {
     uval_t len2;
 
     switch (vals->len) {
-    case 0:
+    default:
         return (Obj *)new_float((random64() & (((uint64_t)1 << 53) - 1)) * ldexp(1, -53));
     case 1:
         err = v[0].val->obj->ival(v[0].val, &end, 8 * sizeof end, &v[0].epoint);