Simplify the SCM

sakhnik · Nov 20, 2018 · 8ec1ceb · 8ec1ceb
1 parent 7a2b771
commit 8ec1ceb
Show file tree

Hide file tree

Showing 4 changed files with 4 additions and 8 deletions.
diff --git a/lua/gdb/backend/gdb.moon b/lua/gdb/backend/gdb.moon
@@ -13,7 +13,7 @@ class GdbScm extends BaseScm
 
         @addTrans(@paused, r([[Continuing\.]]),               m, @continue)
         @addTrans(@paused, r([[[\032]{2}([^:]+):(\d+):\d+]]), m, @jump)
-        @addTrans(@paused, r([[^\(gdb\) ]]),                  m, @query)
+        @addTrans(@paused, r([[^\(gdb\) ]]),                  m, @pause)
 
         @addTrans(@running, r([[^Breakpoint \d+]]),           m, @pause)
         @addTrans(@running, r([[ hit Breakpoint \d+]]),       m, @pause)

diff --git a/lua/gdb/backend/lldb.moon b/lua/gdb/backend/lldb.moon
@@ -13,7 +13,7 @@ class LldbScm extends BaseScm
 
         @addTrans(@paused, r([[^Process \d+ resuming]]),      m, @continue)
         @addTrans(@paused, r([[ at [\032]{2}([^:]+):(\d+)]]), m, @jump)
-        @addTrans(@paused, r([[(lldb)]]),                     m, @query)
+        @addTrans(@paused, r([[(lldb)]]),                     m, @pause)
 
         @addTrans(@running, r([[^Breakpoint \d+:]]),          m, @pause)
         @addTrans(@running, r([[^Process \d+ stopped]]),      m, @pause)

diff --git a/lua/gdb/backend/pdb.moon b/lua/gdb/backend/pdb.moon
@@ -11,7 +11,7 @@ class PdbScm extends BaseScm
     new: (...) =>
         super select(2, ...)
         @addTrans(@paused, r([[(?<!-)> ([^(]+)\((\d+)\)[^(]+\(\)]]), m, @jump)
-        @addTrans(@paused, r([[^\(Pdb\) ]]),                         m, @query)
+        @addTrans(@paused, r([[^\(Pdb\) ]]),                         m, @pause)
         @state = @paused
 
 backend =

diff --git a/lua/gdb/scm.moon b/lua/gdb/scm.moon
@@ -31,11 +31,7 @@ class BaseScm extends Scm
     jump: (file, line, ...) =>
         @win\jump(file, line)
 
-    -- Transition "paused" -> "paused": refresh breakpoints in the current file
-    query: (...) =>
-        @win\queryBreakpoints!
-
-    -- Transition "running" -> "pause"
+    -- Transition ANY -> "pause"
     pause: (...) =>
         @state = @paused
         @win\queryBreakpoints!