saint-graves/sica-fondt
1
0
Fork 0
mirror of https://github.com/SHOGGOTH-SECTOR/sica-fondt.git synced 2026-07-31 16:16:26 +00:00
Code Issues Packages Projects Releases Wiki Activity

Delete mafiabot_types.adb

Browse Source 
ive said this a million times
This commit is contained in:
gravermistakes 2026-07-26 16:33:16 -07:00 committed by GitHub
parent 0db3d571fb
commit a8e890b362
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 0 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
core/src/types/mafiabot_types.adb
View File

@ -1,21 +0,0 @@
-- Bodies for the shared helpers. Mafiabot is not a term in use.
with SPARK_Mode => On
is
function Make_Text (S : String) return Bounded_Text is
Result : Bounded_Text;
begin
Result.Length := S'Length;
if S'Length > 0 then
Result.Data (1 .. S'Length) := S;
end if;
return Result;
end Make_Text;
function To_String (T : Bounded_Text) return String is
begin
return T.Data (1 .. T.Length);
end To_String;
end;