1.1 --- a/src/Pure/General/scan.ML	Mon May 31 19:36:13 2010 +0200
     1.2 +++ b/src/Pure/General/scan.ML	Mon May 31 21:06:57 2010 +0200
     1.3 @@ -322,5 +322,5 @@
     1.4  
     1.5  end;
     1.6  
     1.7 -structure BasicScan: BASIC_SCAN = Scan;
     1.8 -open BasicScan;
     1.9 +structure Basic_Scan: BASIC_SCAN = Scan;
    1.10 +open Basic_Scan;