philologue/whitakers-words
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

blah

Browse Source
This commit is contained in:
Michael Wolf
2013-06-29 11:15:53 -05:00
parent ef525ceace
commit e3abbc251c
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
word_package.adb
View File

@@ -20,13 +20,13 @@
begin begin
if WORDS_MDEV(PAUSE_IN_SCREEN_OUTPUT) then if WORDS_MDEV(PAUSE_IN_SCREEN_OUTPUT) then
if METHOD = INTERACTIVE then if METHOD = INTERACTIVE then
if TEXT_IO.NAME(OUTPUT) = -- if TEXT_IO.NAME(OUTPUT) =
-- TEXT_IO.NAME(TEXT_IO.STANDARD_OUTPUT) then -- TEXT_IO.NAME(TEXT_IO.STANDARD_OUTPUT) then
-- TEXT_IO.PUT_LINE(TEXT_IO.STANDARD_OUTPUT, -- TEXT_IO.PUT_LINE(TEXT_IO.STANDARD_OUTPUT,
-- " MORE - hit RETURN/ENTER to continue"); -- " MORE - hit RETURN/ENTER to continue");
-- TEXT_IO.GET_LINE(TEXT_IO.STANDARD_INPUT, PAUSE_LINE, PAUSE_LAST); -- TEXT_IO.GET_LINE(TEXT_IO.STANDARD_INPUT, PAUSE_LINE, PAUSE_LAST);
TEXT_IO.PUT_LINE(TEXT_IO.STANDARD_OUTPUT, ""); TEXT_IO.PUT_LINE(TEXT_IO.STANDARD_OUTPUT, "");
end if; -- end if;
elsif METHOD = COMMAND_LINE_INPUT then elsif METHOD = COMMAND_LINE_INPUT then
TEXT_IO.PUT_LINE(TEXT_IO.STANDARD_OUTPUT, ""); TEXT_IO.PUT_LINE(TEXT_IO.STANDARD_OUTPUT, "");
-- TEXT_IO.PUT_LINE(TEXT_IO.STANDARD_OUTPUT, -- TEXT_IO.PUT_LINE(TEXT_IO.STANDARD_OUTPUT,