diff options
author | Eric Blossom | 2010-12-03 14:09:06 -0800 |
---|---|---|
committer | Eric Blossom | 2010-12-03 14:09:06 -0800 |
commit | c9597503e054b24ec79e6e379b2b56ffc369f3f3 (patch) | |
tree | d63710aac6386045c723864dd67eb5115d64fdf5 /gnuradio-core/src | |
parent | 9bc62cca21a0a171cbc220419af91b3d8f7e333b (diff) | |
download | gnuradio-c9597503e054b24ec79e6e379b2b56ffc369f3f3.tar.gz gnuradio-c9597503e054b24ec79e6e379b2b56ffc369f3f3.tar.bz2 gnuradio-c9597503e054b24ec79e6e379b2b56ffc369f3f3.zip |
Try to get block destructors called (fairly) early
Diffstat (limited to 'gnuradio-core/src')
-rw-r--r-- | gnuradio-core/src/guile/gnuradio/run-waveform.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gnuradio-core/src/guile/gnuradio/run-waveform.scm b/gnuradio-core/src/guile/gnuradio/run-waveform.scm index 3a2c4e6b7..01930521c 100644 --- a/gnuradio-core/src/guile/gnuradio/run-waveform.scm +++ b/gnuradio-core/src/guile/gnuradio/run-waveform.scm @@ -49,5 +49,7 @@ ;;(load-into-module waveform-filename (current-module)) (let ((f (waveform-last-registered))) (if (not f) - (error "No define-waveform found in file \n" filename) - (gr:run (f args))))) + (error "No define-waveform found in file \n" filename)) + (gr:run (f args)) + ;; Attempt to get block destructors called now. + (gc))) |