suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

use `assert' around a debugging check

Browse Source
This commit is contained in:
Matthew Flatt 2010-12-13 14:52:56 -07:00
parent dae1543255
commit 39c6fe02d7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/mred/private/wxme/mline.rkt
View File

@ -948,7 +948,7 @@ Debugging tools:
(if (has-flag? (snip->flags asnip) NEWLINE) (if (has-flag? (snip->flags asnip) NEWLINE)
(begin (begin
(do-new-line asnip) (do-new-line asnip)
(send media consistent-snip-lines 'post-do-new-line) (assert (send media consistent-snip-lines 'post-do-new-line))
#t) #t)
(begin (begin
(set-snip-line! asnip mline) (set-snip-line! asnip mline)