进口例外

Question

这是我的“搜索中的元组程序列表”：

import Data.List 
    import Data.Char 
    data BookInfo = Book Int String [String] 
     deriving(Show) 

    enter :: Int->String->[String]->BookInfo 
    enter id name subject=Book id name subject 
    bookId (Book id _  _ ) = id 
    index :: BookInfo -> Int 
    index (Book id name subject) = bookId (Book id name subject) 
     arrayentering book bookList 
     | empty book = bookList 
     | otherwise = book : bookList 
     where 
     empty (Book _ name subject) = all isSpace name && all (all isSpace) subject 
     bubbleSort::(Ord t) => [t]->[t] 
     bubbleSort[x,y,z,xs]= 
       if x<y then x : [y,z,xs] 
         else y : [x,z,xs] 
     superBubble::(Ord t) =>[[t]]->[[t]] 
     superBubble a=map bubbleSort a 
     combining::[BookInfo]->[[Int]] 
     combining books=superBubble [(map index books)] 

      bsearch :: [[a]]-> a -> a -> Int 
      bsearch ms key s 

        | elemtIndex m ms = s return 9999 
        | 
        key=m elemIndex m ms 
        | 
        key<m bsearch (splitAt ms o) key o 
        | otherwise bsearch (splitAt ms (o+2)) key n 
        o<-s/2-1 
        n<-length ms 
     finalBsearch::(Ord)=> [a]->a->a->Int 
     finalBsearch ms key s= bsearch (combining ms) key s 

试图编译它会导致一个错误： ERROR line 2 - Syntax error in input (unexpected keyword "import")。

这是什么意思，我该如何解决？

Answer 1

你是否缩进这样的第二行？

import Data.List 
import Data.Char 

如果是这样，解析器会认为这是1条语句不2.