diff options
Diffstat (limited to 'gr-run-waveform/gr-run-waveform.cc')
| -rw-r--r-- | gr-run-waveform/gr-run-waveform.cc | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/gr-run-waveform/gr-run-waveform.cc b/gr-run-waveform/gr-run-waveform.cc index b5bf75a99..ac81b0eaa 100644 --- a/gr-run-waveform/gr-run-waveform.cc +++ b/gr-run-waveform/gr-run-waveform.cc @@ -27,11 +27,10 @@ #include "xyzzy.h" /* - * Load and run a waveform defined with define-waveform + * Load and run a waveform defined using define-waveform * usage: gr-run-waveform filename.wfd [args...] */ - static bool prepend_to_env(const char *name, const char *value) { @@ -73,10 +72,14 @@ static const char *code = "\ static void inner_main (void *data, int argc, char **argv) { + // Load pseudo filesystem if (!xyzzy_init(0)) // use compiled-in install path exit(1); + // Initialize our gsubrs scm_xyzzy_init(); + + // Override standard code with our gsubrs and and run our app scm_c_eval_string(code); } |