Rename Order -> Ordering

This commit is contained in:
greg 2019-02-10 07:06:30 -08:00
parent a80e1bd706
commit 42a801d346
2 changed files with 4 additions and 4 deletions

View File

@ -127,6 +127,6 @@ lazy_static! {
"<=" => (mk_type!(Nat -> Nat -> Bool), (), 20),
"==" => (mk_type!(Nat -> Nat -> Bool), (), 20),
"=" => (mk_type!(Unit), (), 20), //TODO not sure what the type of this should be b/c special fmr
"<=>" => (mk_type!(Nat -> Nat -> Order), (), 20), //TODO figure out how to treat Order
"<=>" => (mk_type!(Nat -> Nat -> Ordering), (), 20), //TODO figure out how to treat Order
};
}

View File

@ -36,7 +36,7 @@ pub enum TypeConst {
Float,
StringT,
Bool,
Order,
Ordering,
UserDefined
}
@ -52,7 +52,7 @@ impl Type {
Const(Float) => format!("Float"),
Const(StringT) => format!("String"),
Const(Bool) => format!("Bool"),
Const(Order) => format!("Order"),
Const(Ordering) => format!("Ordering"),
_ => format!("UNKNOWN TYPE"),
}
}
@ -67,7 +67,7 @@ impl Type {
"Float" => Const(Float),
"String" => Const(StringT),
"Bool" => Const(Bool),
"Order" => Const(Order),
"Ordering" => Const(Ordering),
_ => return None
})
}