version 1.28, 2025/05/20 14:36:06
|
version 1.31, 2025/05/20 18:07:41
|
Line 24
|
Line 24
|
* along with FreeM. If not, see <https://www.gnu.org/licenses/>. |
* along with FreeM. If not, see <https://www.gnu.org/licenses/>. |
* |
* |
* $Log$ |
* $Log$ |
|
* Revision 1.31 2025/05/20 18:07:41 snw |
|
* Add completion to debugger |
|
* |
|
* Revision 1.30 2025/05/20 16:20:42 snw |
|
* Update ROUTINE SSVN after ZEDIT and ZSAVE |
|
* |
|
* Revision 1.29 2025/05/20 14:56:56 snw |
|
* Fix direct-mode interface to online help |
|
* |
* Revision 1.28 2025/05/20 14:36:06 snw |
* Revision 1.28 2025/05/20 14:36:06 snw |
* Documentation updates; raise ZCMMND instead of NOSTAND for restricted_mode restrictions |
* Documentation updates; raise ZCMMND instead of NOSTAND for restricted_mode restrictions |
* |
* |
Line 322 char **command_completion(const char *te
|
Line 331 char **command_completion(const char *te
|
{ |
{ |
if (start > 0) return NULL; |
if (start > 0) return NULL; |
rl_attempted_completion_over = 1; |
rl_attempted_completion_over = 1; |
return rl_completion_matches(text, command_generator); |
return rl_completion_matches (text, command_generator); |
} |
} |
|
|
char *command_generator(const char *text, int state) |
char *command_generator(const char *text, int state) |
Line 332 char *command_generator(const char *text
|
Line 341 char *command_generator(const char *text
|
|
|
if (!state) { |
if (!state) { |
list_index = 0; |
list_index = 0; |
len = strlen(text); |
len = strlen (text); |
} |
} |
|
|
while ((name = m_commands[list_index++])) { |
while ((name = m_commands[list_index++])) { |
if (strncmp(name, text, len) == 0) { |
if (strncmp (name, text, len) == 0) { |
return strdup(name); |
return strdup (name); |
} |
} |
} |
} |
|
|
Line 5622 zgo:
|
Line 5631 zgo:
|
} |
} |
|
|
zsave (varnam); |
zsave (varnam); |
|
ssvn_routine_update (); |
break; |
break; |
|
|
|
|
Line 7494 direct_mode:
|
Line 7504 direct_mode:
|
char kb[20]; |
char kb[20]; |
char db[STRLEN]; |
char db[STRLEN]; |
|
|
snprintf (kb, sizeof (kb) - 1, "%%SYS.HLP\201"); |
snprintf (kb, sizeof (kb) - 1, "%%SYSHLP\201"); |
snprintf (db, STRLEN - 1, "\201"); |
snprintf (db, STRLEN - 1, "\201"); |
|
|
symtab (kill_sym, kb, db); |
symtab (kill_sym, kb, db); |