mirror of
https://github.com/AdaCore/OPAVES.git
synced 2026-02-12 12:43:36 -08:00
13 lines
243 B
Ada
13 lines
243 B
Ada
with Ada.Real_Time; use Ada.Real_Time;
|
|
|
|
package BLE is
|
|
procedure Init;
|
|
|
|
type Speed_Msg_Type is record
|
|
Speed : Natural; -- 0 .. 16#cccc#
|
|
Timestamp : Time;
|
|
end record;
|
|
|
|
function Get_Speed return Speed_Msg_Type;
|
|
end BLE;
|