Blame gnulib/tests/test-once.c

Packit 06dd63
/* Test of once-only execution in multithreaded situations.
Packit 06dd63
   Copyright (C) 2018-2019 Free Software Foundation, Inc.
Packit 06dd63
Packit 06dd63
   This program is free software: you can redistribute it and/or modify
Packit 06dd63
   it under the terms of the GNU General Public License as published by
Packit 06dd63
   the Free Software Foundation; either version 3 of the License, or
Packit 06dd63
   (at your option) any later version.
Packit 06dd63
Packit 06dd63
   This program is distributed in the hope that it will be useful,
Packit 06dd63
   but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit 06dd63
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Packit 06dd63
   GNU General Public License for more details.
Packit 06dd63
Packit 06dd63
   You should have received a copy of the GNU General Public License
Packit 06dd63
   along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
Packit 06dd63
Packit 06dd63
/* Written by Bruno Haible <bruno@clisp.org>, 2018.  */
Packit 06dd63
Packit 06dd63
#include <config.h>
Packit 06dd63
Packit 06dd63
#include "glthread/lock.h"
Packit 06dd63
Packit 06dd63
#include "macros.h"
Packit 06dd63
Packit 06dd63
gl_once_define(static, a_once)
Packit 06dd63
Packit 06dd63
static int a;
Packit 06dd63
Packit 06dd63
static void
Packit 06dd63
a_init (void)
Packit 06dd63
{
Packit 06dd63
  a = 42;
Packit 06dd63
}
Packit 06dd63
Packit 06dd63
int
Packit 06dd63
main ()
Packit 06dd63
{
Packit 06dd63
  gl_once (a_once, a_init);
Packit 06dd63
Packit 06dd63
  ASSERT (a == 42);
Packit 06dd63
Packit 06dd63
  return 0;
Packit 06dd63
}