From 11f3f26e877210b88f1cadfe2c26d67b4530039c Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Wed, 9 Jan 2019 14:43:25 +1100
Subject: Packrat.Errors functionality complete and tested

---
 src/packrat.ads | 11 +++++++++++
 1 file changed, 11 insertions(+)

(limited to 'src/packrat.ads')

diff --git a/src/packrat.ads b/src/packrat.ads
index 628923f..1c81958 100644
--- a/src/packrat.ads
+++ b/src/packrat.ads
@@ -91,6 +91,17 @@ package Packrat is
 private
 
 
+    function "+"
+           (S : in String)
+        return Ada.Strings.Unbounded.Unbounded_String
+        renames Ada.Strings.Unbounded.To_Unbounded_String;
+
+    function "-"
+           (US : in Ada.Strings.Unbounded.Unbounded_String)
+        return String
+        renames Ada.Strings.Unbounded.To_String;
+
+
 end Packrat;
 
 
-- 
cgit