bolt9

Lightning feature flags, per BOLT #9 (docs.ppad.tech/bolt9).
git clone git://git.ppad.tech/bolt9.git
Log | Files | Refs | README | LICENSE

Weight.hs (694B)


      1 module Main where
      2 
      3 import qualified Lightning.Protocol.BOLT9 as B9
      4 import Weigh
      5 import Fixtures
      6 
      7 main :: IO ()
      8 main = mainWith $ do
      9   func "union" (B9.union typical) large
     10   func "set_feature" (B9.set_feature B9.OptionSplice B9.Optional) typical
     11   func "set_feature_with_deps"
     12     (B9.set_feature_with_deps B9.OptionZeroconf B9.Optional) B9.empty
     13   func "list_features" B9.list_features typical
     14   func "validate_local (init)" (B9.validate_local B9.InitContext) typical
     15   func "validate_remote (init)" (B9.validate_remote B9.InitContext) typical
     16   func "validate_remote (init, 64 bytes)"
     17     (B9.validate_remote B9.InitContext) large
     18   func "channel_type" B9.channel_type zeroconf_type_features