15 lines
299 B
Plaintext
15 lines
299 B
Plaintext
|
|
// 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 null do
|
|
rot
|
|
if else
|
|
"Assert failed: \"" eputs eputs
|
|
"\". Exiting!\n" eputs
|
|
1 exit
|
|
end
|
|
end |