separate :exit-state and :register-exit-signal-hook

jsk-ros-pkg · Dec 6, 2022 · 5ed8344 · 5ed8344
1 parent 7291a4f
commit 5ed8344
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/roseus_smach/src/state-machine-ros.l b/roseus_smach/src/state-machine-ros.l
@@ -141,9 +141,9 @@
      ;; TODO apply userdata
      (setq init-tm (ros::time-now))
      ))
+  (:exit-state () exit-state)
   (:register-exit-signal-hook
-    (&optional es userdata exit-signal-hook-func)
-    (if (null es) (return-from :exit-state exit-state))
+    (es userdata exit-signal-hook-func)
     (if (null (derivedp es state))
       (setq es (send self :state-machine :node es)))
     ;; update exit-state slot