Commit f4c3ccbcae4d7e4f693811662c8567ea65c5817d

Thomas de Grivel 2024-08-08T12:07:35

fix require

diff --git a/.ikc3_history b/.ikc3_history
index dc00a27..6cd99f1 100644
--- a/.ikc3_history
+++ b/.ikc3_history
@@ -1,4 +1,3 @@
-end
 22
 server = Socket.listen("192.168.1.50
 2
@@ -97,3 +96,4 @@ HTTP.mime_type("zorglub")
 Str.rindex("abc.def", ".")
 Str.rindex_character("abc.def", '.')
 File.ext("abc.def")
+require HTTPd
diff --git a/lib/kc3/0.1/kc3.facts b/lib/kc3/0.1/kc3.facts
index 28a3450..4e2bb26 100644
--- a/lib/kc3/0.1/kc3.facts
+++ b/lib/kc3/0.1/kc3.facts
@@ -54,7 +54,7 @@ add {KC3, :operator, KC3.operator_require}
 replace {KC3.operator_require, :is_a, :operator}
 replace {KC3.operator_require, :sym, :require}
 replace {KC3.operator_require, :arity, 1}
-replace {KC3.operator_require, :symbol_value, cfn Tag "kc3_require" (List, Result)}
+replace {KC3.operator_require, :symbol_value, cfn Bool "kc3_require" (Sym)}
 replace {KC3.operator_require, :operator_precedence, 12}
 replace {KC3.operator_require, :operator_associativity, :none}
 add {KC3, :operator, KC3.operator_div}