;;; -*- logo -*-
.macro do.until :until.instr :until.cond
op se :until.instr (list "until :until.cond :until.instr)
end
bury "do.until
;;; -*- logo -*-
.macro do.until :until.instr :until.cond
op se :until.instr (list "until :until.cond :until.instr)
end
bury "do.until