author | wenzelm |
Wed, 03 Feb 1999 16:46:56 +0100 | |
changeset 6191 | 381b27ca0543 |
parent 6190 | f0c14e527d68 |
child 6192 | a42dbf1af868 |
src/Pure/sign.ML | file | annotate | diff | comparison | revisions |
--- a/src/Pure/sign.ML Wed Feb 03 16:46:31 1999 +0100 +++ b/src/Pure/sign.ML Wed Feb 03 16:46:56 1999 +0100 @@ -130,7 +130,7 @@ val class_of_const: string -> class end; -signature SIGN_PRIVATE = +signature PRIVATE_SIGN = sig include SIGN val init_data: Object.kind * (Object.T * (Object.T -> Object.T) * @@ -140,7 +140,7 @@ val print_data: Object.kind -> sg -> unit end; -structure Sign: SIGN_PRIVATE = +structure Sign: PRIVATE_SIGN = struct