假设我的记录(包含大量字段)定义如下:
data Sample_Record = Sample_Record { record_field1 :: Int,
record_field2 :: Int,
record_field3 :: Float
}
a = Sample_Record { record_field1 = 4,
record_field2 = 5,
record_field3 = 5.4
}
我是否可以从Sample_Record
创建一个a
类型的新记录,其中一个字段已修改过了?
答案 0 :(得分:10)
是。我们有很多方法。简单就是
foo b = b {record_field1 = 1}
> foo a
Sample_Record { record_field1 = 1,record_field2 = 5, record_field3 = 5.4 }
我们有一些扩展。 WildCards允许不使用模式中的所有记录,
{-# LANGUAGE RecordWildCards #-}
bar b@(Sample_Record {record_field1 = 1,..}) = b {record_field1 = 10}
bar b@(Sample_Record {record_field1 = 2,..}) = b {record_field1 = 20}
使用NamedFieldPuns
扩展名,我们可以将记录字段用作值,而无需额外的样板(f (C {a=a}) = a
与f (C {a}) = a
相同)
{-# LANGUAGE NamedFieldPuns #-}
baz b@(Sample_Record {record_field1, record_field2, record_field3 = 0}) =
b{ record_field3 = record_field1 + record_field2 }