Lines Matching refs:NEWCHAR
44 TYPE NEWCHAR IS NEW CHAR; type
51 FUNCTION IDENT (CH : NEWCHAR) RETURN NEWCHAR IS
53 RETURN NEWCHAR'VAL (IDENT_INT (NEWCHAR'POS (CH)));
83 IF NEWCHAR'IMAGE ('A') /= "'A'" THEN
87 CHECK_BOUND (NEWCHAR'IMAGE ('A'), "NEWCHAR");
89 IF NEWCHAR'IMAGE ('a') /= "'a'" THEN
93 CHECK_BOUND (NEWCHAR'IMAGE ('a'), "NEWCHAR");
107 IF NEWCHAR'IMAGE (IDENT ('A')) /= "'A'" THEN
111 CHECK_BOUND (NEWCHAR'IMAGE (IDENT ('A')), "IDENT OF NEWCHAR");
113 IF NEWCHAR'IMAGE (IDENT ('a')) /= "'a'" THEN
117 CHECK_BOUND (NEWCHAR'IMAGE (IDENT ('a')), "IDENT OF NEWCHAR");
174 IF NEWCHAR'VALUE ("'A'") /= 'A' THEN
178 IF NEWCHAR'VALUE ("'a'") /= 'a' THEN
194 IF NEWCHAR'VALUE (IDENT_STR("'A'")) /= 'A' THEN
199 IF NEWCHAR'VALUE (IDENT_STR("'a'")) /= 'a' THEN