如何通過模板創建數據Haskell

Question

我可以通過模板Haskell創建數據haskell。數據，如：

data Shape = Circle [Float] Double Int 

我想編寫一個程序，它創建數據，然後使用它

Answer 1

下面是一個小例子（對不起，我從來沒有想出如何使模板哈斯克爾看起來很漂亮）。 ...

首先，創建一個庫文件（這不是可選的，TH要求你在一個單獨的文件中定義表達式）。

module DataDefinition where 

import Language.Haskell.TH 

dataDef::DecsQ 
dataDef = do 
    return $ --the following is the definition "data Shape = Circle Float | Square" 
     [DataD 
       [] 
       (mkName "shape") 
       [] 
       [ 
         NormalC (mkName "circle") 
           [(NotStrict, ConT (mkName "Float"))], 
         NormalC (mkName "Square") [] 
       ] 
       [] 
     ] 

然後，使用這樣的

module Main where 

import DataDefinition 

$(dataDef) --This defines Shape 

main = do 
    let x = Circle 1.0 --Now you can define and use Shape like any other data def.... 
    return() 

---

預算外

您可以在DataD創造，最後一個空數組推導情況下填補....嘗試改變[]至

  [mkName "Show"] 

並且可以打印輸出的主要....

main = do 
    let x = Circle 1.0 
    print x