From 3e64c8dab172600d94a5d0fff5d858ffae428d65 Mon Sep 17 00:00:00 2001
From: Denis Tereshkin <denis@kasan.ws>
Date: Wed, 5 Oct 2016 15:55:39 +0700
Subject: [PATCH] Type synonym: TickerId

---
 src/ATrade/Types.hs | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/ATrade/Types.hs b/src/ATrade/Types.hs
index 4129006..459afaa 100644
--- a/src/ATrade/Types.hs
+++ b/src/ATrade/Types.hs
@@ -1,6 +1,7 @@
 {-# LANGUAGE OverloadedStrings, TypeSynonymInstances, FlexibleInstances #-}
 
 module ATrade.Types (
+  TickerId,
   Tick(..),
   DataType(..),
   serializeTick,
@@ -32,6 +33,8 @@ import Data.Text.Encoding as E
 import Data.Time.Clock
 import Data.Word
 
+type TickerId = T.Text
+
 data DataType = Unknown
   | Price
   | OpenInterest