Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
cells
cells
Commits
5757b002
Commit
5757b002
authored
Apr 13, 2008
by
Peter Hildebrandt
Browse files
Fixed ensure-value-is-current, now works with my code.
parent
21ebc573
Changes
1
Hide whitespace changes
Inline
Side-by-side
md-slot-value.lisp
View file @
5757b002
...
...
@@ -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
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment