rishi/scryer-prolog
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Extend alnum, add forgotten graphic_token

Browse Source
This commit is contained in:
notoria
2021-03-17 20:47:09 +01:00
parent 51424aed32
commit f4be0cf4b3
2 changed files with 8 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/lib/charsio.pl
View File

@@ -81,6 +81,7 @@ char_type(Char, Type) :-
ctype(alnum). ctype(alnum).
ctype(alpha). ctype(alpha).
ctype(alphabetic). ctype(alphabetic).
ctype(alphanumeric).
ctype(ascii). ctype(ascii).
ctype(ascii_graphic). ctype(ascii_graphic).
ctype(ascii_punctuation). ctype(ascii_punctuation).
@@ -89,6 +90,7 @@ ctype(control).
ctype(decimal_digit). ctype(decimal_digit).
ctype(exponent). ctype(exponent).
ctype(graphic). ctype(graphic).
ctype(graphic_token).
ctype(hexadecimal_digit). ctype(hexadecimal_digit).
ctype(layout). ctype(layout).
ctype(lower). ctype(lower).

12
src/machine/system_calls.rs
View File

@@ -1,10 +1,10 @@
use prolog_parser::ast::*; use prolog_parser::ast::*;
use prolog_parser::parser::*; use prolog_parser::parser::*;
use prolog_parser::{ use prolog_parser::{
alpha_char, binary_digit_char, clause_name, decimal_digit_char, exponent_char, graphic_char, alpha_char, alpha_numeric_char, binary_digit_char, clause_name, decimal_digit_char,
graphic_token_char, hexadecimal_digit_char, layout_char, meta_char, new_line_char, exponent_char, graphic_char, graphic_token_char, hexadecimal_digit_char, layout_char,
octal_digit_char, prolog_char, sign_char, solo_char, symbolic_control_char, meta_char, new_line_char, octal_digit_char, prolog_char, sign_char, solo_char,
symbolic_hexadecimal_char, temp_v, symbolic_control_char, symbolic_hexadecimal_char, temp_v,
}; };
use lazy_static::lazy_static; use lazy_static::lazy_static;
@@ -1810,7 +1810,7 @@ impl MachineState {
macro_check!(alpha_char, "alpha"); macro_check!(alpha_char, "alpha");
macro_check!(decimal_digit_char, "decimal_digit"); macro_check!(decimal_digit_char, "decimal_digit");
// macro_check!(decimal_point_char, "decimal_point"); // macro_check!(decimal_point_char, "decimal_point");
// macro_check!(alpha_numeric_char, "alnum"); macro_check!(alpha_numeric_char, "alnum");
// macro_check!(cut_char, "cut"); // macro_check!(cut_char, "cut");
// macro_check!(semicolon_char, "semicolon"); // macro_check!(semicolon_char, "semicolon");
// macro_check!(backslash_char, "backslash"); // macro_check!(backslash_char, "backslash");
@@ -1824,7 +1824,7 @@ impl MachineState {
method_check!(is_lowercase, "lower"); method_check!(is_lowercase, "lower");
method_check!(is_uppercase, "upper"); method_check!(is_uppercase, "upper");
method_check!(is_whitespace, "whitespace"); method_check!(is_whitespace, "whitespace");
method_check!(is_alphanumeric, "alnum"); method_check!(is_alphanumeric, "alphanumeric");
method_check!(is_control, "control"); method_check!(is_control, "control");
method_check!(is_numeric, "numeric"); method_check!(is_numeric, "numeric");
method_check!(is_ascii, "ascii"); method_check!(is_ascii, "ascii");