update to LTS-13.13

Author: eboasson

dds/src/DDS/Core.hs

@@ -287,9 +287,9 @@ getBuiltinReader name dp@(Participant idp)
   | not (isBuiltinTopic name) = error $ name ++ " is not a supported built-in topic"
   | otherwise = do
       builtinSub <- liftIO $ R.getBuiltinSubscriber idp
-      Just ird <- liftIO $ R.lookupDataReader builtinSub name
+      mird <- liftIO $ R.lookupDataReader builtinSub name
       tp <- findTopic 0.0 name dp
-      return $ Reader (Subscriber dp builtinSub) tp (topicType tp) ird
+      return $ Reader (Subscriber dp builtinSub) tp (topicType tp) (fromJust mird)
 
 -- | This function yields the type definition for the topic
 topicType :: Topic a -> U.TopicType

stack.yaml

@@ -15,8 +15,8 @@
 # resolver:
 #  name: custom-snapshot
 #  location: "./custom-snapshot.yaml"
-#resolver: nightly-2018-06-05
-resolver: lts-12.12
+#resolver: nightly-2018-10-21
+resolver: lts-13.13
 
 # User packages to be built.
 # Various formats can be used as shown in the example below.
@@ -39,6 +39,9 @@ resolver: lts-12.12
 packages:
 - dds
 - dds-examples
+- cars
+- Fuj
+- FujOld
 # Dependency packages to be pulled from upstream that are not in the resolver
 # (e.g., acme-missiles-0.3)
 extra-deps: []