Set errno to ENOSYS for ephemetis() with no ephem provider.

Author: attipaci

src/novas.c

@@ -6425,6 +6425,8 @@ short ephemeris(const double *jd_tdb, const object *body, enum novas_origin orig
       enum novas_origin eph_origin = NOVAS_HELIOCENTER;
 
       error = -1;
+      errno = ENOSYS;
+
       if(readeph2_call) {
         // If there is a newstyle epehemeris access routine set, we will prefer it.
         error = readeph2_call(body->name, body->number, jd_tdb[0], jd_tdb[1], &eph_origin, posvel, &posvel[3]);

test/src/test-errors.c

@@ -1116,6 +1116,10 @@ static int test_geom_posvel() {
   frame.accuracy = 2;
   if(check("geom_posvel:frame:accuracy:2", -1, novas_geom_posvel(&o, &frame, NOVAS_ICRS, pos, vel))) n++;
 
+  frame.accuracy = NOVAS_REDUCED_ACCURACY;
+  make_ephem_object("blah", 111111, &o);
+  if(check("geom_posvel:ephem_object", -1, novas_geom_posvel(&o, &frame, NOVAS_ICRS, pos, vel))) n++;
+
   return n;
 }