/**************************************************************************/ /* */ /* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ /* Copyright 1996 Institut National de Recherche en Informatique et */ /* en Automatique. */ /* */ /* All rights reserved. This file is distributed under the terms of */ /* the GNU Lesser General Public License version 2.1, with the */ /* special exception on linking described in the file LICENSE. */ /* */ /**************************************************************************/ #include #include #ifdef NGROUPS_MAX int main(void) { int gidset[NGROUPS_MAX]; if (getgroups(NGROUPS_MAX, gidset) == -1) return 1; return 0; } #else int main(void) { return 1; } #endif