experiment: Change function_co... to fa_co...

nomasystems · Feb 5, 2024 · 9a3f5f0 · 9a3f5f0
1 parent bcb21dd
commit 9a3f5f0
Show file tree

Hide file tree

Showing 2 changed files with 17 additions and 17 deletions.
diff --git a/src/ndto_generator.erl b/src/ndto_generator.erl
@@ -189,7 +189,7 @@ is_valid(Prefix, #{type := string} = Schema) ->
         erl_syntax:clause(
             [erl_syntax:variable('Val')],
             type_guard(string),
-            chain_conditions(FunName, {function_condition, BodyFunPieces}, 'andalso')
+            chain_conditions(FunName, {fa_condition, BodyFunPieces}, 'andalso')
         ),
     FalseClause = false_clause(<<FunName/binary, ".type">>, "Value is not a string"),
     Clauses = clauses([OptionalClause, NullClause, TrueClause, FalseClause]),
@@ -239,7 +239,7 @@ is_valid(Prefix, #{type := integer} = Schema) ->
         erl_syntax:clause(
             [erl_syntax:variable('Val')],
             type_guard(integer),
-            chain_conditions(FunName, {function_condition, BodyFunPieces}, 'andalso')
+            chain_conditions(FunName, {fa_condition, BodyFunPieces}, 'andalso')
         ),
     FalseClause = false_clause(<<FunName/binary, ".type">>, "Value is not an integer"),
     Clauses = clauses([OptionalClause, NullClause, TrueClause, FalseClause]),
@@ -289,7 +289,7 @@ is_valid(Prefix, #{type := float} = Schema) ->
         erl_syntax:clause(
             [erl_syntax:variable('Val')],
             type_guard(float),
-            chain_conditions(Prefix, {function_condition, BodyFunPieces}, 'andalso')
+            chain_conditions(Prefix, {fa_condition, BodyFunPieces}, 'andalso')
         ),
     FalseClause = false_clause(<<FunName/binary, ".type">>, "Value is not a float"),
     Clauses = clauses([OptionalClause, NullClause, TrueClause, FalseClause]),
@@ -361,7 +361,7 @@ is_valid(Prefix, #{type := array} = Schema) ->
         erl_syntax:clause(
             [erl_syntax:variable('Val')],
             type_guard(array),
-            chain_conditions(Prefix, {function_condition, BodyFunPieces}, 'andalso')
+            chain_conditions(Prefix, {fa_condition, BodyFunPieces}, 'andalso')
         ),
     FalseClause = false_clause(<<FunName/binary, ".type">>, "Value is not an array"),
     Clauses = clauses([OptionalClause, NullClause, TrueClause, FalseClause]),
@@ -418,7 +418,7 @@ is_valid(Prefix, #{type := object} = Schema) ->
         erl_syntax:clause(
             [erl_syntax:variable('Val')],
             type_guard(object),
-            chain_conditions(FunName, {function_condition, BodyFunPieces}, 'andalso')
+            chain_conditions(FunName, {fa_condition, BodyFunPieces}, 'andalso')
         ),
     FalseClause = false_clause(<<FunName/binary, ".type">>, "Value is not an object"),
     Clauses = clauses([OptionalClause, NullClause, TrueClause, FalseClause]),
@@ -461,7 +461,7 @@ is_valid(Prefix, #{one_of := Subschemas} = Schema) when is_list(Subschemas) ->
         erl_syntax:clause(
             [erl_syntax:variable('Val')],
             none,
-            chain_conditions(FunName, {function_condition, BodyFunPieces}, 'xor', true)
+            chain_conditions(FunName, {fa_condition, BodyFunPieces}, 'xor', true)
         ),
     Clauses = clauses([OptionalClause, NullClause, TrueClause]),
     Fun = erl_syntax:function(
@@ -504,7 +504,7 @@ is_valid(Prefix, #{any_of := Subschemas} = Schema) when is_list(Subschemas) ->
         erl_syntax:clause(
             [erl_syntax:variable('Val')],
             none,
-            chain_conditions(FunName, {function_condition, BodyFunPieces}, 'orelse', true)
+            chain_conditions(FunName, {fa_condition, BodyFunPieces}, 'orelse', true)
         ),
     Clauses = clauses([OptionalClause, NullClause, TrueClause]),
     Fun = erl_syntax:function(
@@ -547,7 +547,7 @@ is_valid(Prefix, #{all_of := Subschemas} = Schema) when is_list(Subschemas) ->
         erl_syntax:clause(
             [erl_syntax:variable('Val')],
             none,
-            chain_conditions(FunName, {function_condition, BodyFunPieces}, 'andalso', true)
+            chain_conditions(FunName, {fa_condition, BodyFunPieces}, 'andalso', true)
         ),
     Clauses = clauses([OptionalClause, NullClause, TrueClause]),
     Fun = erl_syntax:function(
@@ -1223,7 +1223,7 @@ is_valid_object(Prefix, properties, #{properties := Properties}) ->
         Properties
     ),
     FunPieces = object_properties_fun_pieces(PropertiesFuns),
-    FunBody = chain_conditions(FunName, {function_condition, FunPieces}, 'andalso'),
+    FunBody = chain_conditions(FunName, {fa_condition, FunPieces}, 'andalso'),
 
     TrueClause = erl_syntax:clause(
         [erl_syntax:variable('Val')],

diff --git a/src/ndto_utils.erl b/src/ndto_utils.erl
@@ -27,8 +27,8 @@
 %%%-----------------------------------------------------------------------------
 -spec evaluate_conditions(FunctionName, Conditions, EvaluateMode, IsSchemaComposition) -> Resp when
     FunctionName :: atom(),
-    Conditions :: {function_condition, [FArgCondition]} | {fun_condition, [FunCondition]},
-    FArgCondition :: {FunctionName, Argument},
+    Conditions :: {fa_condition, [FACondition]} | {fun_condition, [FunCondition]},
+    FACondition :: {FunctionName, Argument},
     FunctionName :: atom(),
     Argument :: term(),
     FunCondition :: function(),
@@ -170,22 +170,22 @@ internal_evaluate_andalso(ConditionsType, Conditions) ->
 
 internal_evaluate_andalso(fun_condition, [Fun | Rest], Acc) ->
     next_evaluate_andalso(fun_condition, Fun(), Rest, Acc);
-internal_evaluate_andalso(function_condition, [{Function, Args} | Rest], Acc) ->
-    next_evaluate_andalso(function_condition, Function(Args), Rest, Acc).
+internal_evaluate_andalso(fa_condition, [{Function, Args} | Rest], Acc) ->
+    next_evaluate_andalso(fa_condition, Function(Args), Rest, Acc).
 
 internal_evaluate_orelse(fun_condition, [Fun | Rest]) ->
     next_evaluate_orelse(fun_condition, Fun(), Rest);
-internal_evaluate_orelse(function_condition, [{Function, Args} | Rest]) ->
-    next_evaluate_orelse(function_condition, Function(Args), Rest).
+internal_evaluate_orelse(fa_condition, [{Function, Args} | Rest]) ->
+    next_evaluate_orelse(fa_condition, Function(Args), Rest).
 
 internal_evaluate_xor(ConditionsType, Conditions) ->
     FirstConditionIndex = length(Conditions) - 1,
     internal_evaluate_xor(ConditionsType, Conditions, {FirstConditionIndex, []}).
 
 internal_evaluate_xor(fun_condition, [Fun | Rest], Acc) ->
     next_evaluate_xor(fun_condition, Fun(), Rest, Acc);
-internal_evaluate_xor(function_condition, [{Function, Args} | Rest], Acc) ->
-    next_evaluate_xor(function_condition, Function(Args), Rest, Acc).
+internal_evaluate_xor(fa_condition, [{Function, Args} | Rest], Acc) ->
+    next_evaluate_xor(fa_condition, Function(Args), Rest, Acc).
 
 next_evaluate_andalso(_ConditionsType, true, [], _ConditionIndex) ->
     true;