Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-18 21:29:19 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Friendlier error for bad trace command (issue #733).

Browse source
This commit is contained in:
Alex Shinn 2021-03-23 12:13:09 +09:00
parent 969f24db96
commit 70af1d6394
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
main.c
View file

@ -517,6 +517,10 @@ sexp run_main (int argc, char **argv) {
#if SEXP_USE_MODULES #if SEXP_USE_MODULES
check_nonull_arg('t', arg); check_nonull_arg('t', arg);
suffix = strrchr(arg, '.'); suffix = strrchr(arg, '.');
if (suffix == NULL) {
fprintf(stderr, "trace expected: -t module.name.binding, e.g. srfi.1.iota, but got %s\n", arg);
break;
}
sym = sexp_intern(ctx, suffix + 1, -1); sym = sexp_intern(ctx, suffix + 1, -1);
*(char*)suffix = '\0'; *(char*)suffix = '\0';
impmod = make_import(sexp_trace_prefix, arg, sexp_trace_suffix); impmod = make_import(sexp_trace_prefix, arg, sexp_trace_suffix);