Changeset bc96f3b4 in rtems for testsuites/ada/support


Ignore:
Timestamp:
Jan 23, 2018, 8:53:06 AM (2 years ago)
Author:
Sebastian Huber <sebastian.huber@…>
Branches:
master
Children:
865b3027
Parents:
d8de6b9
git-author:
Sebastian Huber <sebastian.huber@…> (01/23/18 08:53:06)
git-committer:
Sebastian Huber <sebastian.huber@…> (01/29/18 05:58:28)
Message:

ada: Introduce RTEMS.Size type

Some time ago the Classic API object size related parameters were
changed to use size_t. Reflect this in the Ada bindings.

Update #3082.

Location:
testsuites/ada/support
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • testsuites/ada/support/init.c

    rd8de6b9 rbc96f3b4  
    3636uint32_t milliseconds_per_tick(void);
    3737uint32_t ticks_per_second(void);
    38 uint32_t work_space_size(void);
     38size_t work_space_size(void);
    3939uint32_t is_configured_multiprocessing(void);
    4040uint32_t get_node(void);
     
    8585}
    8686
    87 uint32_t work_space_size(void)
     87size_t work_space_size(void)
    8888{
    8989  return rtems_configuration_get_work_space_size()
  • testsuites/ada/support/test_support.adb

    rd8de6b9 rbc96f3b4  
    228228
    229229   function Work_Space_Size
    230    return RTEMS.Unsigned32 is
    231       function Work_Space_Size_Base return RTEMS.Unsigned32;
     230   return RTEMS.Size is
     231      function Work_Space_Size_Base return RTEMS.Size;
    232232      pragma Import (C, Work_Space_Size_Base, "work_space_size");
    233233   begin
  • testsuites/ada/support/test_support.ads

    rd8de6b9 rbc96f3b4  
    182182
    183183   function Work_Space_Size
    184    return RTEMS.Unsigned32;
     184   return RTEMS.Size;
    185185
    186186--
Note: See TracChangeset for help on using the changeset viewer.