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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [tests/] [psxtests/] [psx06/] [task.c] - Blame information for rev 535

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 30 unneback
/*  Task_1
2
 *
3
 *  This routine serves as a test task.  It verifies the basic task
4
 *  switching capabilities of the executive.
5
 *
6
 *  Input parameters:
7
 *    argument - task argument
8
 *
9
 *  Output parameters:  NONE
10
 *
11
 *  COPYRIGHT (c) 1989-1999.
12
 *  On-Line Applications Research Corporation (OAR).
13
 *
14
 *  The license and distribution terms for this file may be
15
 *  found in the file LICENSE in this distribution or at
16
 *  http://www.OARcorp.com/rtems/license.html.
17
 *
18
 *  $Id: task.c,v 1.2 2001-09-27 12:02:24 chris Exp $
19
 */
20
 
21
#include "system.h"
22
#include <errno.h>
23
 
24
void *Task_1(
25
  void *argument
26
)
27
{
28
  int               status;
29
  rtems_unsigned32 *key_data;
30
 
31
  printf( "Task_1: Setting the key to %d\n", 1 );
32
  status = pthread_setspecific( Key_id, &Data_array[ 1 ] );
33
  if ( status )
34
    printf( "status = %d\n", status );
35
  assert( !status );
36
 
37
  key_data = pthread_getspecific( Key_id );
38
  printf( "Task_1: Got the key value of %ld\n",
39
          (unsigned long) ((rtems_unsigned32 *)key_data - Data_array) );
40
  if ( status )
41
    printf( "status = %d\n", status );
42
  assert( !status );
43
 
44
  puts( "Task_1: exitting" );
45
  pthread_exit( NULL );
46
 
47
     /* switch to task 2 */
48
 
49
  return NULL; /* just so the compiler thinks we returned something */
50
}

powered by: WebSVN 2.1.0

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