Skip to content

Commit f7b4258

Browse files
committed
Update .gitignore
1 parent 11e023f commit f7b4258

File tree

2 files changed

+26
-1
lines changed

2 files changed

+26
-1
lines changed

.gitignore

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
object/
22
library/
33
binary/
4-
body_core/*setup.adb
4+
body_ada/*setup.adb
55
body_aws/*setup.adb
66
body_gnat/*setup.adb
77
var/*.template

spec_ada/dk8543jq-strings.ads

Lines changed: 25 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,25 @@
1+
--
2+
-- The author disclaims copyright to this source code. In place of
3+
-- a legal notice, here is a blessing:
4+
--
5+
-- May you do good and not evil.
6+
-- May you find forgiveness for yourself and forgive others.
7+
-- May you share freely, not taking more than you give.
8+
--
9+
10+
with Ada.Strings;
11+
12+
package DK8543JQ.Strings is
13+
14+
procedure Trim
15+
(Item : in String;
16+
First : in out Natural;
17+
Last : in out Natural;
18+
Side : in Ada.Strings.Trim_End);
19+
20+
function In_First_Part
21+
(From : in String;
22+
Item : in String) return Boolean;
23+
-- Return True when Item is first part of From.
24+
25+
end DK8543JQ.Strings;

0 commit comments

Comments
 (0)