clipsruby 0.0.27 → 0.0.29

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 78727d42b56ea442a2ff5b487d3cc209bcfda2068724a7507021fa44845dee9c
-  data.tar.gz: f22f44dc57cdf4d8e1491b1b9790c45a15264b9fcad34b3b768e6deb9655a475
+  metadata.gz: 305eb61d4442d705a0e3cf576056151266170cd5a3c8e67d2c2d01efe65ed540
+  data.tar.gz: 2de8f8f91cfc7c529239f1fbbd8f7701bfc08ff24e7576a162ab4d4bd3111f18
 SHA512:
-  metadata.gz: abd28dcfe9303c838636a209fdcd1d043ae7c0fa72b84ae49ea52c2e79aed9f2d65c58cd02746cdfd9bc4230476dcb4289ea32cc36f2e335ba54371008146e3b
-  data.tar.gz: a9dd833a9d045713eb20ab356d65bb80c7a61d528518f5b7dd83482a059042a3499f3fb33f06259ab667af3fc2dea22102bcb103acf50f41900537301980d5d0
+  metadata.gz: 271deb181e3aea58a76b104ac876e6130be561e56261175bcb9ef0ddb334a7ebbeda13a3e2d964c0291fe4b47d2f3f806c83d09dae90efe50bd57aca718bc41e
+  data.tar.gz: 64a925ca77540df3b8b77ce15004369f478431909fcb6a7ffc4fd4f9f516e67362ddd5b4a0012832cf3e64ba54051fca16b870a37784ce01cf3cdcf66e4a4653

data/README.md

@@ -312,6 +312,16 @@ CLIPS::Environment::Fact.pp_form(fact)
 fact.pp_form
 ```
 
+### `CLIPS::Environment::Fact.existp`
+### `CLIPS::Environment::Fact#existp`
+
+Returns a boolean representing whether or not a Fact has been retracted
+
+```ruby
+CLIPS::Environment::Fact.existp(fact)
+fact.existp
+```
+
 ### `CLIPS::Environment::Fact.to_h`
 ### `CLIPS::Environment::Fact#to_h`
 
@@ -601,6 +611,18 @@ CLIPS::Environment::Deftemplate.is_deletable(deftemplate)
 deftemplate.is_deletable
 ```
 
+### `CLIPS::Environment::Deftemplate.is_implied`
+### `CLIPS::Environment::Deftemplate#is_implied`
+
+Returns a boolean whether the Deftemplate is implied or not.
+If the fact is an ordered fact, the Deftemplate is implied.
+Otherwise, the Deftemplate is considered explicitly defined.
+
+```ruby
+CLIPS::Environment::Deftemplate.is_implied(deftemplate)
+deftemplate.is_implied
+```
+
 ### `CLIPS::Environment::Deftemplate.slot_allowed_values`
 ### `CLIPS::Environment::Deftemplate#slot_allowed_values`
 

data/ext/clipsruby/clipsruby.c

@@ -188,6 +188,10 @@ static VALUE clips_environment_assert_string(VALUE self, VALUE string)
 
 	Fact *fact = AssertString(env, StringValueCStr(string));
 
+	if (fact == NULL) {
+		return Qnil;
+	}
+
 	VALUE rb_fact =
 		TypedData_Wrap_Struct(rb_const_get(CLASS_OF(self), rb_intern("Fact")), &Fact_type, fact);
 
@@ -1796,6 +1800,24 @@ static VALUE clips_environment_fact_static_pp_form(int argc, VALUE *argv, VALUE
 	return toReturn;
 }
 
+static VALUE clips_environment_fact_existp(VALUE self)
+{
+	Fact *fact;
+
+	TypedData_Get_Struct(self, Fact, &Fact_type, fact);
+
+	if (FactExistp(fact)) {
+		return Qtrue;
+	} else {
+		return Qfalse;
+	}
+}
+
+static VALUE clips_environment_fact_static_existp(VALUE self, VALUE rbFact)
+{
+	return clips_environment_fact_existp(rbFact);
+}
+
 static VALUE clips_environment_get_fact_list(int argc, VALUE *argv, VALUE rbEnvironment) {
 	VALUE defmodule_or_defmodule_name;
 	Environment *env;
@@ -2092,6 +2114,24 @@ static VALUE clips_environment_deftemplate_static_is_deletable(VALUE self, VALUE
 	return clips_environment_deftemplate_is_deletable(rbDeftemplate);
 }
 
+static VALUE clips_environment_deftemplate_is_implied(VALUE self)
+{
+	Deftemplate *deftemplate;
+
+	TypedData_Get_Struct(self, Deftemplate, &Deftemplate_type, deftemplate);
+
+	if (deftemplate->implied) {
+		return Qtrue;
+	} else {
+		return Qfalse;
+	}
+}
+
+static VALUE clips_environment_deftemplate_static_is_implied(VALUE self, VALUE rbDeftemplate)
+{
+	return clips_environment_deftemplate_is_implied(rbDeftemplate);
+}
+
 static VALUE clips_environment_deftemplate_slot_existp(VALUE self, VALUE slot_name)
 {
 	Deftemplate *deftemplate;
@@ -3081,6 +3121,8 @@ void Init_clipsruby(void)
 	rb_define_method(rbDeftemplate, "slot_multip", clips_environment_deftemplate_slot_multip, 1);
 	rb_define_singleton_method(rbDeftemplate, "slot_defaultp", clips_environment_deftemplate_static_slot_defaultp, 2);
 	rb_define_method(rbDeftemplate, "slot_defaultp", clips_environment_deftemplate_slot_defaultp, 1);
+	rb_define_singleton_method(rbDeftemplate, "is_implied", clips_environment_deftemplate_static_is_implied, 1);
+	rb_define_method(rbDeftemplate, "is_implied", clips_environment_deftemplate_is_implied, 0);
 
 	VALUE rbDefmodule = rb_define_class_under(rbEnvironment, "Defmodule", rb_cObject);
 	rb_define_alloc_func(rbDefmodule, defmodule_alloc);
@@ -3115,6 +3157,8 @@ void Init_clipsruby(void)
 	rb_define_method(rbFact, "index", clips_environment_fact_index, 0);
 	rb_define_singleton_method(rbFact, "pp_form", clips_environment_fact_static_pp_form, -1);
 	rb_define_method(rbFact, "pp_form", clips_environment_fact_pp_form, -1);
+	rb_define_singleton_method(rbFact, "existp", clips_environment_fact_static_existp, 1);
+	rb_define_method(rbFact, "existp", clips_environment_fact_existp, 0);
 
 	VALUE rbDefrule = rb_define_class_under(rbEnvironment, "Defrule", rb_cObject);
 	rb_define_alloc_func(rbDefrule, defrule_alloc);

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: clipsruby
 version: !ruby/object:Gem::Version
-  version: 0.0.27
+  version: 0.0.29
 platform: ruby
 authors:
 - Ryan Johnston
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2024-09-18 00:00:00.000000000 Z
+date: 2024-09-23 00:00:00.000000000 Z
 dependencies: []
 description: Calling the CLIPS programming language from within Ruby
 email: mrryanjohnston@gmail.com
@@ -385,7 +385,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
     - !ruby/object:Gem::Version
       version: '0'
 requirements: []
-rubygems_version: 3.5.11
+rubygems_version: 3.5.16
 signing_key:
 specification_version: 4
 summary: Calling CLIPS from within Ruby