From 0c0b42e6753fd6637f90b95bb18df92f75376332 Mon Sep 17 00:00:00 2001
From: Andrew Martin <andrew.thaddeus@gmail.com>
Date: Fri, 5 Jul 2019 10:11:28 -0400
Subject: [PATCH] add test for Int64 decimal builder

---
 test/Main.hs | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/test/Main.hs b/test/Main.hs
index d2c4f7b..7714c57 100644
--- a/test/Main.hs
+++ b/test/Main.hs
@@ -32,6 +32,10 @@ tests = testGroup "Tests"
       run 1 (word64Dec x <> word64Dec y <> word64Dec z)
       ===
       pack (show x ++ show y ++ show z)
+  , TQC.testProperty "int64Dec-x3" $ \x y z ->
+      run 1 (int64Dec x <> int64Dec y <> int64Dec z)
+      ===
+      pack (show x ++ show y ++ show z)
   , TQC.testProperty "word64BE-x3" $ \x y z ->
       run 1 (word64BE x <> word64BE y <> word64BE z)
       ===