source: rtems/cpukit/sapi/src/extensiondelete.c @ 4c98a3e

4.115
Last change on this file since 4c98a3e was 9b4422a2, checked in by Joel Sherrill <joel.sherrill@…>, on 05/03/12 at 15:09:24

Remove All CVS Id Strings Possible Using a Script

Script does what is expected and tries to do it as
smartly as possible.

+ remove occurrences of two blank comment lines

next to each other after Id string line removed.

+ remove entire comment blocks which only exited to

contain CVS Ids

+ If the processing left a blank line at the top of

a file, it was removed.

  • Property mode set to 100644
File size: 1.2 KB
Line 
1/**
2 * @file
3 *
4 * @ingroup ClassicUserExtensions
5 *
6 * @brief User Extensions Implementation.
7 */
8
9/*
10 *  COPYRIGHT (c) 1989-2007.
11 *  On-Line Applications Research Corporation (OAR).
12 *
13 *  The license and distribution terms for this file may be
14 *  found in the file LICENSE in this distribution or at
15 *  http://www.rtems.com/license/LICENSE.
16 */
17
18#if HAVE_CONFIG_H
19#include "config.h"
20#endif
21
22#include <rtems/system.h>
23#include <rtems/rtems/support.h>
24#include <rtems/score/object.h>
25#include <rtems/score/thread.h>
26#include <rtems/extension.h>
27
28rtems_status_code rtems_extension_delete(
29  rtems_id id
30)
31{
32  Extension_Control   *the_extension;
33  Objects_Locations    location;
34
35  the_extension = _Extension_Get( id, &location );
36  switch ( location ) {
37    case OBJECTS_LOCAL:
38      _User_extensions_Remove_set( &the_extension->Extension );
39      _Objects_Close( &_Extension_Information, &the_extension->Object );
40      _Extension_Free( the_extension );
41      _Thread_Enable_dispatch();
42      return RTEMS_SUCCESSFUL;
43
44#if defined(RTEMS_MULTIPROCESSING)
45    case OBJECTS_REMOTE:            /* should never return this */
46#endif
47    case OBJECTS_ERROR:
48      break;
49  }
50
51  return RTEMS_INVALID_ID;
52}
Note: See TracBrowser for help on using the repository browser.