summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEric Blossom <eb@comsec.com>2010-12-03 22:22:06 -0800
committerEric Blossom <eb@comsec.com>2010-12-03 22:22:06 -0800
commitaceace631da21a63add224bf31004698ddaa6ea0 (patch)
tree405ce2f8e8fdbaf8e333e24d930ab2998f910811
parent20141767bab8be4f81e58148ea806e032ca9f7c4 (diff)
Comments
-rw-r--r--gr-run-waveform/gr-run-waveform.cc7
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 b5bf75a99c..ac81b0eaa8 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);
}