/***********************************************************************/ /* */ /* Objective Caml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ /* Copyright 1996 Institut National de Recherche en Informatique et */ /* Automatique. Distributed only by permission. */ /* */ /***********************************************************************/ /* $Id$ */ #include #include #ifdef NGROUPS int main() { int gidset[NGROUPS]; if (getgroups(NGROUPS, gidset) == -1) return 1; return 0; } #else int main() { return 1; } #endif