mirror of
https://github.com/urbit/shrub.git
synced 2024-12-19 16:51:42 +03:00
f08b8ae8e5
Wrote a simple test for Ames and fixed some bugs: - Properly handle to-galaxy lanes. - Use the same socket for send and recv. Otherwise, sending happens from a different port. - Properly close the socket on shutdown. Otherwise only the first test works.
25 lines
459 B
Haskell
25 lines
459 B
Haskell
module Main (main) where
|
|
|
|
import ClassyPrelude
|
|
|
|
import Test.QuickCheck hiding ((.&.))
|
|
import Test.Tasty
|
|
import Test.Tasty.QuickCheck
|
|
import Test.Tasty.TH
|
|
|
|
import Control.Concurrent
|
|
|
|
import qualified LogTests
|
|
import qualified DeriveNounTests
|
|
import qualified ArvoTests
|
|
import qualified AmesTests
|
|
|
|
main :: IO ()
|
|
main =
|
|
defaultMain $ testGroup "Urbit"
|
|
[ -- LogTests.tests
|
|
-- , DeriveNounTests.tests
|
|
-- , ArvoTests.tests
|
|
AmesTests.tests
|
|
]
|