1 files changed, 13 insertions, 0 deletions
diff --git a/c/src/lib/libbsp/i386/ts_386ex/tools/ts_1325_ada/ts1325-parallel.adb b/c/src/lib/libbsp/i386/ts_386ex/tools/ts_1325_ada/ts1325-parallel.adb
new file mode 100644
index 0000000000..c0a76bcadf
--- /dev/null
+++ b/c/src/lib/libbsp/i386/ts_386ex/tools/ts_1325_ada/ts1325-parallel.adb
@@ -0,0 +1,13 @@
+package body TS1325.Parallel is
+
+   procedure Read_Parallel_Port (Data: out Byte) is
+   begin
+      Inport (Parallel_Port_In, Data);
+   end Read_Parallel_Port;
+
+   procedure Write_Parallel_Port (Data: in Byte) is
+   begin
+      Outport (Parallel_Port_Out, Data);
+   end Write_Parallel_Port;
+
+end TS1325.Parallel;