Commit 5757b002 authored by Peter Hildebrandt's avatar Peter Hildebrandt
Browse files

Fixed ensure-value-is-current, now works with my code.

parent 21ebc573
......@@ -79,7 +79,7 @@ See the Lisp Lesser GNU Public License for more details.
;; (trc c "ensure-value-is-current > entry" c (c-state c) :now-pulse *data-pulse-id* debug-id ensurer)
(when *not-to-be*
(return-from ensure-value-is-current t))
(return-from ensure-value-is-current (c-value c)))
(when (and (not (symbolp (c-model c)))(eq :eternal-rest (md-state (c-model c))))
(break "model ~a of cell ~a is dead" (c-model c) c))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment