Subversion Repositories openrisc

/*  Exit_test

 *

 *  This routine safely stops the test and prints some information

 *

 *  Input parameters:   NONE

 *

 *  Output parameters:  NONE

 *

 *  COPYRIGHT (c) 1989-1999.

 *  On-Line Applications Research Corporation (OAR).

 *

 *  The license and distribution terms for this file may be

 *  found in the file LICENSE in this distribution or at

 *  http://www.OARcorp.com/rtems/license.html.

 *

 *  $Id: exit.c,v 1.2 2001-09-27 12:02:23 chris Exp $

 */

#include "system.h"

void Exit_test( void )

{

  rtems_status_code status;

  rtems_mode        old_mode;

  /*

   * Wait a bit before shutting down so we don't screw up the other node

   * when our MPCI shuts down

   */

  rtems_task_wake_after(20);

  status = rtems_task_mode( RTEMS_NO_PREEMPT, RTEMS_PREEMPT_MASK, &old_mode );

  directive_failed( status, "rtems_task_mode" );

  MPCI_Print_statistics();

  rtems_shutdown_executive( 0 );

}