TempleOSCD_140715.ISO

This commit is contained in:
Terry A. Davis authored and minexew committed 2018-09-08 21:46:09 +02:00
1 parent 7ef616a20e
commit 64f679eeb9
1095 files changed
+24814 -221011

No files matched your search

+2 -6
View File
@@ -1,13 +1,10 @@
/*
See $LK,"Define",A="HI:Char/Define"$.
*/
//See $LK,"Define",A="HI:Define"$.
//These might be in the Adam task.
DefineLoad("ST_YES_NO","(Yes or No)");
DefineLoad("ST_EXIT","Exit");
DefineLstLoad("ST_NO_YES_LST","No\0Yes\0");
//New strings might be loaded for each user
//to override.
@@ -18,7 +15,6 @@ if (YorN) {
DefineLstLoad("ST_NO_YES_LST","No\0Si\0");
}
Bool Quit()
{
Bool result;
@@ -26,7 +22,7 @@ Bool Quit()
I64 i;
while (TRUE) {
"%S %S?","ST_EXIT","ST_YES_NO";
st=MGetS;
st=GetStr;
i=DefineMatch(st,"ST_NO_YES_LST",LMF_IGNORE_CASE);
if (i>=0) {
result=i;