remove a couple printfs

This commit is contained in:
Ted Blackman 2019-08-05 14:34:53 -07:00
parent 53d9b41a80
commit 849ff5f9d9

View File

@ -2513,10 +2513,8 @@
^+ [next-bone.ossuary ossuary]
::
?^ existing=(~(get by by-duct.ossuary) duct)
~& %ames-existing-bone^u.existing
[u.existing ossuary]
::
~& %ames-next-bone^next-bone.ossuary
:- next-bone.ossuary
:+ (add 4 next-bone.ossuary)
(~(put by by-duct.ossuary) duct next-bone.ossuary)