src/Pure/sign.ML
changeset 6311 15652e058e28
parent 6191 381b27ca0543
child 6546 995a66249a9b
--- a/src/Pure/sign.ML	Tue Mar 09 12:05:07 1999 +0100
+++ b/src/Pure/sign.ML	Tue Mar 09 12:06:09 1999 +0100
@@ -114,7 +114,7 @@
   val add_trfunsT:
     (string * (bool -> typ -> term list -> term)) list -> sg -> sg
   val add_tokentrfuns:
-    (string * string * (string -> string * int)) list -> sg -> sg
+    (string * string * (string -> string * real)) list -> sg -> sg
   val add_trrules: (xstring * string) Syntax.trrule list -> sg -> sg
   val add_trrules_i: ast Syntax.trrule list -> sg -> sg
   val add_path: string -> sg -> sg