Carp/core/Bool.carp

13 lines
265 B
Plaintext
Raw Normal View History

2018-01-24 18:08:18 +03:00
(system-include "carp_bool.h")
2018-01-24 17:53:18 +03:00
(defmodule Bool
2017-10-20 18:00:47 +03:00
(register = (Fn [Bool Bool] Bool))
(register /= (Fn [Bool Bool] Bool))
2017-12-04 20:28:40 +03:00
(register copy (Fn [&Bool] Bool))
(register format (Fn [&String Bool] String))
)
(defmodule RefBool
(defn = [a b]
(Bool.= @a @b)))