mclangc/include/util.mcl

// Assert implementation
// args: [condition, str_len, str_ptr]
// @arg condition: Bool
// @arg str_len: Int
// @arg str_ptr: Ptr
// @ret NULL/NEVER
fn assert with bool int ptr returns void then
    rot
    if else
    "Assert failed: \"" eputs eputs
    "\". Exiting!\n" eputs
    1 exit
    end
done