skalibs

Mirror/fork of https://skarnet.org/software/skalibs/
git clone https://ccx.te2000.cz/git/skalibs
Log | Files | Refs | README | LICENSE

tain_setnow.c (219B)

      1 /* ISC license. */
      2 
      3 /* MT-unsafe */
      4 
      5 #include <skalibs/tai.h>
      6 
      7 int tain_setnow (tain const *a)
      8 {
      9   tain aa ;
     10   if (!sysclock_from_tai(&aa.sec.x, &a->sec)) return 0 ;
     11   aa.nano = a->nano ;
     12   return sysclock_set(&aa) ;
     13 }