retrie-0.1.0.0: tests/inputs/Types2.test
# Copyright (c) Facebook, Inc. and its affiliates.
#
# This source code is licensed under the MIT license found in the
# LICENSE file in the root directory of this source tree.
#
--type-forward Types2.Foo
--type-forward Types2.MyMaybe
===
module Types2 where
-bleh :: HashMap Foo Foo
+bleh :: HashMap (Either String Bar) (Either String Bar)
bleh = HashMap.empty
-blech :: Maybe Foo
+blech :: Maybe (Either String Bar)
blech = Just 54
-blech2 :: MyMaybe Bar
+blech2 :: Maybe Bar
blech2 = blech
type Foo = Either String Bar
type Bar = Int
type MyMaybe a = Maybe a