blob: a2d8bed8c250e4ebd3072181397bd569b4c20c57 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
# APGTVERIFY -- Print a message in the status line asking the user if they
# really want to quit, returning YES if they really want to quit, NO otherwise.
int procedure apgtverify (ch)
int ch # character keystroke command
begin
if (ch == 'q') {
return (YES)
} else if (ch == 'w') {
return (YES)
} else if (ch == 'n') {
return (NO)
} else {
return (NO)
}
end
|
