2010-11-09 108 views

回答

11

你在n模式匹配。


getIt :: SS -> Int 
getIt (SSliteral (SSint x)) = x 

我建议你看看lyah

+1

+1链接 – Landei 2010-11-09 09:23:51

0

我们定义与记录语法:

data SS = SSliteral { 
    ssValue :: Value 
    } 

data Value = SSint { 
    ssInt :: Int 
} 

现在我们定义

getIt :: SS -> Int 
getIt = ssInt . ssValue 

而现在我们是自由点。