--- a/src/HOLCF/FOCUS/Fstreams.thy Wed Apr 28 11:41:27 2010 +0200
+++ b/src/HOLCF/FOCUS/Fstreams.thy Wed Apr 28 12:07:52 2010 +0200
@@ -8,7 +8,7 @@
theory Fstreams imports "../ex/Stream" begin
-defaultsort type
+default_sort type
types 'a fstream = "('a lift) stream"