Make THH:genSaveOpCode a bit more general
authorIustin Pop <iustin@google.com>
Thu, 8 Nov 2012 12:08:32 +0000 (13:08 +0100)
committerIustin Pop <iustin@google.com>
Mon, 12 Nov 2012 09:44:04 +0000 (10:44 +0100)
commit92ad1f44c5302da706a1b3b930854906b147097a
tree8202bbbce4598c80b5b941fa0edc2e774b25b893
parenta12f0ef8374b77a29ed52a4603e1cc1a5045c2cd
Make THH:genSaveOpCode a bit more general

This can be improved, by taking all hardcoded names as parameters, to
serve as a more-general "build save clause for a multi-constructor
data type". I'm not renaming the function as well, since I don't know
exactly how much we can abstract later.

Signed-off-by: Iustin Pop <iustin@google.com>
Reviewed-by: Helga Velroyen <helgav@google.com>
htools/Ganeti/THH.hs