facts_with.kc3

Branch :

Show log
Commit
Author : Thomas de Grivel
Date : 2024-10-08 01:51:37
Hash : 085a215d
Message : test/ikc3/facts_with

test/ikc3/facts_with.kc3

quote Facts.with(Facts.env_db(), [[KC3, :operator, op = ?],
                                  [op, :sym, sym = ?]], fn (fact) do
  puts("#{inspect(op)} #{inspect(sym)}")
  1
end)
Facts.with(Facts.env_db(), [[KC3, :operator, op = ?],
                            [op, :sym, sym = ?]], fn (fact) do
  puts("#{inspect(op)} #{inspect(sym)}")
  1
end)
quote Facts.with(Facts.env_db(), [[KC3, :operator, op = ?],
                            [op, rel = ?, value = ?]], fn (fact) do
  puts("#{inspect(op)} #{inspect(rel)} #{inspect(value)}")
  2
end)
Facts.with(Facts.env_db(), [[KC3, :operator, op = ?],
                            [op, rel = ?, value = ?]], fn (fact) do
  puts("#{inspect(op)} #{inspect(rel)} #{inspect(value)}")
  2
end)

kc3-lang/kc3/test/ikc3/facts_with.kc3

Commit

kc3-lang/kc3 /test/ikc3/facts_with.kc3