diff --git a/scmvm/debugger.scm b/scmvm/debugger.scm
index 2e427d2..8cdaa87 100644
--- a/scmvm/debugger.scm
+++ b/scmvm/debugger.scm
@@ -57,6 +57,7 @@
   (define vm (make-vm #:debugger debug))
   (vm-load-program! vm prgm)
   (set! the-debugger (make-debugger vm source (make-breakpoints symbols) #f))
+  (debugger-breakpoint-add! the-debugger 1)
   (reset (run-vm vm))
   the-debugger)