C_Binding

   #include <tis.h>

   int
   tis_once (
         pthread_once_t   *once_control,
         void   (*init_routine) (void));