diff --git a/Examples/test-suite/guile/throw_exception_runme.scm b/Examples/test-suite/guile/throw_exception_runme.scm
index b91088b85..377506276 100644
--- a/Examples/test-suite/guile/throw_exception_runme.scm
+++ b/Examples/test-suite/guile/throw_exception_runme.scm
@@ -42,3 +42,4 @@
   (check-throw-error (Foo-test-cls-ptr-td foo))
   (check-throw-error (Foo-test-cls-ref-td foo)))
   			      
+(exit 0)