# HG changeset patch # User huffman # Date 1324985831 -3600 # Node ID d7cc533ae60df6f458859fc6283ae56dcdd8c5d1 # Parent 13392893ea121d1ecf61597669b5f71f42b72383 remove redundant syntax declaration diff -r 13392893ea12 -r d7cc533ae60d src/HOL/Word/Word.thy --- a/src/HOL/Word/Word.thy Tue Dec 27 12:27:06 2011 +0100 +++ b/src/HOL/Word/Word.thy Tue Dec 27 12:37:11 2011 +0100 @@ -115,8 +115,6 @@ definition word_int_case :: "(int => 'b) => ('a :: len0 word) => 'b" where "word_int_case f w = f (uint w)" -syntax - of_int :: "int => 'a" translations "case x of CONST of_int y => b" == "CONST word_int_case (%y. b) x"