- Timestamp:
- Jun 2, 1997, 11:46:15 PM (24 years ago)
- Branches:
- 4.10, 4.11, 4.8, 4.9, 5, master
- Children:
- ad9865e
- Parents:
- 529cdccd
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
c/src/ada/rtems.ads
r529cdccd rd766b7fd 158 158 Major : RTEMS.Device_Major_Number; 159 159 Minor : RTEMS.Device_Minor_Number; 160 160 161 161 end record; 162 162 … … 184 184 185 185 Default_Modes : constant RTEMS.Mode := 16#0000#; 186 187 All_Mode_Masks : constant RTEMS.Mode := 16#0000_ffff#; 188 Current_Mode : constant RTEMS.Mode := 16#0000_0000#; 189 Preempt_Mask : constant RTEMS.Mode := 16#0000_0100#; 190 Timeslice_Mask : constant RTEMS.Mode := 16#0000_0200#; 191 ASR_Mask : constant RTEMS.Mode := 16#0000_0400#; 192 -- Interrupt_Mask : constant RTEMS.Mode := CPU_Modes_Interrupt_Mask; 193 Preempt : constant RTEMS.Mode := 16#0000_0000#; 194 No_Preempt : constant RTEMS.Mode := 16#0000_0100#; 195 No_Timeslice : constant RTEMS.Mode := 16#0000_0000#; 196 Timeslice : constant RTEMS.Mode := 16#0000_0200#; 197 ASR : constant RTEMS.Mode := 16#0000_0000#; 198 No_ASR : constant RTEMS.Mode := 16#0000_0400#; 186 199 187 200 -- … … 197 210 Level : in RTEMS.Unsigned32 198 211 ) return RTEMS.Attribute; 199 212 213 Minimum_Stack_Size : RTEMS.Unsigned32; 214 pragma Import (C, Minimum_Stack_Size, "rtems_minimum_stack_size"); 215 216 200 217 -- 201 218 -- Notepad index constants … … 333 350 Expired => 4 334 351 ); 335 352 336 353 type Rate_Monotonic_Period_Status is 337 354 record … … 504 521 type POSIX_Initialization_Threads_Table_Pointer is access all 505 522 POSIX_Initialization_Threads_Table; 506 523 507 524 type POSIX_API_Configuration_Table_Entry is 508 525 record … … 513 530 Maximum_Queued_Signals : Interfaces.C.Int; 514 531 Number_Of_Initialization_Tasks : Interfaces.C.Int; 515 User_Initialization_Tasks_Table : 532 User_Initialization_Tasks_Table : 516 533 RTEMS.POSIX_Initialization_Threads_Table_Pointer; 517 534 end record; … … 1329 1346 Configuration : RTEMS.Configuration_Table_Pointer; 1330 1347 pragma Import (C, Configuration, "_Configuration_Table"); 1331 -- function Configuration 1332 -- return RTEMS.Configuration_Table_Pointer; 1333 1334 1348 1349 1335 1350 private 1336 1351 end RTEMS;
Note: See TracChangeset
for help on using the changeset viewer.