Added missing boolean operator: XOR.
This commit is contained in:
parent
41bad3d8c4
commit
e3a03806e4
|
@ -65,7 +65,7 @@ List.iter (fun (str,tok) -> Hashtbl.add keyword_table str tok) [
|
||||||
"mod", INFIX3("mod");
|
"mod", INFIX3("mod");
|
||||||
"land", INFIX3("land");
|
"land", INFIX3("land");
|
||||||
"lor", INFIX2("lor");
|
"lor", INFIX2("lor");
|
||||||
"lxor", INFIX2("lxor");
|
"xor", INFIX2("xor");
|
||||||
"lsl", INFIX4("lsl");
|
"lsl", INFIX4("lsl");
|
||||||
"lsr", INFIX4("lsr");
|
"lsr", INFIX4("lsr");
|
||||||
"asr", INFIX4("asr")
|
"asr", INFIX4("asr")
|
||||||
|
|
|
@ -23,6 +23,7 @@ val fun (>)(int;int) returns (bool)
|
||||||
val fun (>.)(float;float) returns (bool)
|
val fun (>.)(float;float) returns (bool)
|
||||||
val fun (not)(bool) returns (bool)
|
val fun (not)(bool) returns (bool)
|
||||||
val fun (or)(bool;bool) returns (bool)
|
val fun (or)(bool;bool) returns (bool)
|
||||||
|
val fun (xor)(bool;bool) returns (bool)
|
||||||
val fun (~-)(int) returns (int)
|
val fun (~-)(int) returns (int)
|
||||||
val fun (~-.)(float) returns (float)
|
val fun (~-.)(float) returns (float)
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue