From 6365f8189896cb4f86b8d3db0a0e9830926b24c7 Mon Sep 17 00:00:00 2001 From: Joel Sherrill Date: Mon, 22 Apr 1996 16:46:00 +0000 Subject: made initialization routine a regular subroutine --- c/src/exec/score/macros/rtems/score/wkspace.inl | 41 ------------------------- c/src/exec/score/macros/wkspace.inl | 41 ------------------------- 2 files changed, 82 deletions(-) (limited to 'c/src/exec/score/macros') diff --git a/c/src/exec/score/macros/rtems/score/wkspace.inl b/c/src/exec/score/macros/rtems/score/wkspace.inl index c6483656d8..5efe247fb1 100644 --- a/c/src/exec/score/macros/rtems/score/wkspace.inl +++ b/c/src/exec/score/macros/rtems/score/wkspace.inl @@ -17,47 +17,6 @@ #ifndef __WORKSPACE_inl #define __WORKSPACE_inl -/*PAGE - * - * _Workspace_Handler_initialization - * - */ - -#define _Workspace_Handler_initialization( _starting_address, _size ) \ -{ \ - unsigned32 *zero_out_array; \ - unsigned32 index; \ - unsigned32 memory_available; \ - \ - if ( !(_starting_address) || !_Addresses_Is_aligned( (_starting_address) ) ) \ - _Internal_error_Occurred( \ - INTERNAL_ERROR_CORE, \ - TRUE, \ - INTERNAL_ERROR_INVALID_WORKSPACE_ADDRESS \ - ); \ - \ - if ( _CPU_Table.do_zero_of_workspace ) { \ - for( zero_out_array = (unsigned32 *) (_starting_address), index = 0 ; \ - index < (_size) / 4 ; \ - index++ ) \ - zero_out_array[ index ] = 0; \ - } \ - \ - memory_available = _Heap_Initialize( \ - &_Workspace_Area, \ - (_starting_address), \ - (_size), \ - CPU_HEAP_ALIGNMENT \ - ); \ - \ - if ( memory_available == 0 ) \ - _Internal_error_Occurred( \ - INTERNAL_ERROR_CORE, \ - TRUE, \ - INTERNAL_ERROR_TOO_LITTLE_WORKSPACE \ - ); \ -} - /*PAGE * * _Workspace_Allocate diff --git a/c/src/exec/score/macros/wkspace.inl b/c/src/exec/score/macros/wkspace.inl index c6483656d8..5efe247fb1 100644 --- a/c/src/exec/score/macros/wkspace.inl +++ b/c/src/exec/score/macros/wkspace.inl @@ -17,47 +17,6 @@ #ifndef __WORKSPACE_inl #define __WORKSPACE_inl -/*PAGE - * - * _Workspace_Handler_initialization - * - */ - -#define _Workspace_Handler_initialization( _starting_address, _size ) \ -{ \ - unsigned32 *zero_out_array; \ - unsigned32 index; \ - unsigned32 memory_available; \ - \ - if ( !(_starting_address) || !_Addresses_Is_aligned( (_starting_address) ) ) \ - _Internal_error_Occurred( \ - INTERNAL_ERROR_CORE, \ - TRUE, \ - INTERNAL_ERROR_INVALID_WORKSPACE_ADDRESS \ - ); \ - \ - if ( _CPU_Table.do_zero_of_workspace ) { \ - for( zero_out_array = (unsigned32 *) (_starting_address), index = 0 ; \ - index < (_size) / 4 ; \ - index++ ) \ - zero_out_array[ index ] = 0; \ - } \ - \ - memory_available = _Heap_Initialize( \ - &_Workspace_Area, \ - (_starting_address), \ - (_size), \ - CPU_HEAP_ALIGNMENT \ - ); \ - \ - if ( memory_available == 0 ) \ - _Internal_error_Occurred( \ - INTERNAL_ERROR_CORE, \ - TRUE, \ - INTERNAL_ERROR_TOO_LITTLE_WORKSPACE \ - ); \ -} - /*PAGE * * _Workspace_Allocate -- cgit v1.2.3