OpenCores
URL https://opencores.org/ocsvn/scarts/scarts/trunk

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-newlib/] [newlib-1.17.0/] [newlib/] [libc/] [sys/] [linux/] [linuxthreads/] [unload.c] - Blame information for rev 9

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 9 jlechner
/* Tests for non-unloading of libpthread.
2
   Copyright (C) 2000 Free Software Foundation, Inc.
3
   Contributed by Ulrich Drepper <drepper@redhat.com>, 2000.
4
 
5
   The GNU C Library is free software; you can redistribute it and/or
6
   modify it under the terms of the GNU Library General Public License as
7
   published by the Free Software Foundation; either version 2 of the
8
   License, or (at your option) any later version.
9
 
10
   The GNU C Library is distributed in the hope that it will be useful,
11
   but WITHOUT ANY WARRANTY; without even the implied warranty of
12
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13
   Library General Public License for more details.
14
 
15
   You should have received a copy of the GNU Library General Public
16
   License along with the GNU C Library; see the file COPYING.LIB.  If not,
17
   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18
   Boston, MA 02111-1307, USA.  */
19
 
20
#include <dlfcn.h>
21
#include <stdio.h>
22
#include <stdlib.h>
23
#include <gnu/lib-names.h>
24
 
25
int
26
main (void)
27
{
28
  void *p = dlopen (PREFIX LIBPTHREAD_SO, RTLD_LAZY);
29
 
30
  if (p == NULL)
31
    {
32
      puts ("failed to load " LIBPTHREAD_SO);
33
      exit (1);
34
    }
35
 
36
  if (dlclose (p) != 0)
37
    {
38
      puts ("dlclose (" LIBPTHREAD_SO ") failed");
39
      exit (1);
40
    }
41
 
42
  puts ("seems to work");
43
 
44
  exit (0);
45
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.