import from .zip file
This commit is contained in:
19
tricks_package.ads
Normal file
19
tricks_package.ads
Normal file
@@ -0,0 +1,19 @@
|
||||
with DICTIONARY_PACKAGE; use DICTIONARY_PACKAGE;
|
||||
package TRICKS_PACKAGE is
|
||||
|
||||
procedure SYNCOPE(W : STRING;
|
||||
PA : in out PARSE_ARRAY; PA_LAST : in out INTEGER);
|
||||
|
||||
procedure TRY_TRICKS(W : STRING;
|
||||
PA : in out PARSE_ARRAY; PA_LAST : in out INTEGER;
|
||||
LINE_NUMBER : INTEGER; WORD_NUMBER : INTEGER);
|
||||
|
||||
procedure TRY_SLURY(W : STRING;
|
||||
PA : in out PARSE_ARRAY; PA_LAST : in out INTEGER;
|
||||
LINE_NUMBER : INTEGER; WORD_NUMBER : INTEGER);
|
||||
|
||||
procedure ROMAN_NUMERALS(INPUT_WORD : STRING;
|
||||
PA : in out PARSE_ARRAY; PA_LAST : in out INTEGER);
|
||||
|
||||
|
||||
end TRICKS_PACKAGE;
|
||||
Reference in New Issue
Block a user