| 809 | ==================================================================== */ |
| 810 | |
| 811 | void init_built_in_rhs_functions(agent* thisAgent) |
| 812 | { |
| 813 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "write"), write_rhs_function_code, |
| 814 | -1, false, true, 0); |
| 815 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "crlf"), crlf_rhs_function_code, |
| 816 | 0, true, false, 0); |
| 817 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "halt"), halt_rhs_function_code, |
| 818 | 0, false, true, 0); |
| 819 | /* |
| 820 | Replaced with a gSKI rhs function |
| 821 | add_rhs_function (thisAgent, make_str_constant (thisAgent, "interrupt"), |
| 822 | interrupt_rhs_function_code, |
| 823 | 0, false, true, 0); |
| 824 | */ |
| 825 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "make-constant-symbol"), |
| 826 | make_constant_symbol_rhs_function_code, |
| 827 | -1, true, false, 0); |
| 828 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "timestamp"), |
| 829 | timestamp_rhs_function_code, |
| 830 | 0, true, false, 0); |
| 831 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "accept"), accept_rhs_function_code, |
| 832 | 0, true, false, 0); |
| 833 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "trim"), |
| 834 | trim_rhs_function_code, |
| 835 | 1, |
| 836 | true, |
| 837 | false, |
| 838 | 0); |
| 839 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "capitalize-symbol"), |
| 840 | capitalize_symbol_rhs_function_code, |
| 841 | 1, |
| 842 | true, |
| 843 | false, |
| 844 | 0); |
| 845 | /* AGR 520 begin */ |
| 846 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "ifeq"), ifeq_rhs_function_code, |
| 847 | 4, true, false, 0); |
| 848 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "strlen"), strlen_rhs_function_code, |
| 849 | 1, true, false, 0); |
| 850 | /* AGR 520 end */ |
| 851 | |
| 852 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "dont-learn"), |
| 853 | dont_learn_rhs_function_code, |
| 854 | 1, false, true, 0); |
| 855 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "force-learn"), |
| 856 | force_learn_rhs_function_code, |
| 857 | 1, false, true, 0); |
| 858 | |
| 859 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "deep-copy"), |
| 860 | deep_copy_rhs_function_code, |
| 861 | 1, true, false, 0); |
| 862 | |
| 863 | add_rhs_function(thisAgent, make_str_constant(thisAgent, "count"), |
| 864 | count_rhs_function_code, |
| 865 | -1, false, true, 0); |
| 866 | |
| 867 | init_built_in_rhs_math_functions(thisAgent); |
| 868 | } |
no test coverage detected