diff options
author | Jedidiah Barber <contact@jedbarber.id.au> | 2021-11-06 00:53:55 +1300 |
---|---|---|
committer | Jedidiah Barber <contact@jedbarber.id.au> | 2021-11-06 00:53:55 +1300 |
commit | 866565c42134dbe8828c9a9b8140a90598df4069 (patch) | |
tree | 6c6b5f14284b333fa5e82bd94b15b5b894634785 /src/deck_convert.adb | |
parent | a7c1795a6162181a39366e99a60ee65a342a66f8 (diff) |
Factored out deck datatypes into their own package
Diffstat (limited to 'src/deck_convert.adb')
-rw-r--r-- | src/deck_convert.adb | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/src/deck_convert.adb b/src/deck_convert.adb index 6154b1c..75a35d0 100644 --- a/src/deck_convert.adb +++ b/src/deck_convert.adb @@ -11,11 +11,13 @@ with Ada.Strings.Unbounded, Ada.Text_IO, SQLite3, + Datatypes, Deck_IO; use - Ada.Text_IO; + Ada.Text_IO, + Datatypes; procedure Deck_Convert is @@ -46,10 +48,10 @@ procedure Deck_Convert is procedure Strip_Formatting - (Notes : in out Deck_IO.Note_Vectors.Vector) + (Notes : in out Note_Vector) is procedure Strip - (Text : in out Deck_IO.Note; + (Text : in out Note; Item : in String) is Position : Natural; @@ -101,9 +103,9 @@ procedure Deck_Convert is Deck : Deck_IO.Deck_Handle; - Models : Deck_IO.Model_Maps.Map; - Notes : Deck_IO.Note_Vectors.Vector; - Media : Deck_IO.Media_Maps.Map; + Models : Model_Map; + Notes : Note_Vector; + Media : Media_Map; begin |