summaryrefslogtreecommitdiffstats
path: root/c/src/lib/libbsp/i386/ts_386ex/tools/ts_1325_ada/ts1325-led.ads
diff options
context:
space:
mode:
Diffstat (limited to 'c/src/lib/libbsp/i386/ts_386ex/tools/ts_1325_ada/ts1325-led.ads')
-rw-r--r--c/src/lib/libbsp/i386/ts_386ex/tools/ts_1325_ada/ts1325-led.ads26
1 files changed, 0 insertions, 26 deletions
diff --git a/c/src/lib/libbsp/i386/ts_386ex/tools/ts_1325_ada/ts1325-led.ads b/c/src/lib/libbsp/i386/ts_386ex/tools/ts_1325_ada/ts1325-led.ads
deleted file mode 100644
index 6856bc4520..0000000000
--- a/c/src/lib/libbsp/i386/ts_386ex/tools/ts_1325_ada/ts1325-led.ads
+++ /dev/null
@@ -1,26 +0,0 @@
-with I386_Ports;
-use I386_Ports;
-
-package TS1325.LED is
-
- type LED_Colour is (Off, Green, Yellow, Red);
-
- protected LED_State is
-
- function Get return LED_Colour;
-
- procedure Set (Col: in LED_Colour);
-
- end LED_State;
-
-private
-
- Green_Bit: constant Byte := 2#0010_0000#; -- bit set = LED on
-
- Red_Bit: constant Byte := 2#0100_0000#; -- bit clear = LED on
-
- LED_Mask: constant Byte := 2#0110_0000#;
-
- LED_Port: Port_Address renames P1LTC;
-
-end TS1325.LED;