Anonymous user
Arithmetic evaluation: Difference between revisions
m
→{{header|Prolog}}
Thundergnat (talk | contribs) m (Fix Perl6 -> Raku in comments) |
|||
Line 4,921:
=={{header|Prolog}}==
{{works with|SWI Prolog 8.1.19}}
<lang prolog>% Lexer
numeric(X) :- 48 =< X, X =< 57.
Line 4,965:
% Solution
calculator(String, Value) :-
lex1(Codes, Tokens1),
lex2(Tokens1, Tokens2),
parse(Tokens2, Expression),
| |||