Skip to content

Instantly share code, notes, and snippets.

@ocharles

ocharles/gist:5237072c9a5620198e31d74baab388b8 Secret

Created December 8, 2016 12:47
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save ocharles/5237072c9a5620198e31d74baab388b8 to your computer and use it in GitHub Desktop.
Save ocharles/5237072c9a5620198e31d74baab388b8 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
<5>building path(s) ‘/nix/store/4szf92rzfdl9kgzl7i81ffa4h2v9fwxk-circuithub-api-0.0.4’
setupCompilerEnvironmentPhase
Build with /nix/store/1gknmgp8sz12cb03hp9f9p57wq729xcc-ghc-8.0.1.20161117.
unpacking sources
unpacking source archive /nix/store/dwpdbd5287zh1b0akfggx7g08hwkah32-vrfljqbi2zf9lgc6h6h9r7nzinh33xik-git-export
source root is vrfljqbi2zf9lgc6h6h9r7nzinh33xik-git-export
patching sources
compileBuildDriverPhase
setupCompileFlags: -package-db=/tmp/nix-build-circuithub-api-0.0.4.drv-0/package.conf.d -j1 -threaded
[1 of 1] Compiling Main ( /nix/store/4mdp8nhyfddh7bllbi7xszz7k9955n79-Setup.hs, /tmp/nix-build-circuithub-api-0.0.4.drv-0/Main.o )
Linking Setup ...
configuring
configureFlags: --verbose --prefix=/nix/store/4szf92rzfdl9kgzl7i81ffa4h2v9fwxk-circuithub-api-0.0.4 --libdir=$prefix/lib/$compiler --libsubdir=$pkgid --with-gcc=gcc --package-db=/tmp/nix-build-circuithub-api-0.0.4.drv-0/package.conf.d --ghc-option=-j1 --disable-split-objs --disable-library-profiling --disable-profiling --disable-shared --enable-library-vanilla --disable-executable-dynamic --disable-tests --ghc-option=-dcore-lint
Configuring circuithub-api-0.0.4...
Flags chosen: network-uri=True, library-only=False, dev=False
Dependency HsOpenSSL >=0.11.1.1: using HsOpenSSL-0.11.3.2
Dependency SHA >=1.6.4.1: using SHA-1.6.4.2
Dependency access >=0.1.3: using access-0.1.3
Dependency aeson >=0.11: using aeson-0.11.2.1
Dependency aeson-pretty >=0.7.1 && <0.9: using aeson-pretty-0.8.2
Dependency animalcase >=0.1.0.1 && <0.2: using animalcase-0.1.0.2
Dependency attoparsec >=0.13.0.1: using attoparsec-0.13.1.0
Dependency aws >=0.12.1: using aws-0.13.2
Dependency base >=4.8.0.0 && <=4.10: using base-4.9.1.0
Dependency bcrypt >=0.0.7: using bcrypt-0.0.10
Dependency bifunctors >=5: using bifunctors-5.4.1
Dependency blaze-builder >=0.3.3.2 && <0.5: using blaze-builder-0.4.0.2
Dependency blaze-html >=0.8.1.1: using blaze-html-0.8.1.2
Dependency blaze-markup >=0.7.0.3: using blaze-markup-0.7.1.0
Dependency bytestring >=0.10.4: using bytestring-0.10.8.1
Dependency case-insensitive ==1.2.*: using case-insensitive-1.2.0.7
Dependency cassava -any: using cassava-0.4.5.1
Dependency cereal >=0.4 && <0.6: using cereal-0.5.4.0
Dependency chunked-data >=0.2.0: using chunked-data-0.3.0
Dependency circuithub-api -any: using circuithub-api-0.0.4
Dependency circuithub-entities >=0.0.182: using circuithub-entities-0.0.182
Dependency circuithub-prelude >=0.0.27: using circuithub-prelude-0.0.28
Dependency clock >=0.5 && <0.8: using clock-0.7.2
Dependency comparable-key >=0.0.1: using comparable-key-0.0.1
Dependency conduit >=1.1.5 && <2.0: using conduit-1.2.8
Dependency conduit-combinators >=0.2.8.2: using conduit-combinators-1.0.8.2
Dependency conduit-extra >=1.1.0.4: using conduit-extra-1.1.15
Dependency containers ==0.5.*: using containers-0.5.7.1
Dependency cookie >=0.4.1.1: using cookie-0.4.2.1
Dependency currency ==0.2.*: using currency-0.2.0.0
Dependency data-default -any: using data-default-0.7.1.1
Dependency data-default-class >=0.0.1 && <0.2: using
data-default-class-0.1.2.0
Dependency data-list-sequences >=0.1: using data-list-sequences-0.1
Dependency diagrams >=1.3.0.1 && <1.4: using diagrams-1.3.0.1
Dependency diagrams-core >=1.3.0.6 && <1.4: using diagrams-core-1.3.0.8
Dependency diagrams-lib >=1.3.1.1 && <1.4: using diagrams-lib-1.3.1.4
Dependency diagrams-svg >=1.3.1.10 && <1.5: using diagrams-svg-1.4.0.3
Dependency directory >=1.1 && <1.3: using directory-1.2.6.2
Dependency edit-distance >=0.2.1.2: using edit-distance-0.2.2.1
Dependency either >=4.1.1: using either-4.4.1.1
Dependency email-validate >=2.2.0: using email-validate-2.2.0
Dependency enclosed-exceptions ==1.0.*: using enclosed-exceptions-1.0.2
Dependency errors >=1.4.7 && <3.0: using errors-2.1.2
Dependency esqueleto >=1.4.1.2 && <2.5: using esqueleto-2.4.3
Dependency exceptions >=0.8.0.2: using exceptions-0.8.3
Dependency exhaustive -any: using exhaustive-1.1.3
Dependency fast-logger >=2.2 && <2.5: using fast-logger-2.4.7
Dependency filepath -any: using filepath-1.4.1.1
Dependency filepicker-policy >=0.2.6: using filepicker-policy-0.2.6
Dependency free -any: using free-4.12.4
Dependency generics-sop -any: using generics-sop-0.2.3.0
Dependency gravatar -any: using gravatar-0.8.0
Dependency hashable >=1.2.1 && <1.3: using hashable-1.2.4.0
Dependency hedis >=0.6.5: using hedis-0.9.4
Dependency hexpat-lens -any: using hexpat-lens-0.1.4
Dependency hmatrix -any: using hmatrix-0.17.0.2
Dependency http-client >=0.3.2.2: using http-client-0.4.31.1
Dependency http-client-openssl >=0.2: using http-client-openssl-0.2.0.4
Dependency http-client-tls >=0.2.1.1: using http-client-tls-0.2.4.1
Dependency http-conduit >=2.1.2 && <2.2: using http-conduit-2.1.11
Dependency http-reverse-proxy ==0.4.*: using http-reverse-proxy-0.4.3.2
Dependency http-types >=0.8.5: using http-types-0.9.1
Dependency immortal ==0.2.*: using immortal-0.2.2
Dependency integer-gmp >=0.5.1.0: using integer-gmp-1.0.0.1
Dependency iso3166-country-codes >=0.20130302.4: using
iso3166-country-codes-0.20140203.7
Dependency lens >=4.11 && <5.0: using lens-4.14
Dependency lens-aeson >=1.0.0.4: using lens-aeson-1.0.0.5
Dependency lifted-async >=0.2.0: using lifted-async-0.9.0
Dependency lifted-base >=0.2.2.1 && <0.3: using lifted-base-0.2.3.8
Dependency linear >=1.20.4 && <1.21: using linear-1.20.5
Dependency lucid >=2.9.2: using lucid-2.9.7
Dependency mandrill >=0.5.0.0: using mandrill-0.5.2.3
Dependency memory >=0.10 && <1.0: using memory-0.13
Dependency monad-control >=0.3.2.3 && <1.1: using monad-control-1.0.1.0
Dependency monad-logger >=0.3.6.1 && <0.4: using monad-logger-0.3.20.1
Dependency monad-loops >=0.4.2: using monad-loops-0.4.3
Dependency monadlist >=0.0.2 && <0.1: using monadlist-0.0.2
Dependency mono-traversable >=0.6.1: using mono-traversable-1.0.1
Dependency mtl >=2.1.3: using mtl-2.2.1
Dependency mtl-compat >=0.2.1.3: using mtl-compat-0.2.1.3
Dependency network >=2.6: using network-2.6.3.1
Dependency network-uri >=2.6: using network-uri-2.6.1.0
Dependency octopart >=0.0.16: using octopart-0.0.20
Dependency opaleye -any: using opaleye-0.4.2.0
Dependency opaleye-tf -any: using opaleye-tf-0.1.0.0
Dependency pcre-light >=0.4.0.3: using pcre-light-0.4.0.4
Dependency persistent >=2.1: using persistent-2.6
Dependency persistent-chunked >=0.0.4: using persistent-chunked-0.0.4
Dependency persistent-postgresql >=2.2.0: using persistent-postgresql-2.6
Dependency persistent-template >=2.1: using persistent-template-2.5.1.6
Dependency postgresql-simple -any: using postgresql-simple-0.5.2.1
Dependency primitive >=0.5.3.0: using primitive-0.6.1.0
Dependency process -any: using process-1.4.2.0
Dependency profunctors -any: using profunctors-5.2
Dependency querystring-pickle >=0.1.9 && <0.3: using querystring-pickle-0.2.0
Dependency random >=1.0.1.1: using random-1.1
Dependency resource-pool >=0.2.3.2: using resource-pool-0.2.3.2
Dependency resourcet >=1.1.2 && <1.2: using resourcet-1.1.8.1
Dependency retry >=0.7: using retry-0.7.4.1
Dependency safe >=0.3.4 && <0.4: using safe-0.3.10
Dependency scientific >=0.3.2.1 && <0.4: using scientific-0.3.4.9
Dependency semigroups >=0.16.2.2: using semigroups-0.18.2
Dependency split >=0.2.2 && <0.3: using split-0.2.3.1
Dependency template-haskell -any: using template-haskell-2.11.1.0
Dependency text >=1.1.1.3: using text-1.2.2.1
Dependency text-icu -any: using text-icu-0.7.0.1
Dependency time >=1.4 && <1.7: using time-1.6.0.1
Dependency tls >=1.2.8: using tls-1.3.8
Dependency transformers >=0.3 && <0.6: using transformers-0.5.2.0
Dependency transformers-base >=0.4.2: using transformers-base-0.4.4
Dependency transformers-compat >=0.4: using transformers-compat-0.5.1.4
Dependency unix -any: using unix-2.7.2.1
Dependency unordered-containers >=0.2.3.3 && <0.3: using
unordered-containers-0.2.7.1
Dependency utf8-string >=0.3.7: using utf8-string-1.0.1.1
Dependency uuid -any: using uuid-1.3.12
Dependency vector -any: using vector-0.11.0.0
Dependency wai >=3.0.0.1: using wai-3.2.1.1
Dependency wai-cors >=0.2: using wai-cors-0.2.5
Dependency wai-extra >=3.0.0 && <4: using wai-extra-3.0.19
Dependency wai-logger >=2.1.1 && <2.4: using wai-logger-2.3.0
Dependency wai-middleware-metrics ==0.2.*: using wai-middleware-metrics-0.2.3
Dependency warp >=3.0.0.1 && <3.3: using warp-3.2.9
Dependency wreq >=0.4: using wreq-0.4.1.0
Dependency yesod-auth >=1.3.1 && <1.5: using yesod-auth-1.4.13.5
Dependency yesod-core >=1.2.16.1 && <1.5: using yesod-core-1.4.26
Dependency yesod-form >=1.3.10: using yesod-form-1.4.9
Dependency yesod-persistent >=1.2.3: using yesod-persistent-1.4.0.6
Dependency zip-archive -any: using zip-archive-0.3.0.5
Using Cabal-1.24.1.0 compiled by ghc-8.0
Using compiler: ghc-8.0.1.20161117
Using install prefix:
/nix/store/4szf92rzfdl9kgzl7i81ffa4h2v9fwxk-circuithub-api-0.0.4
Binaries installed in:
/nix/store/4szf92rzfdl9kgzl7i81ffa4h2v9fwxk-circuithub-api-0.0.4/bin
Libraries installed in:
/nix/store/4szf92rzfdl9kgzl7i81ffa4h2v9fwxk-circuithub-api-0.0.4/lib/ghc-8.0.1.20161117/circuithub-api-0.0.4
Dynamic libraries installed in:
/nix/store/4szf92rzfdl9kgzl7i81ffa4h2v9fwxk-circuithub-api-0.0.4/lib/ghc-8.0.1.20161117/x86_64-linux-ghc-8.0.1.20161117
Private binaries installed in:
/nix/store/4szf92rzfdl9kgzl7i81ffa4h2v9fwxk-circuithub-api-0.0.4/libexec
Data files installed in:
/nix/store/4szf92rzfdl9kgzl7i81ffa4h2v9fwxk-circuithub-api-0.0.4/share/x86_64-linux-ghc-8.0.1.20161117/circuithub-api-0.0.4
Documentation installed in:
/nix/store/4szf92rzfdl9kgzl7i81ffa4h2v9fwxk-circuithub-api-0.0.4/share/doc/x86_64-linux-ghc-8.0.1.20161117/circuithub-api-0.0.4
Configuration files installed in:
/nix/store/4szf92rzfdl9kgzl7i81ffa4h2v9fwxk-circuithub-api-0.0.4/etc
No alex found
Using ar found on system at:
/nix/store/9kxhc2f3j5lcyh00zcrifvfly33n5m4r-binutils-2.27/bin/ar
No c2hs found
No cpphs found
Using gcc version 5.4.0 given by user at:
/nix/store/d78lwdgpd05c7qjdg4bvsx38jfy3vs43-gcc-wrapper-5.4.0/bin/gcc
Using ghc version 8.0.1.20161117 found on system at:
/nix/store/1gknmgp8sz12cb03hp9f9p57wq729xcc-ghc-8.0.1.20161117/bin/ghc
Using ghc-pkg version 8.0.1.20161117 found on system at:
/nix/store/1gknmgp8sz12cb03hp9f9p57wq729xcc-ghc-8.0.1.20161117/bin/ghc-pkg
No ghcjs found
No ghcjs-pkg found
No greencard found
Using haddock version 2.17.3 found on system at:
/nix/store/1gknmgp8sz12cb03hp9f9p57wq729xcc-ghc-8.0.1.20161117/bin/haddock
No happy found
Using haskell-suite found on system at: haskell-suite-dummy-location
Using haskell-suite-pkg found on system at: haskell-suite-pkg-dummy-location
No hmake found
Using hpc version 0.67 found on system at:
/nix/store/1gknmgp8sz12cb03hp9f9p57wq729xcc-ghc-8.0.1.20161117/bin/hpc
Using hsc2hs version 0.68.1 found on system at:
/nix/store/1gknmgp8sz12cb03hp9f9p57wq729xcc-ghc-8.0.1.20161117/bin/hsc2hs
No hscolour found
No jhc found
Using ld found on system at:
/nix/store/d78lwdgpd05c7qjdg4bvsx38jfy3vs43-gcc-wrapper-5.4.0/bin/ld
No lhc found
No lhc-pkg found
No pkg-config found
Using strip version 2.27 found on system at:
/nix/store/9kxhc2f3j5lcyh00zcrifvfly33n5m4r-binutils-2.27/bin/strip
Using tar found on system at:
/nix/store/ipsnpg6csk11j07lzlsd7z5mm30wsb4x-gnutar-1.29/bin/tar
No uhc found
building
Building circuithub-api-0.0.4...
Preprocessing library circuithub-api-0.0.4...
[ 1 of 278] Compiling YesodHandlers ( YesodHandlers.hs, dist/build/YesodHandlers.o )
[ 2 of 278] Compiling YesodConfig2 ( YesodConfig2.hs, dist/build/YesodConfig2.o )
[ 3 of 278] Compiling YesodConfig ( YesodConfig.hs, dist/build/YesodConfig.o )
[ 4 of 278] Compiling YesodMain ( YesodMain.hs, dist/build/YesodMain.o )
[ 5 of 278] Compiling Yesod.Session.Redis ( Yesod/Session/Redis.hs, dist/build/Yesod/Session/Redis.o )
[ 6 of 278] Compiling Yesod.Core.Handler.Extra ( Yesod/Core/Handler/Extra.hs, dist/build/Yesod/Core/Handler/Extra.o )
[ 7 of 278] Compiling Util ( Util.hs, dist/build/Util.o )
[ 8 of 278] Compiling Statistics.SimpleHistogram ( Statistics/SimpleHistogram.hs, dist/build/Statistics/SimpleHistogram.o )
[ 9 of 278] Compiling Statistics.Sample.Extra ( Statistics/Sample/Extra.hs, dist/build/Statistics/Sample/Extra.o )
[ 10 of 278] Compiling Statistics.Hash ( Statistics/Hash.hs, dist/build/Statistics/Hash.o )
[ 11 of 278] Compiling Route.MatchParams ( Route/MatchParams.hs, dist/build/Route/MatchParams.o )
[ 12 of 278] Compiling Route.AuthError ( Route/AuthError.hs, dist/build/Route/AuthError.o )
[ 13 of 278] Compiling Request.Types ( Request/Types.hs, dist/build/Request/Types.o )
[ 14 of 278] Compiling Request.Substitute ( Request/Substitute.hs, dist/build/Request/Substitute.o )
[ 15 of 278] Compiling Query.Opaleye.Extra ( Query/Opaleye/Extra.hs, dist/build/Query/Opaleye/Extra.o )
[ 16 of 278] Compiling Query.Opaleye.BoardOrder ( Query/Opaleye/BoardOrder.hs, dist/build/Query/Opaleye/BoardOrder.o )
[ 17 of 278] Compiling Project.Quote.Solution.Element ( Project/Quote/Solution/Element.hs, dist/build/Project/Quote/Solution/Element.o )
[ 18 of 278] Compiling Network.Wai.Window.Types ( Network/Wai/Window/Types.hs, dist/build/Network/Wai/Window/Types.o )
[ 19 of 278] Compiling Network.Wai.Window.Internal ( Network/Wai/Window/Internal.hs, dist/build/Network/Wai/Window/Internal.o )
[ 20 of 278] Compiling Network.Wai.ResponseWindow ( Network/Wai/ResponseWindow.hs, dist/build/Network/Wai/ResponseWindow.o )
[ 21 of 278] Compiling Network.Wai.RequestWindow ( Network/Wai/RequestWindow.hs, dist/build/Network/Wai/RequestWindow.o )
[ 22 of 278] Compiling Network.HTTP.Types.URI.Extra ( Network/HTTP/Types/URI/Extra.hs, dist/build/Network/HTTP/Types/URI/Extra.o )
[ 23 of 278] Compiling Network.HTTP.Client.Extra ( Network/HTTP/Client/Extra.hs, dist/build/Network/HTTP/Client/Extra.o )
[ 24 of 278] Compiling Network.Dropbox ( Network/Dropbox.hs, dist/build/Network/Dropbox.o )
[ 25 of 278] Compiling Network.Aws.Extra ( Network/Aws/Extra.hs, dist/build/Network/Aws/Extra.o )
[ 26 of 278] Compiling Network.API.Mandrill.Extra ( Network/API/Mandrill/Extra.hs, dist/build/Network/API/Mandrill/Extra.o )
[ 27 of 278] Compiling Model.Progress.Extra ( Model/Progress/Extra.hs, dist/build/Model/Progress/Extra.o )
[ 28 of 278] Compiling Progress.Util ( Progress/Util.hs, dist/build/Progress/Util.o )
[ 29 of 278] Compiling Model.PostgreSQL.Types ( Model/PostgreSQL/Types.hs, dist/build/Model/PostgreSQL/Types.o )
[ 30 of 278] Compiling Model.Order.Extra ( Model/Order/Extra.hs, dist/build/Model/Order/Extra.o )
[ 31 of 278] Compiling Model.Opaleye.Types.Generated ( Model/Opaleye/Types/Generated.hs, dist/build/Model/Opaleye/Types/Generated.o )
[ 32 of 278] Compiling Model.Opaleye.MyData.Types.Generated ( Model/Opaleye/MyData/Types/Generated.hs, dist/build/Model/Opaleye/MyData/Types/Generated.o )
[ 33 of 278] Compiling Model.Opaleye.MyData.Ids.Generated ( Model/Opaleye/MyData/Ids/Generated.hs, dist/build/Model/Opaleye/MyData/Ids/Generated.o )
[ 34 of 278] Compiling Model.Opaleye.MyData.Ids ( Model/Opaleye/MyData/Ids.hs, dist/build/Model/Opaleye/MyData/Ids.o )
Model/Opaleye/MyData/Ids.hs:1:34: warning: [-Wdodgy-exports]
The export item `module Model.Opaleye.MyData.Ids.Generated' exports nothing
Model/Opaleye/MyData/Ids.hs:1:77: warning: [-Wduplicate-exports]
Duplicate ‘Module Model.Opaleye.MyData.Ids.Generated’ in export list
Model/Opaleye/MyData/Ids.hs:3:1: warning: [-Wunused-imports]
The import of ‘Model.Opaleye.MyData.Ids.Generated’ is redundant
except perhaps to import instances from ‘Model.Opaleye.MyData.Ids.Generated’
To import instances alone, use: import Model.Opaleye.MyData.Ids.Generated()
[ 35 of 278] Compiling Model.Opaleye.Ids.Generated ( Model/Opaleye/Ids/Generated.hs, dist/build/Model/Opaleye/Ids/Generated.o )
[ 36 of 278] Compiling Model.Opaleye.Ids ( Model/Opaleye/Ids.hs, dist/build/Model/Opaleye/Ids.o )
[ 37 of 278] Compiling Model.Issue.Extra ( Model/Issue/Extra.hs, dist/build/Model/Issue/Extra.o )
[ 38 of 278] Compiling Model.Bom.Extra ( Model/Bom/Extra.hs, dist/build/Model/Bom/Extra.o )
[ 39 of 278] Compiling Model.BoardOrder.Extra ( Model/BoardOrder/Extra.hs, dist/build/Model/BoardOrder/Extra.o )
[ 40 of 278] Compiling MagicConstants ( MagicConstants.hs, dist/build/MagicConstants.o )
[ 41 of 278] Compiling GHC.Stack.Extra ( GHC/Stack/Extra.hs, dist/build/GHC/Stack/Extra.o )
GHC/Stack/Extra.hs:22:1: warning: [-Wunused-top-binds]
Defined but not used: ‘showSrcLoc’
[ 42 of 278] Compiling Handler.Failure ( Handler/Failure.hs, dist/build/Handler/Failure.o )
[ 43 of 278] Compiling Debug.Handler ( Debug/Handler.hs, dist/build/Debug/Handler.o )
[ 44 of 278] Compiling Database.PostgreSQL.Simple.Extra ( Database/PostgreSQL/Simple/Extra.hs, dist/build/Database/PostgreSQL/Simple/Extra.o )
[ 45 of 278] Compiling Model.Opaleye.MyData.Types ( Model/Opaleye/MyData/Types.hs, dist/build/Model/Opaleye/MyData/Types.o )
[ 46 of 278] Compiling Model.Opaleye.MyData.Kind.Generated ( Model/Opaleye/MyData/Kind/Generated.hs, dist/build/Model/Opaleye/MyData/Kind/Generated.o )
Model/Opaleye/MyData/Kind/Generated.hs:14:1: warning: [-Wunused-imports]
The import of ‘Opaleye.TF.BaseTypes’ is redundant
except perhaps to import instances from ‘Opaleye.TF.BaseTypes’
To import instances alone, use: import Opaleye.TF.BaseTypes()
Model/Opaleye/MyData/Kind/Generated.hs:19:1: warning: [-Wunused-imports]
The qualified import of ‘Model.Opaleye.MyData.Ids’ is redundant
except perhaps to import instances from ‘Model.Opaleye.MyData.Ids’
To import instances alone, use: import Model.Opaleye.MyData.Ids()
[ 47 of 278] Compiling Model.Opaleye.MyData.Kind ( Model/Opaleye/MyData/Kind.hs, dist/build/Model/Opaleye/MyData/Kind.o )
Model/Opaleye/MyData/Kind.hs:1:35: warning: [-Wdodgy-exports]
The export item `module Model.Opaleye.MyData.Kind' exports nothing
[ 48 of 278] Compiling Model.Opaleye.MyData.Generated ( Model/Opaleye/MyData/Generated.hs, dist/build/Model/Opaleye/MyData/Generated.o )
[ 49 of 278] Compiling Model.Opaleye.MyData.Orphans ( Model/Opaleye/MyData/Orphans.hs, dist/build/Model/Opaleye/MyData/Orphans.o )
[ 50 of 278] Compiling Model.Opaleye.MyData ( Model/Opaleye/MyData.hs, dist/build/Model/Opaleye/MyData.o )
[ 51 of 278] Compiling Model.Opaleye.Types ( Model/Opaleye/Types.hs, dist/build/Model/Opaleye/Types.o )
[ 52 of 278] Compiling Model.Opaleye.Kind.Generated ( Model/Opaleye/Kind/Generated.hs, dist/build/Model/Opaleye/Kind/Generated.o )
Model/Opaleye/Kind/Generated.hs:14:1: warning: [-Wunused-imports]
The import of ‘Opaleye.TF.BaseTypes’ is redundant
except perhaps to import instances from ‘Opaleye.TF.BaseTypes’
To import instances alone, use: import Opaleye.TF.BaseTypes()
Model/Opaleye/Kind/Generated.hs:18:1: warning: [-Wunused-imports]
The qualified import of ‘Data.Access’ is redundant
except perhaps to import instances from ‘Data.Access’
To import instances alone, use: import Data.Access()
[ 53 of 278] Compiling Model.Opaleye.Kind ( Model/Opaleye/Kind.hs, dist/build/Model/Opaleye/Kind.o )
Model/Opaleye/Kind.hs:1:28: warning: [-Wdodgy-exports]
The export item `module Model.Opaleye.Kind' exports nothing
[ 54 of 278] Compiling Model.Opaleye.Generated ( Model/Opaleye/Generated.hs, dist/build/Model/Opaleye/Generated.o )
[ 55 of 278] Compiling Database.Persist.Extra ( Database/Persist/Extra.hs, dist/build/Database/Persist/Extra.o )
[ 56 of 278] Compiling Model.User.Extra ( Model/User/Extra.hs, dist/build/Model/User/Extra.o )
[ 57 of 278] Compiling Network.Filepicker.Policies ( Network/Filepicker/Policies.hs, dist/build/Network/Filepicker/Policies.o )
[ 58 of 278] Compiling Response.Cost ( Response/Cost.hs, dist/build/Response/Cost.o )
[ 59 of 278] Compiling Database.Esqueleto.Extra ( Database/Esqueleto/Extra.hs, dist/build/Database/Esqueleto/Extra.o )
[ 60 of 278] Compiling Data.URL ( Data/URL.hs, dist/build/Data/URL.o )
[ 61 of 278] Compiling Data.String.Extra ( Data/String/Extra.hs, dist/build/Data/String/Extra.o )
[ 62 of 278] Compiling Data.Conduit.Extra ( Data/Conduit/Extra.hs, dist/build/Data/Conduit/Extra.o )
[ 63 of 278] Compiling Data.Conduit.Combinators.Extra ( Data/Conduit/Combinators/Extra.hs, dist/build/Data/Conduit/Combinators/Extra.o )
[ 64 of 278] Compiling Network.Dropbox.Util ( Network/Dropbox/Util.hs, dist/build/Network/Dropbox/Util.o )
Network/Dropbox/Util.hs:27:10: warning: [-Wdeprecations]
In the use of ‘parseUrl’
(imported from Network.HTTP.Client, but defined in http-client-0.4.31.1:Network.HTTP.Client.Request):
Deprecated: "Please use parseUrlThrow, parseRequest, or parseRequest_ instead"
[ 65 of 278] Compiling Data.Aeson.Extra ( Data/Aeson/Extra.hs, dist/build/Data/Aeson/Extra.o )
Data/Aeson/Extra.hs:34:1: warning: [-Wdodgy-imports]
The import item ‘CallStack(..)’ suggests that
‘CallStack’ has (in-scope) constructors or class methods,
but it has none
[ 66 of 278] Compiling Model.Opaleye.Orphans ( Model/Opaleye/Orphans.hs, dist/build/Model/Opaleye/Orphans.o )
[ 67 of 278] Compiling Model.Opaleye ( Model/Opaleye.hs, dist/build/Model/Opaleye.o )
[ 68 of 278] Compiling Model.Opaleye.Order.Extra ( Model/Opaleye/Order/Extra.hs, dist/build/Model/Opaleye/Order/Extra.o )
[ 69 of 278] Compiling Model.Opaleye.User.Extra ( Model/Opaleye/User/Extra.hs, dist/build/Model/Opaleye/User/Extra.o )
[ 70 of 278] Compiling Model.Source.Extra ( Model/Source/Extra.hs, dist/build/Model/Source/Extra.o )
[ 71 of 278] Compiling Model.Part.Extra ( Model/Part/Extra.hs, dist/build/Model/Part/Extra.o )
[ 72 of 278] Compiling MyData.Pcb.Util ( MyData/Pcb/Util.hs, dist/build/MyData/Pcb/Util.o )
[ 73 of 278] Compiling Query.Opaleye.Board ( Query/Opaleye/Board.hs, dist/build/Query/Opaleye/Board.o )
[ 74 of 278] Compiling Query.Opaleye.Import ( Query/Opaleye/Import.hs, dist/build/Query/Opaleye/Import.o )
[ 75 of 278] Compiling Query.Opaleye.MyData ( Query/Opaleye/MyData.hs, dist/build/Query/Opaleye/MyData.o )
[ 76 of 278] Compiling Query.Opaleye.Inst ( Query/Opaleye/Inst.hs, dist/build/Query/Opaleye/Inst.o )
[ 77 of 278] Compiling Query.Opaleye.MyData.StripFeeder ( Query/Opaleye/MyData/StripFeeder.hs, dist/build/Query/Opaleye/MyData/StripFeeder.o )
[ 78 of 278] Compiling Query.Opaleye.Order ( Query/Opaleye/Order.hs, dist/build/Query/Opaleye/Order.o )
[ 79 of 278] Compiling Query.Opaleye.Project ( Query/Opaleye/Project.hs, dist/build/Query/Opaleye/Project.o )
[ 80 of 278] Compiling Query.Opaleye.Revision ( Query/Opaleye/Revision.hs, dist/build/Query/Opaleye/Revision.o )
[ 81 of 278] Compiling Query.Opaleye.SourceAggregate ( Query/Opaleye/SourceAggregate.hs, dist/build/Query/Opaleye/SourceAggregate.o )
[ 82 of 278] Compiling Query.Opaleye.User ( Query/Opaleye/User.hs, dist/build/Query/Opaleye/User.o )
[ 83 of 278] Compiling StripFeeder.Util ( StripFeeder/Util.hs, dist/build/StripFeeder/Util.o )
[ 84 of 278] Compiling Package.Util ( Package/Util.hs, dist/build/Package/Util.o )
[ 85 of 278] Compiling Web.Stripe ( Web/Stripe.hs, dist/build/Web/Stripe.o )
[ 86 of 278] Compiling Data.Access.Yesod.Unsafe ( Data/Access/Yesod/Unsafe.hs, dist/build/Data/Access/Yesod/Unsafe.o )
[ 87 of 278] Compiling Data.Access.Yesod ( Data/Access/Yesod.hs, dist/build/Data/Access/Yesod.o )
[ 88 of 278] Compiling Daemon.Periodically ( Daemon/Periodically.hs, dist/build/Daemon/Periodically.o )
Daemon/Periodically.hs:13:1: warning: [-Wunused-imports]
The import of ‘Control.Monad.Trans.Control’ is redundant
except perhaps to import instances from ‘Control.Monad.Trans.Control’
To import instances alone, use: import Control.Monad.Trans.Control()
[ 89 of 278] Compiling Daemon.Import ( Daemon/Import.hs, dist/build/Daemon/Import.o )
[ 90 of 278] Compiling Daemon.MyData.Connect ( Daemon/MyData/Connect.hs, dist/build/Daemon/MyData/Connect.o )
[ 91 of 278] Compiling Daemon.MyData.Sync ( Daemon/MyData/Sync.hs, dist/build/Daemon/MyData/Sync.o )
[ 92 of 278] Compiling Control.Monad.Logger.Extra ( Control/Monad/Logger/Extra.hs, dist/build/Control/Monad/Logger/Extra.o )
[ 93 of 278] Compiling Control.Concurrent.Async.Lifted.Extra ( Control/Concurrent/Async/Lifted/Extra.hs, dist/build/Control/Concurrent/Async/Lifted/Extra.o )
[ 94 of 278] Compiling Assembly.Types ( Assembly/Types.hs, dist/build/Assembly/Types.o )
[ 95 of 278] Compiling Assembly.Hash ( Assembly/Hash.hs, dist/build/Assembly/Hash.o )
[ 96 of 278] Compiling Application.Settings.Development ( Application/Settings/Development.hs, dist/build/Application/Settings/Development.o )
[ 97 of 278] Compiling Application.Log ( Application/Log.hs, dist/build/Application/Log.o )
[ 98 of 278] Compiling Application.Environment ( Application/Environment.hs, dist/build/Application/Environment.o )
[ 99 of 278] Compiling Application.Session ( Application/Session.hs, dist/build/Application/Session.o )
[100 of 278] Compiling Application.Dropbox ( Application/Dropbox.hs, dist/build/Application/Dropbox.o )
[101 of 278] Compiling Application.Aws ( Application/Aws.hs, dist/build/Application/Aws.o )
[102 of 278] Compiling Application.Settings ( Application/Settings.hs, dist/build/Application/Settings.o )
[103 of 278] Compiling Route.AuthorizeResource ( Route/AuthorizeResource.hs, dist/build/Route/AuthorizeResource.o )
[104 of 278] Compiling Route.Resource ( Route/Resource.hs, dist/build/Route/Resource.o )
[105 of 278] Compiling Application.Core ( Application/Core.hs, dist/build/Application/Core.o )
[106 of 278] Compiling Application.Persist ( Application/Persist.hs, dist/build/Application/Persist.o )
[107 of 278] Compiling Control.Monad.Database ( Control/Monad/Database.hs, dist/build/Control/Monad/Database.o )
[108 of 278] Compiling BatchedQueries ( BatchedQueries.hs, dist/build/BatchedQueries.o )
[109 of 278] Compiling Database.MyData ( Database/MyData.hs, dist/build/Database/MyData.o )
[110 of 278] Compiling Database.Redis.Extra ( Database/Redis/Extra.hs, dist/build/Database/Redis/Extra.o )
[111 of 278] Compiling Handler.OrphanInstances ( Handler/OrphanInstances.hs, dist/build/Handler/OrphanInstances.o )
Handler/OrphanInstances.hs:12:1: warning: [-Wunused-imports]
The import of ‘MonadHandler’ from module ‘Yesod.Core’ is redundant
[112 of 278] Compiling RequestContext ( RequestContext.hs, dist/build/RequestContext.o )
[113 of 278] Compiling Route.Routes ( Route/Routes.hs, dist/build/Route/Routes.o )
[114 of 278] Compiling Route.LookupResource ( Route/LookupResource.hs, dist/build/Route/LookupResource.o )
[115 of 278] Compiling Route.Authorize ( Route/Authorize.hs, dist/build/Route/Authorize.o )
Route/Authorize.hs:17:1: warning: [-Wunused-imports]
The import of ‘Yesod.Core’ is redundant
except perhaps to import instances from ‘Yesod.Core’
To import instances alone, use: import Yesod.Core()
[116 of 278] Compiling Route.ResourceFromModel ( Route/ResourceFromModel.hs, dist/build/Route/ResourceFromModel.o )
[117 of 278] Compiling Route.ResourcePatterns ( Route/ResourcePatterns.hs, dist/build/Route/ResourcePatterns.o )
Route/ResourcePatterns.hs:11:1: warning: [-Wmissing-signatures]
Pattern synonym with no type signature:
pattern ViewP :: forall b.
Typeable b =>
forall a. ResourceAccessElem a => b -> ResourceAccess
Route/ResourcePatterns.hs:12:1: warning: [-Wmissing-signatures]
Pattern synonym with no type signature:
pattern EditP :: forall b.
Typeable b =>
forall a. ResourceAccessElem a => b -> ResourceAccess
[118 of 278] Compiling Web.Hipchat ( Web/Hipchat.hs, dist/build/Web/Hipchat.o )
[119 of 278] Compiling Handler.Orders.Notification ( Handler/Orders/Notification.hs, dist/build/Handler/Orders/Notification.o )
[120 of 278] Compiling Import ( Import.hs, dist/build/Import.o )
[121 of 278] Compiling Error.Extra ( Error/Extra.hs, dist/build/Error/Extra.o )
[122 of 278] Compiling Footprint.Util ( Footprint/Util.hs, dist/build/Footprint/Util.o )
[123 of 278] Compiling Bom.Util ( Bom/Util.hs, dist/build/Bom/Util.o )
[124 of 278] Compiling Assembly.Util ( Assembly/Util.hs, dist/build/Assembly/Util.o )
[125 of 278] Compiling Query.Opaleye.Footprint ( Query/Opaleye/Footprint.hs, dist/build/Query/Opaleye/Footprint.o )
[126 of 278] Compiling Query.Opaleye.Part ( Query/Opaleye/Part.hs, dist/build/Query/Opaleye/Part.o )
[127 of 278] Compiling Query.Opaleye.PartAggregate ( Query/Opaleye/PartAggregate.hs, dist/build/Query/Opaleye/PartAggregate.o )
[128 of 278] Compiling Inst.Util ( Inst/Util.hs, dist/build/Inst/Util.o )
*** Core Lint errors : in result of CorePrep ***
<no location info>: warning:
In the expression: lvl2_r2Ft c_s2Gv
Non-function type in function position
Fun type: Char
Arg type: Char
Arg: c_s2Gv
*** Offending Program ***
$trModule2 :: TrName
[GblId, Caf=NoCafRefs, Str=DmdType m1, Unf=OtherCon []]
$trModule2 = TrNameS "circuithub-api-0.0.4-KiImKaBd6Hu445eBnTlnQy"#
$trModule1 :: TrName
[GblId, Caf=NoCafRefs, Str=DmdType m1, Unf=OtherCon []]
$trModule1 = TrNameS "Inst.Util"#
$trModule :: Module
[GblId, Caf=NoCafRefs, Str=DmdType m, Unf=OtherCon []]
$trModule = Module $trModule2 $trModule1
simplifyInstName1_r2F8 :: Text
[GblId, Str=DmdType]
simplifyInstName1_r2F8 = unpackCString# "INC"#
simplifyInstName2_r2F9 :: Text
[GblId, Str=DmdType]
simplifyInstName2_r2F9 = unpackCString# "CORPORATION"#
simplifyInstName3_r2Fa :: Text
[GblId, Str=DmdType]
simplifyInstName3_r2Fa = unpackCString# "CORP"#
simplifyInstName4_r2Fb :: Text
[GblId, Str=DmdType]
simplifyInstName4_r2Fb = unpackCString# "LLC"#
simplifyInstName5_r2Fc :: Text
[GblId, Str=DmdType]
simplifyInstName5_r2Fc = unpackCString# "LTD"#
simplifyInstName6_r2Fd :: Text
[GblId, Str=DmdType]
simplifyInstName6_r2Fd = unpackCString# "LIMITED"#
simplifyInstName7_r2Fe :: Text
[GblId, Str=DmdType]
simplifyInstName7_r2Fe = unpackCString# "COMPANY"#
simplifyInstName8_r2Ff :: Text
[GblId, Str=DmdType]
simplifyInstName8_r2Ff = unpackCString# "US"#
simplifyInstName9_r2Fg :: Text
[GblId, Str=DmdType]
simplifyInstName9_r2Fg = unpackCString# "USA"#
simplifyInstName10_r2Fh :: Text
[GblId, Str=DmdType]
simplifyInstName10_r2Fh = unpackCString# "AMERICA"#
simplifyInstName11_r2Fi :: Text
[GblId, Str=DmdType]
simplifyInstName11_r2Fi = unpackCString# "AMERICAS"#
simplifyInstName12_r2Fj :: Text
[GblId, Str=DmdType]
simplifyInstName12_r2Fj = unpackCString# "INTERNATIONAL"#
simplifyInstName13_r2Fk :: Text
[GblId, Str=DmdType]
simplifyInstName13_r2Fk = unpackCString# "SEMICONDUCTOR"#
simplifyInstName14_r2Fl :: Text
[GblId, Str=DmdType]
simplifyInstName14_r2Fl = unpackCString# "ELECTRONIC"#
simplifyInstName15_r2Fm :: Text
[GblId, Str=DmdType]
simplifyInstName15_r2Fm = unpackCString# "ELECTRONICS"#
simplifyInstName16_r2Fn :: Text
[GblId, Str=DmdType]
simplifyInstName16_r2Fn = unpackCString# "TECHNOLOGY"#
simplifyInstName17_r2Fo :: Text
[GblId, Str=DmdType]
simplifyInstName17_r2Fo = unpackCString# "TECHNOLOGIES"#
simplifyInstName18_r2Fp :: Text
[GblId, Str=DmdType]
simplifyInstName18_r2Fp = unpackCString# "COMPONENT"#
simplifyInstName19_r2Fq :: Text
[GblId, Str=DmdType]
simplifyInstName19_r2Fq = unpackCString# "COMPONENTS"#
lvl_r2Fr :: Char
[GblId, Caf=NoCafRefs, Str=DmdType m, Unf=OtherCon []]
lvl_r2Fr = C# '_'#
lvl1_r2Fs :: [Char]
[GblId, Str=DmdType]
lvl1_r2Fs = unpackCString# "/\\"#
lvl2_r2Ft :: Char
[GblId, Caf=NoCafRefs, Str=DmdType m, Unf=OtherCon []]
lvl2_r2Ft = C# ' '#
lvl3_r2Fu :: [Char]
[GblId, Str=DmdType]
lvl3_r2Fu = unpackCString# "-_.,&;%"#
$j_r2Fv :: ByteArray# -> Int# -> Int# -> Text
[GblId, Arity=3, Str=DmdType <L,U><L,U><S,U>, Unf=OtherCon []]
$j_r2Fv =
\ (dt_s2Fy [OS=OneShot] :: ByteArray#)
(dt1_s2Fz [OS=OneShot] :: Int#)
(dt2_s2FA [OS=OneShot] :: Int#) ->
letrec {
$wloop_s2FB [InlPrag=[0], Occ=LoopBreaker] :: Int# -> Int# -> Text
[LclId, Arity=2, Str=DmdType <L,U><S,U>, Unf=OtherCon []]
$wloop_s2FB =
\ (ww_s2FC :: Int#) (ww1_s2FD :: Int#) ->
case <=# ww1_s2FD 0# of sat_s2FE { __DEFAULT ->
case tagToEnum# @ Bool sat_s2FE of _ [Occ=Dead] {
False ->
case +# dt1_s2Fz ww_s2FC of j_s2FG [Dmd=<S,U>] { __DEFAULT ->
case indexWord16Array# dt_s2Fy j_s2FG of r#_s2FH { __DEFAULT ->
let {
$s$w$j_s2FI [Occ=Once*!] :: Int# -> Char# -> Text
[LclId, Arity=2, Str=DmdType <L,U><S,U>, Unf=OtherCon []]
$s$w$j_s2FI =
\ (sc_s2FJ :: Int#) (sc1_s2FK :: Char#) ->
case ord# sc1_s2FK of sat_s2FM { __DEFAULT ->
case int2Word# sat_s2FM of x_s2FL [Dmd=<S,U>] { __DEFAULT ->
case leWord# x_s2FL 887## of sat_s2FN { __DEFAULT ->
case tagToEnum# @ Bool sat_s2FN of _ [Occ=Dead] {
False ->
case ord# sc1_s2FK of sat_s2FQ { __DEFAULT ->
case {__pkg_ccall base-4.9.1.0 u_iswspace Int#
-> State# RealWorld -> (# State# RealWorld, Int# #)}_s2FP
sat_s2FQ realWorld#
of _ [Occ=Dead] { (# _ [Occ=Dead], ds1_s2FT [Occ=Once!] #) ->
case ds1_s2FT of _ [Occ=Dead] {
__DEFAULT ->
case +# ww1_s2FD sc_s2FJ of sat_s2FW { __DEFAULT ->
case +# ww_s2FC sc_s2FJ of sat_s2FV { __DEFAULT ->
$wloop_s2FB sat_s2FV sat_s2FW
}
};
0# -> Text dt_s2Fy dt1_s2Fz ww1_s2FD
}
}
};
True ->
case x_s2FL of wild2_s2FX {
__DEFAULT ->
case minusWord# wild2_s2FX 9## of sat_s2FY { __DEFAULT ->
case leWord# sat_s2FY 4## of sat_s2FZ { __DEFAULT ->
case tagToEnum# @ Bool sat_s2FZ of _ [Occ=Dead] {
False ->
case wild2_s2FX of _ [Occ=Dead] {
__DEFAULT -> Text dt_s2Fy dt1_s2Fz ww1_s2FD;
160## ->
case +# ww1_s2FD sc_s2FJ of sat_s2G3 { __DEFAULT ->
case +# ww_s2FC sc_s2FJ of sat_s2G2 { __DEFAULT ->
$wloop_s2FB sat_s2G2 sat_s2G3
}
}
};
True ->
case +# ww1_s2FD sc_s2FJ of sat_s2G5 { __DEFAULT ->
case +# ww_s2FC sc_s2FJ of sat_s2G4 { __DEFAULT ->
$wloop_s2FB sat_s2G4 sat_s2G5
}
}
}
}
};
32## ->
case +# ww1_s2FD sc_s2FJ of sat_s2G7 { __DEFAULT ->
case +# ww_s2FC sc_s2FJ of sat_s2G6 { __DEFAULT ->
$wloop_s2FB sat_s2G6 sat_s2G7
}
}
}
}
}
}
} } in
case ltWord# r#_s2FH 56320## of sat_s2G8 { __DEFAULT ->
case tagToEnum# @ Bool sat_s2G8 of _ [Occ=Dead] {
False ->
case gtWord# r#_s2FH 57343## of sat_s2Ga { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Ga of _ [Occ=Dead] {
False ->
case -# j_s2FG 1# of sat_s2Gc { __DEFAULT ->
case indexWord16Array# dt_s2Fy sat_s2Gc of r#1_s2Gd { __DEFAULT ->
case word2Int# r#_s2FH of sat_s2Gh { __DEFAULT ->
case -# sat_s2Gh 56320# of sat_s2Gi { __DEFAULT ->
case word2Int# r#1_s2Gd of sat_s2Ge { __DEFAULT ->
case -# sat_s2Ge 55296# of sat_s2Gf { __DEFAULT ->
case uncheckedIShiftL# sat_s2Gf 10# of sat_s2Gg { __DEFAULT ->
case +# sat_s2Gg sat_s2Gi of sat_s2Gj { __DEFAULT ->
case +# sat_s2Gj 65536# of sat_s2Gk { __DEFAULT ->
case chr# sat_s2Gk of sat_s2Gl { __DEFAULT ->
$s$w$j_s2FI -2# sat_s2Gl
}
}
}
}
}
}
}
}
}
};
True ->
case word2Int# r#_s2FH of sat_s2Gm { __DEFAULT ->
case chr# sat_s2Gm of sat_s2Gn { __DEFAULT ->
$s$w$j_s2FI -1# sat_s2Gn
}
}
}
};
True ->
case word2Int# r#_s2FH of sat_s2Go { __DEFAULT ->
case chr# sat_s2Go of sat_s2Gp { __DEFAULT ->
$s$w$j_s2FI -1# sat_s2Gp
}
}
}
}
}
};
True -> empty
}
}; } in
case -# dt2_s2FA 1# of sat_s2Gq { __DEFAULT ->
$wloop_s2FB sat_s2Gq dt2_s2FA
}
$j1_r2Fw :: Char -> Int -> Step Int Char
[GblId, Arity=2, Str=DmdType <L,U(U)><L,U>, Unf=OtherCon []]
$j1_r2Fw =
\ (x_s2Gr [Occ=Once!, OS=OneShot] :: Char)
(s'_s2Gs [Occ=Once, OS=OneShot] :: Int) ->
case x_s2Gr of wild_s2Gt { C# c#_s2Gu [Occ=Once] ->
let {
c_s2Gv [Dmd=<L,U(U)>] :: Char
[LclId, Str=DmdType]
c_s2Gv =
case elem
@ (Element String)
($fEqChar
`cast` ((Eq (Sym (D:R:Element[][0] <Char>_N)))_R
:: (Eq Char :: Constraint)
~R#
(Eq (Element [Char]) :: Constraint)))
(wild_s2Gt
`cast` (Sub (Sym (D:R:Element[][0] <Char>_N))
:: (Char :: *) ~R# (Element [Char] :: *)))
(lvl3_r2Fu
`cast` ([Sub (Sym (D:R:Element[][0] <Char>_N))]_R
:: ([Char] :: *) ~R# ([Element [Char]] :: *)))
of _ [Occ=Dead] {
False ->
case ord# c#_s2Gu of sat_s2Gx { __DEFAULT ->
case andI# sat_s2Gx 2095104# of _ [Occ=Dead] {
__DEFAULT -> wild_s2Gt;
55296# -> C# '\65533'#
}
};
True -> lvl2_r2Ft
} } in
case case elem
@ (Element String)
($fEqChar
`cast` ((Eq (Sym (D:R:Element[][0] <Char>_N)))_R
:: (Eq Char :: Constraint)
~R#
(Eq (Element [Char]) :: Constraint)))
(c_s2Gv
`cast` (Sub (Sym (D:R:Element[][0] <Char>_N))
:: (Char :: *) ~R# (Element [Char] :: *)))
(lvl1_r2Fs
`cast` ([Sub (Sym (D:R:Element[][0] <Char>_N))]_R
:: ([Char] :: *) ~R# ([Element [Char]] :: *)))
of _ [Occ=Dead] {
False -> lvl2_r2Ft c_s2Gv;
True -> lvl_r2Fr
}
of dt_s2GA { C# _ [Occ=Dead] ->
Yield @ Int @ Char dt_s2GA s'_s2Gs
}
}
$wsimplifyInstName [InlPrag=[0]]
:: ByteArray# -> Int# -> Int# -> Text
[GblId, Arity=3, Str=DmdType <S,U><S,U><S,U>, Unf=OtherCon []]
$wsimplifyInstName =
\ (ww_s2GC [Occ=Once] :: ByteArray#)
(ww1_s2GD [Occ=Once] :: Int#)
(ww2_s2GE [Occ=Once] :: Int#) ->
case simplifyInstName1_r2F8
of _ [Occ=Dead]
{ Text ww4_s2GG [Occ=Once*] ww5_s2GH [Occ=Once*]
ww6_s2GI [Occ=Once*] ->
case simplifyInstName2_r2F9
of _ [Occ=Dead]
{ Text ww8_s2GK [Occ=Once] ww9_s2GL [Occ=Once]
ww10_s2GM [Occ=Once] ->
case simplifyInstName3_r2Fa
of _ [Occ=Dead]
{ Text ww12_s2GO [Occ=Once] ww13_s2GP [Occ=Once]
ww14_s2GQ [Occ=Once] ->
case simplifyInstName4_r2Fb
of _ [Occ=Dead]
{ Text ww16_s2GS [Occ=Once] ww17_s2GT [Occ=Once]
ww18_s2GU [Occ=Once] ->
case simplifyInstName5_r2Fc
of _ [Occ=Dead]
{ Text ww20_s2GW [Occ=Once] ww21_s2GX [Occ=Once]
ww22_s2GY [Occ=Once] ->
case simplifyInstName6_r2Fd
of _ [Occ=Dead]
{ Text ww24_s2H0 [Occ=Once] ww25_s2H1 [Occ=Once]
ww26_s2H2 [Occ=Once] ->
case simplifyInstName7_r2Fe
of _ [Occ=Dead]
{ Text ww28_s2H4 [Occ=Once] ww29_s2H5 [Occ=Once]
ww30_s2H6 [Occ=Once] ->
case simplifyInstName8_r2Ff
of _ [Occ=Dead]
{ Text ww32_s2H8 [Occ=Once] ww33_s2H9 [Occ=Once]
ww34_s2Ha [Occ=Once] ->
case simplifyInstName9_r2Fg
of _ [Occ=Dead]
{ Text ww36_s2Hc [Occ=Once] ww37_s2Hd [Occ=Once]
ww38_s2He [Occ=Once] ->
case simplifyInstName10_r2Fh
of _ [Occ=Dead]
{ Text ww40_s2Hg [Occ=Once] ww41_s2Hh [Occ=Once]
ww42_s2Hi [Occ=Once] ->
case simplifyInstName11_r2Fi
of _ [Occ=Dead]
{ Text ww44_s2Hk [Occ=Once] ww45_s2Hl [Occ=Once]
ww46_s2Hm [Occ=Once] ->
case simplifyInstName12_r2Fj
of _ [Occ=Dead]
{ Text ww48_s2Ho [Occ=Once] ww49_s2Hp [Occ=Once]
ww50_s2Hq [Occ=Once] ->
case simplifyInstName13_r2Fk
of _ [Occ=Dead]
{ Text ww52_s2Hs [Occ=Once] ww53_s2Ht [Occ=Once]
ww54_s2Hu [Occ=Once] ->
case simplifyInstName14_r2Fl
of _ [Occ=Dead]
{ Text ww56_s2Hw [Occ=Once] ww57_s2Hx [Occ=Once]
ww58_s2Hy [Occ=Once] ->
case simplifyInstName15_r2Fm
of _ [Occ=Dead]
{ Text ww60_s2HA [Occ=Once] ww61_s2HB [Occ=Once]
ww62_s2HC [Occ=Once] ->
case simplifyInstName16_r2Fn
of _ [Occ=Dead]
{ Text ww64_s2HE [Occ=Once] ww65_s2HF [Occ=Once]
ww66_s2HG [Occ=Once] ->
case simplifyInstName17_r2Fo
of _ [Occ=Dead]
{ Text ww68_s2HI [Occ=Once] ww69_s2HJ [Occ=Once]
ww70_s2HK [Occ=Once] ->
case simplifyInstName18_r2Fp
of _ [Occ=Dead]
{ Text ww72_s2HM [Occ=Once] ww73_s2HN [Occ=Once]
ww74_s2HO [Occ=Once] ->
case simplifyInstName19_r2Fq
of _ [Occ=Dead]
{ Text ww76_s2HQ [Occ=Once] ww77_s2HR [Occ=Once]
ww78_s2HS [Occ=Once] ->
case $wdropParens ww_s2GC ww1_s2GD ww2_s2GE
of _ [Occ=Dead] { Text dt_s2HU dt1_s2HV dt2_s2HW ->
case <# dt2_s2HW 0# of sat_s2HX { __DEFAULT ->
case case tagToEnum# @ Bool sat_s2HX of _ [Occ=Dead] {
False ->
case andI# dt2_s2HW 4611686018427387904# of _ [Occ=Dead] {
__DEFAULT -> case array_size_error of _ [Occ=Dead] { };
0# ->
case uncheckedIShiftL# dt2_s2HW 1# of sat_s2I1 { __DEFAULT ->
case newByteArray# @ RealWorld sat_s2I1 realWorld#
of _ [Occ=Dead]
{ (# ipv_s2I3 [Occ=Once], ipv1_s2I4 [Occ=Once] #) ->
case +# dt1_s2HV dt2_s2HW of end_s2I5 [Dmd=<S,U>] { __DEFAULT ->
letrec {
$s$wouter_s2I6 [Occ=LoopBreaker]
:: State# RealWorld
-> Int#
-> Int#
-> Int#
-> MutableByteArray# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=5,
Str=DmdType <S,U><L,U><S,U><L,U><L,U>,
Unf=OtherCon []]
$s$wouter_s2I6 =
\ (sc_s2I7 [Occ=Once, OS=OneShot] :: State# RealWorld)
(sc1_s2I8 [Occ=Once] :: Int#)
(sc2_s2I9 [Occ=Once] :: Int#)
(sc3_s2Ia :: Int#)
(sc4_s2Ib :: MutableByteArray# RealWorld) ->
letrec {
$wloop_s2Ic [InlPrag=[0], Occ=LoopBreaker]
:: Int# -> Int# -> State# RealWorld -> (# State# RealWorld, Text #)
[LclId, Arity=3, Str=DmdType <S,U><L,U><S,U>, Unf=OtherCon []]
$wloop_s2Ic =
\ (ww79_s2Id :: Int#)
(ww80_s2Ie :: Int#)
(w_s2If [OS=OneShot] :: State# RealWorld) ->
case >=# ww79_s2Id end_s2I5 of sat_s2Ig { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Ig of _ [Occ=Dead] {
False ->
case indexWord16Array# dt_s2HU ww79_s2Id of r#_s2Ii { __DEFAULT ->
let {
$w$j_s2Ij [InlPrag=[0], Occ=Once*!]
:: Char# -> Int -> (# State# RealWorld, Text #)
[LclId, Arity=2, Str=DmdType <S,U><L,1*U(U)>, Unf=OtherCon []]
$w$j_s2Ij =
\ (ww81_s2Ik [OS=OneShot] :: Char#)
(w1_s2Il [Occ=Once*!, OS=OneShot] :: Int) ->
let {
$j2_s2Im [Occ=Once*!]
:: Int#
-> State# RealWorld -> (# State# RealWorld, Text #)
[LclId, Arity=2, Str=DmdType <S,U><S,U>, Unf=OtherCon []]
$j2_s2Im =
\ (x1_s2In [Occ=Once, OS=OneShot] :: Int#)
(eta_s2Io [Occ=Once*, OS=OneShot]
:: State# RealWorld) ->
case >=# x1_s2In sc3_s2Ia of sat_s2Ip { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Ip of _ [Occ=Dead] {
False ->
case ord# ww81_s2Ik
of n_s2Ir [Dmd=<S,U>] { __DEFAULT ->
case <# n_s2Ir 65536# of sat_s2Is { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Is of _ [Occ=Dead] {
False ->
case -# n_s2Ir 65536#
of m_s2Iu [Dmd=<S,U>] { __DEFAULT ->
case uncheckedIShiftRA# m_s2Iu 10#
of sat_s2Iv { __DEFAULT ->
case +# sat_s2Iv 55296#
of sat_s2Iw { __DEFAULT ->
case int2Word# sat_s2Iw
of sat_s2Ix { __DEFAULT ->
case narrow16Word# sat_s2Ix
of sat_s2Iy { __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc4_s2Ib
ww80_s2Ie
sat_s2Iy
eta_s2Io
of s2#_s2Iz [OS=OneShot] { __DEFAULT ->
case andI# m_s2Iu 1023#
of sat_s2IB { __DEFAULT ->
case +# sat_s2IB 56320#
of sat_s2IC { __DEFAULT ->
case int2Word# sat_s2IC
of sat_s2ID { __DEFAULT ->
case narrow16Word# sat_s2ID
of sat_s2IE { __DEFAULT ->
case +# ww80_s2Ie 1# of sat_s2IA { __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc4_s2Ib
sat_s2IA
sat_s2IE
s2#_s2Iz
of s2#1_s2IF [OS=OneShot] { __DEFAULT ->
case w1_s2Il
of _ [Occ=Dead] { I# ww83_s2IH [Occ=Once] ->
letrec {
$wloop1_s2II [InlPrag=[0], Occ=LoopBreaker]
:: Int#
-> Int#
-> State# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=3,
Str=DmdType <S,U><L,U><S,U>,
Unf=OtherCon []]
$wloop1_s2II =
\ (ww84_s2IJ :: Int#)
(ww85_s2IK :: Int#)
(w2_s2IL [OS=OneShot]
:: State# RealWorld) ->
case >=# ww84_s2IJ end_s2I5
of sat_s2IM { __DEFAULT ->
case tagToEnum# @ Bool sat_s2IM
of _ [Occ=Dead] {
False ->
case indexWord16Array#
dt_s2HU ww84_s2IJ
of r#1_s2IO { __DEFAULT ->
let {
$w$j1_s2IP [InlPrag=[0],
Occ=Once*!]
:: Char#
-> Int
-> (# State# RealWorld,
Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><L,1*U(U)>,
Unf=OtherCon []]
$w$j1_s2IP =
\ (ww86_s2IQ [OS=OneShot]
:: Char#)
(w3_s2IR [Occ=Once*!,
OS=OneShot]
:: Int) ->
let {
$j3_s2IS [Occ=Once*!]
:: Int#
-> State# RealWorld
-> (# State# RealWorld,
Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><S,U>,
Unf=OtherCon []]
$j3_s2IS =
\ (x2_s2IT [Occ=Once,
OS=OneShot]
:: Int#)
(eta1_s2IU [Occ=Once*,
OS=OneShot]
:: State#
RealWorld) ->
case >=# x2_s2IT sc3_s2Ia
of sat_s2IV
{ __DEFAULT ->
case tagToEnum#
@ Bool sat_s2IV
of _ [Occ=Dead] {
False ->
case ord# ww86_s2IQ
of n1_s2IX [Dmd=<S,U>]
{ __DEFAULT ->
case <#
n1_s2IX 65536#
of sat_s2IY
{ __DEFAULT ->
case tagToEnum#
@ Bool
sat_s2IY
of _ [Occ=Dead] {
False ->
case -#
n1_s2IX
65536#
of m1_s2J0 [Dmd=<S,U>]
{ __DEFAULT ->
case uncheckedIShiftRA#
m1_s2J0
10#
of sat_s2J1
{ __DEFAULT ->
case +#
sat_s2J1
55296#
of sat_s2J2
{ __DEFAULT ->
case int2Word#
sat_s2J2
of sat_s2J3
{ __DEFAULT ->
case narrow16Word#
sat_s2J3
of sat_s2J4
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc4_s2Ib
ww85_s2IK
sat_s2J4
eta1_s2IU
of s2#2_s2J5 [OS=OneShot]
{ __DEFAULT ->
case andI#
m1_s2J0
1023#
of sat_s2J7
{ __DEFAULT ->
case +#
sat_s2J7
56320#
of sat_s2J8
{ __DEFAULT ->
case int2Word#
sat_s2J8
of sat_s2J9
{ __DEFAULT ->
case narrow16Word#
sat_s2J9
of sat_s2Ja
{ __DEFAULT ->
case +#
ww85_s2IK
1#
of sat_s2J6
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc4_s2Ib
sat_s2J6
sat_s2Ja
s2#2_s2J5
of s2#3_s2Jb [OS=OneShot]
{ __DEFAULT ->
case w3_s2IR
of _ [Occ=Dead]
{ I# ww88_s2Jd [Occ=Once] ->
case +#
ww85_s2IK
2#
of sat_s2Je
{ __DEFAULT ->
$wloop1_s2II
ww88_s2Jd
sat_s2Je
s2#3_s2Jb
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case int2Word#
n1_s2IX
of sat_s2Jf
{ __DEFAULT ->
case narrow16Word#
sat_s2Jf
of sat_s2Jg
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc4_s2Ib
ww85_s2IK
sat_s2Jg
eta1_s2IU
of s2#2_s2Jh [OS=OneShot]
{ __DEFAULT ->
case w3_s2IR
of _ [Occ=Dead]
{ I# ww88_s2Jj [Occ=Once] ->
case +#
ww85_s2IK
1#
of sat_s2Jk
{ __DEFAULT ->
$wloop1_s2II
ww88_s2Jj
sat_s2Jk
s2#2_s2Jh
}
}
}
}
}
}
}
};
True ->
case +# sc3_s2Ia 1#
of sat_s2Jm
{ __DEFAULT ->
case uncheckedIShiftL#
sat_s2Jm 1#
of top'_s2Jl [Dmd=<S,U>]
{ __DEFAULT ->
case <# top'_s2Jl 0#
of sat_s2Jn
{ __DEFAULT ->
case tagToEnum#
@ Bool
sat_s2Jn
of _ [Occ=Dead] {
False ->
case andI#
top'_s2Jl
4611686018427387904#
of _ [Occ=Dead] {
__DEFAULT ->
case array_size_error
of _ [Occ=Dead] {
};
0# ->
case uncheckedIShiftL#
top'_s2Jl
1#
of sat_s2Jr
{ __DEFAULT ->
case newByteArray#
@ RealWorld
sat_s2Jr
eta1_s2IU
of _ [Occ=Dead]
{ (# ipv3_s2Jt [Occ=Once*],
ipv4_s2Ju #) ->
case <=#
sc3_s2Ia
0#
of sat_s2Jv
{ __DEFAULT ->
case tagToEnum#
@ Bool
sat_s2Jv
of _ [Occ=Dead] {
False ->
case int2Word#
sc3_s2Ia
of sat_s2Jy
{ __DEFAULT ->
case {__pkg_ccall text-1.2.2.1 _hs_text_memcpy forall s.
MutableByteArray# s
-> Word#
-> MutableByteArray# s
-> Word#
-> Word#
-> State# RealWorld
-> (# State# RealWorld #)}_s2Jx
@ RealWorld
ipv4_s2Ju
0##
sc4_s2Ib
0##
sat_s2Jy
ipv3_s2Jt
of _ [Occ=Dead]
{ (# ds11_s2JA [Occ=Once] #) ->
$s$wouter_s2I6
ds11_s2JA
ww85_s2IK
ww84_s2IJ
top'_s2Jl
ipv4_s2Ju
}
};
True ->
$s$wouter_s2I6
ipv3_s2Jt
ww85_s2IK
ww84_s2IJ
top'_s2Jl
ipv4_s2Ju
}
}
}
}
};
True ->
case array_size_error
of _ [Occ=Dead] {
}
}
}
}
}
}
} } in
case ord# ww86_s2IQ
of sat_s2JC { __DEFAULT ->
case <# sat_s2JC 65536#
of sat_s2JD { __DEFAULT ->
case tagToEnum# @ Bool sat_s2JD
of _ [Occ=Dead] {
False ->
case +# ww85_s2IK 1#
of sat_s2JF { __DEFAULT ->
$j3_s2IS sat_s2JF w2_s2IL
};
True ->
$j3_s2IS ww85_s2IK w2_s2IL
}
}
} } in
case geWord# r#1_s2IO 55296##
of sat_s2JG { __DEFAULT ->
case tagToEnum# @ Bool sat_s2JG
of _ [Occ=Dead] {
False ->
case +# ww84_s2IJ 1#
of sat_s2JL { __DEFAULT ->
let {
sat_s2JM [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2JM = I# sat_s2JL } in
case word2Int# r#1_s2IO
of sat_s2JI { __DEFAULT ->
case chr# sat_s2JI
of sat_s2JJ { __DEFAULT ->
let {
sat_s2JK [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2JK = C# sat_s2JJ } in
case $j1_r2Fw sat_s2JK sat_s2JM
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc4_s2Ib
w2_s2IL
of _ [Occ=Dead]
{ (# ipv4_s2JP [Occ=Once*],
ipv5_s2JQ [Occ=Once] #) ->
case ww85_s2IK
of wild10_s2JR {
__DEFAULT ->
let {
sat_s2JS [Occ=Once]
:: Text
[LclId, Str=DmdType]
sat_s2JS =
Text
ipv5_s2JQ
0#
wild10_s2JR } in
(# ipv4_s2JP,
sat_s2JS #);
0# ->
case empty
of vx_s2JT
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2JP, vx_s2JT #)
}
}
};
Skip s'_s2JX [Occ=Once!] ->
case s'_s2JX
of _ [Occ=Dead]
{ I# ww87_s2JZ [Occ=Once] ->
$wloop1_s2II
ww87_s2JZ ww85_s2IK w2_s2IL
};
Yield x_s2K0 [Occ=Once!]
s'_s2K1 [Occ=Once] ->
case x_s2K0
of _ [Occ=Dead]
{ C# ww87_s2K3 [Occ=Once] ->
$w$j1_s2IP ww87_s2K3 s'_s2K1
}
}
}
}
};
True ->
case leWord# r#1_s2IO 56319##
of sat_s2K4 { __DEFAULT ->
case tagToEnum# @ Bool sat_s2K4
of _ [Occ=Dead] {
False ->
case +# ww84_s2IJ 1#
of sat_s2K9 { __DEFAULT ->
let {
sat_s2Ka [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2Ka = I# sat_s2K9 } in
case word2Int# r#1_s2IO
of sat_s2K6 { __DEFAULT ->
case chr# sat_s2K6
of sat_s2K7 { __DEFAULT ->
let {
sat_s2K8 [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2K8 = C# sat_s2K7 } in
case $j1_r2Fw
sat_s2K8 sat_s2Ka
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc4_s2Ib
w2_s2IL
of _ [Occ=Dead]
{ (# ipv4_s2Kd [Occ=Once*],
ipv5_s2Ke [Occ=Once] #) ->
case ww85_s2IK
of wild11_s2Kf {
__DEFAULT ->
let {
sat_s2Kg [Occ=Once]
:: Text
[LclId,
Str=DmdType]
sat_s2Kg =
Text
ipv5_s2Ke
0#
wild11_s2Kf } in
(# ipv4_s2Kd,
sat_s2Kg #);
0# ->
case empty
of vx_s2Kh
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2Kd,
vx_s2Kh #)
}
}
};
Skip s'_s2Kl [Occ=Once!] ->
case s'_s2Kl
of _ [Occ=Dead]
{ I# ww87_s2Kn [Occ=Once] ->
$wloop1_s2II
ww87_s2Kn
ww85_s2IK
w2_s2IL
};
Yield x_s2Ko [Occ=Once!]
s'_s2Kp [Occ=Once] ->
case x_s2Ko
of _ [Occ=Dead]
{ C# ww87_s2Kr [Occ=Once] ->
$w$j1_s2IP
ww87_s2Kr s'_s2Kp
}
}
}
}
};
True ->
case +# ww84_s2IJ 1#
of sat_s2Ks { __DEFAULT ->
case indexWord16Array#
dt_s2HU sat_s2Ks
of r#2_s2Kt { __DEFAULT ->
case +# ww84_s2IJ 2#
of sat_s2KD { __DEFAULT ->
let {
sat_s2KE [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2KE = I# sat_s2KD } in
case word2Int# r#2_s2Kt
of sat_s2Kx { __DEFAULT ->
case -# sat_s2Kx 56320#
of sat_s2Ky { __DEFAULT ->
case word2Int# r#1_s2IO
of sat_s2Ku { __DEFAULT ->
case -# sat_s2Ku 55296#
of sat_s2Kv { __DEFAULT ->
case uncheckedIShiftL#
sat_s2Kv 10#
of sat_s2Kw { __DEFAULT ->
case +# sat_s2Kw sat_s2Ky
of sat_s2Kz { __DEFAULT ->
case +# sat_s2Kz 65536#
of sat_s2KA { __DEFAULT ->
case chr# sat_s2KA
of sat_s2KB { __DEFAULT ->
let {
sat_s2KC [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2KC = C# sat_s2KB } in
case $j1_r2Fw
sat_s2KC sat_s2KE
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc4_s2Ib
w2_s2IL
of _ [Occ=Dead]
{ (# ipv4_s2KH [Occ=Once*],
ipv5_s2KI [Occ=Once] #) ->
case ww85_s2IK
of wild11_s2KJ {
__DEFAULT ->
let {
sat_s2KK [Occ=Once]
:: Text
[LclId,
Str=DmdType]
sat_s2KK =
Text
ipv5_s2KI
0#
wild11_s2KJ } in
(# ipv4_s2KH,
sat_s2KK #);
0# ->
case empty
of vx_s2KL
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2KH,
vx_s2KL #)
}
}
};
Skip s'_s2KP [Occ=Once!] ->
case s'_s2KP
of _ [Occ=Dead]
{ I# ww87_s2KR [Occ=Once] ->
$wloop1_s2II
ww87_s2KR
ww85_s2IK
w2_s2IL
};
Yield x_s2KS [Occ=Once!]
s'_s2KT [Occ=Once] ->
case x_s2KS
of _ [Occ=Dead]
{ C# ww87_s2KV [Occ=Once] ->
$w$j1_s2IP
ww87_s2KV s'_s2KT
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case unsafeFreezeByteArray#
@ RealWorld sc4_s2Ib w2_s2IL
of _ [Occ=Dead]
{ (# ipv4_s2KX [Occ=Once*],
ipv5_s2KY [Occ=Once] #) ->
case ww85_s2IK of wild5_s2KZ {
__DEFAULT ->
let {
sat_s2L0 [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s2L0 =
Text
ipv5_s2KY
0#
wild5_s2KZ } in
(# ipv4_s2KX, sat_s2L0 #);
0# ->
case empty
of vx_s2L1
{ Text _ [Occ=Dead] _ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2KX, vx_s2L1 #)
}
}
}
}
}; } in
case +# ww80_s2Ie 2# of sat_s2L5 { __DEFAULT ->
$wloop1_s2II ww83_s2IH sat_s2L5 s2#1_s2IF
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case int2Word# n_s2Ir
of sat_s2L6 { __DEFAULT ->
case narrow16Word# sat_s2L6
of sat_s2L7 { __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc4_s2Ib
ww80_s2Ie
sat_s2L7
eta_s2Io
of s2#_s2L8 [OS=OneShot] { __DEFAULT ->
case w1_s2Il
of _ [Occ=Dead] { I# ww83_s2La [Occ=Once] ->
letrec {
$wloop1_s2Lb [InlPrag=[0], Occ=LoopBreaker]
:: Int#
-> Int#
-> State# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=3,
Str=DmdType <S,U><L,U><S,U>,
Unf=OtherCon []]
$wloop1_s2Lb =
\ (ww84_s2Lc :: Int#)
(ww85_s2Ld :: Int#)
(w2_s2Le [OS=OneShot]
:: State# RealWorld) ->
case >=# ww84_s2Lc end_s2I5
of sat_s2Lf { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Lf
of _ [Occ=Dead] {
False ->
case indexWord16Array#
dt_s2HU ww84_s2Lc
of r#1_s2Lh { __DEFAULT ->
let {
$w$j1_s2Li [InlPrag=[0],
Occ=Once*!]
:: Char#
-> Int
-> (# State# RealWorld,
Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><L,1*U(U)>,
Unf=OtherCon []]
$w$j1_s2Li =
\ (ww86_s2Lj [OS=OneShot]
:: Char#)
(w3_s2Lk [Occ=Once*!,
OS=OneShot]
:: Int) ->
let {
$j3_s2Ll [Occ=Once*!]
:: Int#
-> State# RealWorld
-> (# State# RealWorld,
Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><S,U>,
Unf=OtherCon []]
$j3_s2Ll =
\ (x2_s2Lm [Occ=Once,
OS=OneShot]
:: Int#)
(eta1_s2Ln [Occ=Once*,
OS=OneShot]
:: State#
RealWorld) ->
case >=# x2_s2Lm sc3_s2Ia
of sat_s2Lo
{ __DEFAULT ->
case tagToEnum#
@ Bool sat_s2Lo
of _ [Occ=Dead] {
False ->
case ord# ww86_s2Lj
of n1_s2Lq [Dmd=<S,U>]
{ __DEFAULT ->
case <#
n1_s2Lq 65536#
of sat_s2Lr
{ __DEFAULT ->
case tagToEnum#
@ Bool
sat_s2Lr
of _ [Occ=Dead] {
False ->
case -#
n1_s2Lq
65536#
of m_s2Lt [Dmd=<S,U>]
{ __DEFAULT ->
case uncheckedIShiftRA#
m_s2Lt 10#
of sat_s2Lu
{ __DEFAULT ->
case +#
sat_s2Lu
55296#
of sat_s2Lv
{ __DEFAULT ->
case int2Word#
sat_s2Lv
of sat_s2Lw
{ __DEFAULT ->
case narrow16Word#
sat_s2Lw
of sat_s2Lx
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc4_s2Ib
ww85_s2Ld
sat_s2Lx
eta1_s2Ln
of s2#1_s2Ly [OS=OneShot]
{ __DEFAULT ->
case andI#
m_s2Lt
1023#
of sat_s2LA
{ __DEFAULT ->
case +#
sat_s2LA
56320#
of sat_s2LB
{ __DEFAULT ->
case int2Word#
sat_s2LB
of sat_s2LC
{ __DEFAULT ->
case narrow16Word#
sat_s2LC
of sat_s2LD
{ __DEFAULT ->
case +#
ww85_s2Ld
1#
of sat_s2Lz
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc4_s2Ib
sat_s2Lz
sat_s2LD
s2#1_s2Ly
of s2#2_s2LE [OS=OneShot]
{ __DEFAULT ->
case w3_s2Lk
of _ [Occ=Dead]
{ I# ww88_s2LG [Occ=Once] ->
case +#
ww85_s2Ld
2#
of sat_s2LH
{ __DEFAULT ->
$wloop1_s2Lb
ww88_s2LG
sat_s2LH
s2#2_s2LE
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case int2Word#
n1_s2Lq
of sat_s2LI
{ __DEFAULT ->
case narrow16Word#
sat_s2LI
of sat_s2LJ
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc4_s2Ib
ww85_s2Ld
sat_s2LJ
eta1_s2Ln
of s2#1_s2LK [OS=OneShot]
{ __DEFAULT ->
case w3_s2Lk
of _ [Occ=Dead]
{ I# ww88_s2LM [Occ=Once] ->
case +#
ww85_s2Ld
1#
of sat_s2LN
{ __DEFAULT ->
$wloop1_s2Lb
ww88_s2LM
sat_s2LN
s2#1_s2LK
}
}
}
}
}
}
}
};
True ->
case +# sc3_s2Ia 1#
of sat_s2LP
{ __DEFAULT ->
case uncheckedIShiftL#
sat_s2LP 1#
of top'_s2LO [Dmd=<S,U>]
{ __DEFAULT ->
case <# top'_s2LO 0#
of sat_s2LQ
{ __DEFAULT ->
case tagToEnum#
@ Bool
sat_s2LQ
of _ [Occ=Dead] {
False ->
case andI#
top'_s2LO
4611686018427387904#
of _ [Occ=Dead] {
__DEFAULT ->
case array_size_error
of _ [Occ=Dead] {
};
0# ->
case uncheckedIShiftL#
top'_s2LO
1#
of sat_s2LU
{ __DEFAULT ->
case newByteArray#
@ RealWorld
sat_s2LU
eta1_s2Ln
of _ [Occ=Dead]
{ (# ipv3_s2LW [Occ=Once*],
ipv4_s2LX #) ->
case <=#
sc3_s2Ia
0#
of sat_s2LY
{ __DEFAULT ->
case tagToEnum#
@ Bool
sat_s2LY
of _ [Occ=Dead] {
False ->
case int2Word#
sc3_s2Ia
of sat_s2M1
{ __DEFAULT ->
case {__pkg_ccall text-1.2.2.1 _hs_text_memcpy forall s.
MutableByteArray# s
-> Word#
-> MutableByteArray# s
-> Word#
-> Word#
-> State# RealWorld
-> (# State# RealWorld #)}_s2M0
@ RealWorld
ipv4_s2LX
0##
sc4_s2Ib
0##
sat_s2M1
ipv3_s2LW
of _ [Occ=Dead]
{ (# ds11_s2M3 [Occ=Once] #) ->
$s$wouter_s2I6
ds11_s2M3
ww85_s2Ld
ww84_s2Lc
top'_s2LO
ipv4_s2LX
}
};
True ->
$s$wouter_s2I6
ipv3_s2LW
ww85_s2Ld
ww84_s2Lc
top'_s2LO
ipv4_s2LX
}
}
}
}
};
True ->
case array_size_error
of _ [Occ=Dead] {
}
}
}
}
}
}
} } in
case ord# ww86_s2Lj
of sat_s2M5 { __DEFAULT ->
case <# sat_s2M5 65536#
of sat_s2M6 { __DEFAULT ->
case tagToEnum# @ Bool sat_s2M6
of _ [Occ=Dead] {
False ->
case +# ww85_s2Ld 1#
of sat_s2M8 { __DEFAULT ->
$j3_s2Ll sat_s2M8 w2_s2Le
};
True ->
$j3_s2Ll ww85_s2Ld w2_s2Le
}
}
} } in
case geWord# r#1_s2Lh 55296##
of sat_s2M9 { __DEFAULT ->
case tagToEnum# @ Bool sat_s2M9
of _ [Occ=Dead] {
False ->
case +# ww84_s2Lc 1#
of sat_s2Me { __DEFAULT ->
let {
sat_s2Mf [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2Mf = I# sat_s2Me } in
case word2Int# r#1_s2Lh
of sat_s2Mb { __DEFAULT ->
case chr# sat_s2Mb
of sat_s2Mc { __DEFAULT ->
let {
sat_s2Md [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2Md = C# sat_s2Mc } in
case $j1_r2Fw sat_s2Md sat_s2Mf
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc4_s2Ib
w2_s2Le
of _ [Occ=Dead]
{ (# ipv4_s2Mi [Occ=Once*],
ipv5_s2Mj [Occ=Once] #) ->
case ww85_s2Ld
of wild10_s2Mk {
__DEFAULT ->
let {
sat_s2Ml [Occ=Once]
:: Text
[LclId, Str=DmdType]
sat_s2Ml =
Text
ipv5_s2Mj
0#
wild10_s2Mk } in
(# ipv4_s2Mi,
sat_s2Ml #);
0# ->
case empty
of vx_s2Mm
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2Mi, vx_s2Mm #)
}
}
};
Skip s'_s2Mq [Occ=Once!] ->
case s'_s2Mq
of _ [Occ=Dead]
{ I# ww87_s2Ms [Occ=Once] ->
$wloop1_s2Lb
ww87_s2Ms ww85_s2Ld w2_s2Le
};
Yield x_s2Mt [Occ=Once!]
s'_s2Mu [Occ=Once] ->
case x_s2Mt
of _ [Occ=Dead]
{ C# ww87_s2Mw [Occ=Once] ->
$w$j1_s2Li ww87_s2Mw s'_s2Mu
}
}
}
}
};
True ->
case leWord# r#1_s2Lh 56319##
of sat_s2Mx { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Mx
of _ [Occ=Dead] {
False ->
case +# ww84_s2Lc 1#
of sat_s2MC { __DEFAULT ->
let {
sat_s2MD [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2MD = I# sat_s2MC } in
case word2Int# r#1_s2Lh
of sat_s2Mz { __DEFAULT ->
case chr# sat_s2Mz
of sat_s2MA { __DEFAULT ->
let {
sat_s2MB [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2MB = C# sat_s2MA } in
case $j1_r2Fw
sat_s2MB sat_s2MD
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc4_s2Ib
w2_s2Le
of _ [Occ=Dead]
{ (# ipv4_s2MG [Occ=Once*],
ipv5_s2MH [Occ=Once] #) ->
case ww85_s2Ld
of wild11_s2MI {
__DEFAULT ->
let {
sat_s2MJ [Occ=Once]
:: Text
[LclId,
Str=DmdType]
sat_s2MJ =
Text
ipv5_s2MH
0#
wild11_s2MI } in
(# ipv4_s2MG,
sat_s2MJ #);
0# ->
case empty
of vx_s2MK
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2MG,
vx_s2MK #)
}
}
};
Skip s'_s2MO [Occ=Once!] ->
case s'_s2MO
of _ [Occ=Dead]
{ I# ww87_s2MQ [Occ=Once] ->
$wloop1_s2Lb
ww87_s2MQ
ww85_s2Ld
w2_s2Le
};
Yield x_s2MR [Occ=Once!]
s'_s2MS [Occ=Once] ->
case x_s2MR
of _ [Occ=Dead]
{ C# ww87_s2MU [Occ=Once] ->
$w$j1_s2Li
ww87_s2MU s'_s2MS
}
}
}
}
};
True ->
case +# ww84_s2Lc 1#
of sat_s2MV { __DEFAULT ->
case indexWord16Array#
dt_s2HU sat_s2MV
of r#2_s2MW { __DEFAULT ->
case +# ww84_s2Lc 2#
of sat_s2N6 { __DEFAULT ->
let {
sat_s2N7 [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2N7 = I# sat_s2N6 } in
case word2Int# r#2_s2MW
of sat_s2N0 { __DEFAULT ->
case -# sat_s2N0 56320#
of sat_s2N1 { __DEFAULT ->
case word2Int# r#1_s2Lh
of sat_s2MX { __DEFAULT ->
case -# sat_s2MX 55296#
of sat_s2MY { __DEFAULT ->
case uncheckedIShiftL#
sat_s2MY 10#
of sat_s2MZ { __DEFAULT ->
case +# sat_s2MZ sat_s2N1
of sat_s2N2 { __DEFAULT ->
case +# sat_s2N2 65536#
of sat_s2N3 { __DEFAULT ->
case chr# sat_s2N3
of sat_s2N4 { __DEFAULT ->
let {
sat_s2N5 [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2N5 = C# sat_s2N4 } in
case $j1_r2Fw
sat_s2N5 sat_s2N7
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc4_s2Ib
w2_s2Le
of _ [Occ=Dead]
{ (# ipv4_s2Na [Occ=Once*],
ipv5_s2Nb [Occ=Once] #) ->
case ww85_s2Ld
of wild11_s2Nc {
__DEFAULT ->
let {
sat_s2Nd [Occ=Once]
:: Text
[LclId,
Str=DmdType]
sat_s2Nd =
Text
ipv5_s2Nb
0#
wild11_s2Nc } in
(# ipv4_s2Na,
sat_s2Nd #);
0# ->
case empty
of vx_s2Ne
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2Na,
vx_s2Ne #)
}
}
};
Skip s'_s2Ni [Occ=Once!] ->
case s'_s2Ni
of _ [Occ=Dead]
{ I# ww87_s2Nk [Occ=Once] ->
$wloop1_s2Lb
ww87_s2Nk
ww85_s2Ld
w2_s2Le
};
Yield x_s2Nl [Occ=Once!]
s'_s2Nm [Occ=Once] ->
case x_s2Nl
of _ [Occ=Dead]
{ C# ww87_s2No [Occ=Once] ->
$w$j1_s2Li
ww87_s2No s'_s2Nm
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case unsafeFreezeByteArray#
@ RealWorld sc4_s2Ib w2_s2Le
of _ [Occ=Dead]
{ (# ipv4_s2Nq [Occ=Once*],
ipv5_s2Nr [Occ=Once] #) ->
case ww85_s2Ld of wild5_s2Ns {
__DEFAULT ->
let {
sat_s2Nt [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s2Nt =
Text
ipv5_s2Nr
0#
wild5_s2Ns } in
(# ipv4_s2Nq, sat_s2Nt #);
0# ->
case empty
of vx_s2Nu
{ Text _ [Occ=Dead] _ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2Nq, vx_s2Nu #)
}
}
}
}
}; } in
case +# ww80_s2Ie 1# of sat_s2Ny { __DEFAULT ->
$wloop1_s2Lb ww83_s2La sat_s2Ny s2#_s2L8
}
}
}
}
}
}
}
};
True ->
case +# sc3_s2Ia 1# of sat_s2NA { __DEFAULT ->
case uncheckedIShiftL# sat_s2NA 1#
of top'_s2Nz [Dmd=<S,U>] { __DEFAULT ->
case <# top'_s2Nz 0# of sat_s2NB { __DEFAULT ->
case tagToEnum# @ Bool sat_s2NB of _ [Occ=Dead] {
False ->
case andI# top'_s2Nz 4611686018427387904#
of _ [Occ=Dead] {
__DEFAULT ->
case array_size_error of _ [Occ=Dead] { };
0# ->
case uncheckedIShiftL# top'_s2Nz 1#
of sat_s2NF { __DEFAULT ->
case newByteArray#
@ RealWorld sat_s2NF eta_s2Io
of _ [Occ=Dead]
{ (# ipv3_s2NH [Occ=Once*], ipv4_s2NI #) ->
case <=# sc3_s2Ia 0#
of sat_s2NJ { __DEFAULT ->
case tagToEnum# @ Bool sat_s2NJ
of _ [Occ=Dead] {
False ->
case int2Word# sc3_s2Ia
of sat_s2NM { __DEFAULT ->
case {__pkg_ccall text-1.2.2.1 _hs_text_memcpy forall s.
MutableByteArray# s
-> Word#
-> MutableByteArray# s
-> Word#
-> Word#
-> State# RealWorld
-> (# State# RealWorld #)}_s2NL
@ RealWorld
ipv4_s2NI
0##
sc4_s2Ib
0##
sat_s2NM
ipv3_s2NH
of _ [Occ=Dead]
{ (# ds11_s2NO [Occ=Once] #) ->
$s$wouter_s2I6
ds11_s2NO
ww80_s2Ie
ww79_s2Id
top'_s2Nz
ipv4_s2NI
}
};
True ->
$s$wouter_s2I6
ipv3_s2NH
ww80_s2Ie
ww79_s2Id
top'_s2Nz
ipv4_s2NI
}
}
}
}
};
True -> case array_size_error of _ [Occ=Dead] { }
}
}
}
}
}
} } in
case ord# ww81_s2Ik of sat_s2NQ { __DEFAULT ->
case <# sat_s2NQ 65536# of sat_s2NR { __DEFAULT ->
case tagToEnum# @ Bool sat_s2NR of _ [Occ=Dead] {
False ->
case +# ww80_s2Ie 1# of sat_s2NT { __DEFAULT ->
$j2_s2Im sat_s2NT w_s2If
};
True -> $j2_s2Im ww80_s2Ie w_s2If
}
}
} } in
case geWord# r#_s2Ii 55296## of sat_s2NU { __DEFAULT ->
case tagToEnum# @ Bool sat_s2NU of _ [Occ=Dead] {
False ->
case +# ww79_s2Id 1# of sat_s2NZ { __DEFAULT ->
let {
sat_s2O0 [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2O0 = I# sat_s2NZ } in
case word2Int# r#_s2Ii of sat_s2NW { __DEFAULT ->
case chr# sat_s2NW of sat_s2NX { __DEFAULT ->
let {
sat_s2NY [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2NY = C# sat_s2NX } in
case $j1_r2Fw sat_s2NY sat_s2O0 of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray# @ RealWorld sc4_s2Ib w_s2If
of _ [Occ=Dead]
{ (# ipv4_s2O3 [Occ=Once*], ipv5_s2O4 [Occ=Once] #) ->
case ww80_s2Ie of wild6_s2O5 {
__DEFAULT ->
let {
sat_s2O6 [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s2O6 = Text ipv5_s2O4 0# wild6_s2O5 } in
(# ipv4_s2O3, sat_s2O6 #);
0# ->
case empty
of vx_s2O7
{ Text _ [Occ=Dead] _ [Occ=Dead] _ [Occ=Dead] ->
(# ipv4_s2O3, vx_s2O7 #)
}
}
};
Skip s'_s2Ob [Occ=Once!] ->
case s'_s2Ob of _ [Occ=Dead] { I# ww82_s2Od [Occ=Once] ->
$wloop_s2Ic ww82_s2Od ww80_s2Ie w_s2If
};
Yield x_s2Oe [Occ=Once!] s'_s2Of [Occ=Once] ->
case x_s2Oe of _ [Occ=Dead] { C# ww82_s2Oh [Occ=Once] ->
$w$j_s2Ij ww82_s2Oh s'_s2Of
}
}
}
}
};
True ->
case leWord# r#_s2Ii 56319## of sat_s2Oi { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Oi of _ [Occ=Dead] {
False ->
case +# ww79_s2Id 1# of sat_s2On { __DEFAULT ->
let {
sat_s2Oo [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2Oo = I# sat_s2On } in
case word2Int# r#_s2Ii of sat_s2Ok { __DEFAULT ->
case chr# sat_s2Ok of sat_s2Ol { __DEFAULT ->
let {
sat_s2Om [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2Om = C# sat_s2Ol } in
case $j1_r2Fw sat_s2Om sat_s2Oo of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray# @ RealWorld sc4_s2Ib w_s2If
of _ [Occ=Dead]
{ (# ipv4_s2Or [Occ=Once*], ipv5_s2Os [Occ=Once] #) ->
case ww80_s2Ie of wild7_s2Ot {
__DEFAULT ->
let {
sat_s2Ou [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s2Ou = Text ipv5_s2Os 0# wild7_s2Ot } in
(# ipv4_s2Or, sat_s2Ou #);
0# ->
case empty
of vx_s2Ov
{ Text _ [Occ=Dead] _ [Occ=Dead] _ [Occ=Dead] ->
(# ipv4_s2Or, vx_s2Ov #)
}
}
};
Skip s'_s2Oz [Occ=Once!] ->
case s'_s2Oz
of _ [Occ=Dead] { I# ww82_s2OB [Occ=Once] ->
$wloop_s2Ic ww82_s2OB ww80_s2Ie w_s2If
};
Yield x_s2OC [Occ=Once!] s'_s2OD [Occ=Once] ->
case x_s2OC
of _ [Occ=Dead] { C# ww82_s2OF [Occ=Once] ->
$w$j_s2Ij ww82_s2OF s'_s2OD
}
}
}
}
};
True ->
case +# ww79_s2Id 1# of sat_s2OG { __DEFAULT ->
case indexWord16Array# dt_s2HU sat_s2OG
of r#1_s2OH { __DEFAULT ->
case +# ww79_s2Id 2# of sat_s2OR { __DEFAULT ->
let {
sat_s2OS [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2OS = I# sat_s2OR } in
case word2Int# r#1_s2OH of sat_s2OL { __DEFAULT ->
case -# sat_s2OL 56320# of sat_s2OM { __DEFAULT ->
case word2Int# r#_s2Ii of sat_s2OI { __DEFAULT ->
case -# sat_s2OI 55296# of sat_s2OJ { __DEFAULT ->
case uncheckedIShiftL# sat_s2OJ 10#
of sat_s2OK { __DEFAULT ->
case +# sat_s2OK sat_s2OM of sat_s2ON { __DEFAULT ->
case +# sat_s2ON 65536# of sat_s2OO { __DEFAULT ->
case chr# sat_s2OO of sat_s2OP { __DEFAULT ->
let {
sat_s2OQ [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2OQ = C# sat_s2OP } in
case $j1_r2Fw sat_s2OQ sat_s2OS of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray# @ RealWorld sc4_s2Ib w_s2If
of _ [Occ=Dead]
{ (# ipv4_s2OV [Occ=Once*], ipv5_s2OW [Occ=Once] #) ->
case ww80_s2Ie of wild7_s2OX {
__DEFAULT ->
let {
sat_s2OY [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s2OY = Text ipv5_s2OW 0# wild7_s2OX } in
(# ipv4_s2OV, sat_s2OY #);
0# ->
case empty
of vx_s2OZ
{ Text _ [Occ=Dead] _ [Occ=Dead] _ [Occ=Dead] ->
(# ipv4_s2OV, vx_s2OZ #)
}
}
};
Skip s'_s2P3 [Occ=Once!] ->
case s'_s2P3
of _ [Occ=Dead] { I# ww82_s2P5 [Occ=Once] ->
$wloop_s2Ic ww82_s2P5 ww80_s2Ie w_s2If
};
Yield x_s2P6 [Occ=Once!] s'_s2P7 [Occ=Once] ->
case x_s2P6
of _ [Occ=Dead] { C# ww82_s2P9 [Occ=Once] ->
$w$j_s2Ij ww82_s2P9 s'_s2P7
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case unsafeFreezeByteArray# @ RealWorld sc4_s2Ib w_s2If
of _ [Occ=Dead]
{ (# ipv4_s2Pb [Occ=Once*], ipv5_s2Pc [Occ=Once] #) ->
case ww80_s2Ie of wild5_s2Pd {
__DEFAULT ->
let {
sat_s2Pe [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s2Pe = Text ipv5_s2Pc 0# wild5_s2Pd } in
(# ipv4_s2Pb, sat_s2Pe #);
0# ->
case empty
of vx_s2Pf { Text _ [Occ=Dead] _ [Occ=Dead] _ [Occ=Dead] ->
(# ipv4_s2Pb, vx_s2Pf #)
}
}
}
}
}; } in
$wloop_s2Ic sc2_s2I9 sc1_s2I8 sc_s2I7; } in
$s$wouter_s2I6 ipv_s2I3 0# dt1_s2HV dt2_s2HW ipv1_s2I4
}
}
}
};
True -> case array_size_error of _ [Occ=Dead] { }
}
of _ [Occ=Dead] { (# _ [Occ=Dead], ipv1_s2Pm [Occ=Once!] #) ->
case ipv1_s2Pm of _ [Occ=Dead] { Text dt4_s2Po dt5_s2Pp dt6_s2Pq ->
letrec {
$wloop_s2Pr [InlPrag=[0], Occ=LoopBreaker] :: Int# -> Int# -> Text
[LclId, Arity=2, Str=DmdType <L,U><S,U>, Unf=OtherCon []]
$wloop_s2Pr =
\ (ww79_s2Ps :: Int#) (ww80_s2Pt :: Int#) ->
case <=# ww80_s2Pt 0# of sat_s2Pu { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Pu of _ [Occ=Dead] {
False ->
case +# dt5_s2Pp ww79_s2Ps of j_s2Pw [Dmd=<S,U>] { __DEFAULT ->
case indexWord16Array# dt4_s2Po j_s2Pw of r#_s2Px { __DEFAULT ->
let {
$s$w$j_s2Py [Occ=Once*!] :: Int# -> Char# -> Text
[LclId, Arity=2, Str=DmdType <L,U><S,U>, Unf=OtherCon []]
$s$w$j_s2Py =
\ (sc_s2Pz :: Int#) (sc1_s2PA :: Char#) ->
case ord# sc1_s2PA of sat_s2PC { __DEFAULT ->
case int2Word# sat_s2PC of x_s2PB [Dmd=<S,U>] { __DEFAULT ->
case leWord# x_s2PB 887## of sat_s2PD { __DEFAULT ->
case tagToEnum# @ Bool sat_s2PD of _ [Occ=Dead] {
False ->
case ord# sc1_s2PA of sat_s2PG { __DEFAULT ->
case {__pkg_ccall base-4.9.1.0 u_iswspace Int#
-> State# RealWorld -> (# State# RealWorld, Int# #)}_s2PF
sat_s2PG realWorld#
of _ [Occ=Dead] { (# _ [Occ=Dead], ds2_s2PJ [Occ=Once!] #) ->
case ds2_s2PJ of _ [Occ=Dead] {
__DEFAULT ->
case +# ww80_s2Pt sc_s2Pz of sat_s2PM { __DEFAULT ->
case +# ww79_s2Ps sc_s2Pz of sat_s2PL { __DEFAULT ->
$wloop_s2Pr sat_s2PL sat_s2PM
}
};
0# -> Text dt4_s2Po dt5_s2Pp ww80_s2Pt
}
}
};
True ->
case x_s2PB of wild4_s2PN {
__DEFAULT ->
case minusWord# wild4_s2PN 9## of sat_s2PO { __DEFAULT ->
case leWord# sat_s2PO 4## of sat_s2PP { __DEFAULT ->
case tagToEnum# @ Bool sat_s2PP of _ [Occ=Dead] {
False ->
case wild4_s2PN of _ [Occ=Dead] {
__DEFAULT -> Text dt4_s2Po dt5_s2Pp ww80_s2Pt;
160## ->
case +# ww80_s2Pt sc_s2Pz of sat_s2PT { __DEFAULT ->
case +# ww79_s2Ps sc_s2Pz of sat_s2PS { __DEFAULT ->
$wloop_s2Pr sat_s2PS sat_s2PT
}
}
};
True ->
case +# ww80_s2Pt sc_s2Pz of sat_s2PV { __DEFAULT ->
case +# ww79_s2Ps sc_s2Pz of sat_s2PU { __DEFAULT ->
$wloop_s2Pr sat_s2PU sat_s2PV
}
}
}
}
};
32## ->
case +# ww80_s2Pt sc_s2Pz of sat_s2PX { __DEFAULT ->
case +# ww79_s2Ps sc_s2Pz of sat_s2PW { __DEFAULT ->
$wloop_s2Pr sat_s2PW sat_s2PX
}
}
}
}
}
}
} } in
case ltWord# r#_s2Px 56320## of sat_s2PY { __DEFAULT ->
case tagToEnum# @ Bool sat_s2PY of _ [Occ=Dead] {
False ->
case gtWord# r#_s2Px 57343## of sat_s2Q0 { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Q0 of _ [Occ=Dead] {
False ->
case -# j_s2Pw 1# of sat_s2Q2 { __DEFAULT ->
case indexWord16Array# dt4_s2Po sat_s2Q2 of r#1_s2Q3 { __DEFAULT ->
case word2Int# r#_s2Px of sat_s2Q7 { __DEFAULT ->
case -# sat_s2Q7 56320# of sat_s2Q8 { __DEFAULT ->
case word2Int# r#1_s2Q3 of sat_s2Q4 { __DEFAULT ->
case -# sat_s2Q4 55296# of sat_s2Q5 { __DEFAULT ->
case uncheckedIShiftL# sat_s2Q5 10# of sat_s2Q6 { __DEFAULT ->
case +# sat_s2Q6 sat_s2Q8 of sat_s2Q9 { __DEFAULT ->
case +# sat_s2Q9 65536# of sat_s2Qa { __DEFAULT ->
case chr# sat_s2Qa of sat_s2Qb { __DEFAULT ->
$s$w$j_s2Py -2# sat_s2Qb
}
}
}
}
}
}
}
}
}
};
True ->
case word2Int# r#_s2Px of sat_s2Qc { __DEFAULT ->
case chr# sat_s2Qc of sat_s2Qd { __DEFAULT ->
$s$w$j_s2Py -1# sat_s2Qd
}
}
}
};
True ->
case word2Int# r#_s2Px of sat_s2Qe { __DEFAULT ->
case chr# sat_s2Qe of sat_s2Qf { __DEFAULT ->
$s$w$j_s2Py -1# sat_s2Qf
}
}
}
}
}
};
True -> empty
}
}; } in
case -# dt6_s2Pq 1# of sat_s2Qg { __DEFAULT ->
case $wloop_s2Pr sat_s2Qg dt6_s2Pq
of _ [Occ=Dead] { Text dt3_s2Qi dt7_s2Qj [Occ=OnceL] dt8_s2Qk ->
letrec {
$wloop1_s2Ql [InlPrag=[0], Occ=LoopBreaker] :: Int# -> Int# -> Text
[LclId, Arity=2, Str=DmdType <L,U><S,U>, Unf=OtherCon []]
$wloop1_s2Ql =
\ (ww79_s2Qm :: Int#) (ww80_s2Qn :: Int#) ->
case >=# ww80_s2Qn dt8_s2Qk of sat_s2Qo { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Qo of _ [Occ=Dead] {
False ->
case +# dt7_s2Qj ww79_s2Qm of j_s2Qq [Dmd=<S,U>] { __DEFAULT ->
case indexWord16Array# dt3_s2Qi j_s2Qq of r#_s2Qr { __DEFAULT ->
let {
$w$j_s2Qs [InlPrag=[0], Occ=Once*!] :: Char# -> Int# -> Text
[LclId, Arity=2, Str=DmdType <S,U><L,U>, Unf=OtherCon []]
$w$j_s2Qs =
\ (w_s2Qt [OS=OneShot] :: Char#) (w1_s2Qu [OS=OneShot] :: Int#) ->
case ord# w_s2Qt of sat_s2Qw { __DEFAULT ->
case int2Word# sat_s2Qw of x_s2Qv [Dmd=<S,U>] { __DEFAULT ->
case leWord# x_s2Qv 887## of sat_s2Qx { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Qx of _ [Occ=Dead] {
False ->
case ord# w_s2Qt of sat_s2QA { __DEFAULT ->
case {__pkg_ccall base-4.9.1.0 u_iswspace Int#
-> State# RealWorld -> (# State# RealWorld, Int# #)}_s2Qz
sat_s2QA realWorld#
of _ [Occ=Dead] { (# _ [Occ=Dead], ds2_s2QD [Occ=Once!] #) ->
case ds2_s2QD of _ [Occ=Dead] {
__DEFAULT ->
case +# ww80_s2Qn w1_s2Qu of sat_s2QG { __DEFAULT ->
case +# ww79_s2Qm w1_s2Qu of sat_s2QF { __DEFAULT ->
$wloop1_s2Ql sat_s2QF sat_s2QG
}
};
0# ->
case -# dt8_s2Qk ww80_s2Qn of sat_s2QH { __DEFAULT ->
Text dt3_s2Qi j_s2Qq sat_s2QH
}
}
}
};
True ->
case x_s2Qv of wild5_s2QI {
__DEFAULT ->
case minusWord# wild5_s2QI 9## of sat_s2QJ { __DEFAULT ->
case leWord# sat_s2QJ 4## of sat_s2QK { __DEFAULT ->
case tagToEnum# @ Bool sat_s2QK of _ [Occ=Dead] {
False ->
case wild5_s2QI of _ [Occ=Dead] {
__DEFAULT ->
case -# dt8_s2Qk ww80_s2Qn of sat_s2QN { __DEFAULT ->
Text dt3_s2Qi j_s2Qq sat_s2QN
};
160## ->
case +# ww80_s2Qn w1_s2Qu of sat_s2QP { __DEFAULT ->
case +# ww79_s2Qm w1_s2Qu of sat_s2QO { __DEFAULT ->
$wloop1_s2Ql sat_s2QO sat_s2QP
}
}
};
True ->
case +# ww80_s2Qn w1_s2Qu of sat_s2QR { __DEFAULT ->
case +# ww79_s2Qm w1_s2Qu of sat_s2QQ { __DEFAULT ->
$wloop1_s2Ql sat_s2QQ sat_s2QR
}
}
}
}
};
32## ->
case +# ww80_s2Qn w1_s2Qu of sat_s2QT { __DEFAULT ->
case +# ww79_s2Qm w1_s2Qu of sat_s2QS { __DEFAULT ->
$wloop1_s2Ql sat_s2QS sat_s2QT
}
}
}
}
}
}
} } in
case ltWord# r#_s2Qr 55296## of sat_s2QU { __DEFAULT ->
case tagToEnum# @ Bool sat_s2QU of _ [Occ=Dead] {
False ->
case gtWord# r#_s2Qr 56319## of sat_s2QW { __DEFAULT ->
case tagToEnum# @ Bool sat_s2QW of _ [Occ=Dead] {
False ->
case +# j_s2Qq 1# of sat_s2QY { __DEFAULT ->
case indexWord16Array# dt3_s2Qi sat_s2QY of r#1_s2QZ { __DEFAULT ->
case word2Int# r#1_s2QZ of sat_s2R3 { __DEFAULT ->
case -# sat_s2R3 56320# of sat_s2R4 { __DEFAULT ->
case word2Int# r#_s2Qr of sat_s2R0 { __DEFAULT ->
case -# sat_s2R0 55296# of sat_s2R1 { __DEFAULT ->
case uncheckedIShiftL# sat_s2R1 10# of sat_s2R2 { __DEFAULT ->
case +# sat_s2R2 sat_s2R4 of sat_s2R5 { __DEFAULT ->
case +# sat_s2R5 65536# of sat_s2R6 { __DEFAULT ->
case chr# sat_s2R6 of sat_s2R7 { __DEFAULT ->
$w$j_s2Qs sat_s2R7 2#
}
}
}
}
}
}
}
}
}
};
True ->
case word2Int# r#_s2Qr of sat_s2R8 { __DEFAULT ->
case chr# sat_s2R8 of sat_s2R9 { __DEFAULT ->
$w$j_s2Qs sat_s2R9 1#
}
}
}
};
True ->
case word2Int# r#_s2Qr of sat_s2Ra { __DEFAULT ->
case chr# sat_s2Ra of sat_s2Rb { __DEFAULT ->
$w$j_s2Qs sat_s2Rb 1#
}
}
}
}
}
};
True -> empty
}
}; } in
case $wloop1_s2Ql 0# 0#
of _ [Occ=Dead] { Text dt9_s2Rd dt10_s2Re dt11_s2Rf ->
case <# dt11_s2Rf 0# of sat_s2Rg { __DEFAULT ->
case case tagToEnum# @ Bool sat_s2Rg of _ [Occ=Dead] {
False ->
case andI# dt11_s2Rf 4611686018427387904# of _ [Occ=Dead] {
__DEFAULT -> case array_size_error of _ [Occ=Dead] { };
0# ->
case uncheckedIShiftL# dt11_s2Rf 1# of sat_s2Rk { __DEFAULT ->
case newByteArray# @ RealWorld sat_s2Rk realWorld#
of _ [Occ=Dead]
{ (# ipv2_s2Rm [Occ=Once], ipv3_s2Rn [Occ=Once] #) ->
case +# dt10_s2Re dt11_s2Rf of end_s2Ro [Dmd=<S,U>] { __DEFAULT ->
letrec {
$s$wouter_s2Rp [Occ=LoopBreaker]
:: State# RealWorld
-> Int#
-> Char#
-> Char#
-> Int#
-> Int#
-> MutableByteArray# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=7,
Str=DmdType <S,U><L,U><L,U><S,U><L,U><L,U><L,U>,
Unf=OtherCon []]
$s$wouter_s2Rp =
\ (sc_s2Rq [Occ=Once, OS=OneShot] :: State# RealWorld)
(sc1_s2Rr [Occ=Once] :: Int#)
(sc2_s2Rs [Occ=Once] :: Char#)
(sc3_s2Rt [Occ=Once] :: Char#)
(sc4_s2Ru [Occ=Once] :: Int#)
(sc5_s2Rv :: Int#)
(sc6_s2Rw :: MutableByteArray# RealWorld) ->
letrec {
$wloop2_s2Rx [InlPrag=[0], Occ=LoopBreaker]
:: Int#
-> Char#
-> Char#
-> Int#
-> State# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=5,
Str=DmdType <L,U><S,U><L,U><L,U><S,U>,
Unf=OtherCon []]
$wloop2_s2Rx =
\ (ww79_s2Ry :: Int#)
(ww80_s2Rz :: Char#)
(ww81_s2RA :: Char#)
(ww82_s2RB :: Int#)
(w_s2RC [OS=OneShot] :: State# RealWorld) ->
let {
$s$w$j_s2RD [Occ=Once!]
:: Int# -> Char# -> Char# -> Char# -> (# State# RealWorld, Text #)
[LclId, Arity=4, Str=DmdType <L,U><L,U><L,U><S,U>, Unf=OtherCon []]
$s$w$j_s2RD =
\ (sc7_s2RE [Occ=Once*] :: Int#)
(sc8_s2RF [Occ=Once*] :: Char#)
(sc9_s2RG [Occ=Once*] :: Char#)
(sc10_s2RH :: Char#) ->
let {
$j2_s2RI [Occ=Once*!]
:: Int# -> State# RealWorld -> (# State# RealWorld, Text #)
[LclId, Arity=2, Str=DmdType <S,U><S,U>, Unf=OtherCon []]
$j2_s2RI =
\ (x1_s2RJ [Occ=Once, OS=OneShot] :: Int#)
(eta_s2RK [Occ=Once*, OS=OneShot] :: State# RealWorld) ->
case >=# x1_s2RJ sc5_s2Rv of sat_s2RL { __DEFAULT ->
case tagToEnum# @ Bool sat_s2RL of _ [Occ=Dead] {
False ->
case ord# sc10_s2RH
of n_s2RN [Dmd=<S,U>] { __DEFAULT ->
case <# n_s2RN 65536# of sat_s2RO { __DEFAULT ->
case tagToEnum# @ Bool sat_s2RO of _ [Occ=Dead] {
False ->
case -# n_s2RN 65536#
of m_s2RQ [Dmd=<S,U>] { __DEFAULT ->
case uncheckedIShiftRA# m_s2RQ 10#
of sat_s2RR { __DEFAULT ->
case +# sat_s2RR 55296# of sat_s2RS { __DEFAULT ->
case int2Word# sat_s2RS of sat_s2RT { __DEFAULT ->
case narrow16Word# sat_s2RT
of sat_s2RU { __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww82_s2RB
sat_s2RU
eta_s2RK
of s2#_s2RV [OS=OneShot] { __DEFAULT ->
case andI# m_s2RQ 1023# of sat_s2RX { __DEFAULT ->
case +# sat_s2RX 56320# of sat_s2RY { __DEFAULT ->
case int2Word# sat_s2RY of sat_s2RZ { __DEFAULT ->
case narrow16Word# sat_s2RZ
of sat_s2S0 { __DEFAULT ->
case +# ww82_s2RB 1# of sat_s2RW { __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
sat_s2RW
sat_s2S0
s2#_s2RV
of s2#1_s2S1 [OS=OneShot] { __DEFAULT ->
letrec {
$wloop3_s2S2 [InlPrag=[0], Occ=LoopBreaker]
:: Int#
-> Char#
-> Char#
-> Int#
-> State# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=5,
Str=DmdType <L,U><S,U><L,U><L,U><S,U>,
Unf=OtherCon []]
$wloop3_s2S2 =
\ (ww83_s2S3 :: Int#)
(ww84_s2S4 :: Char#)
(ww85_s2S5 :: Char#)
(ww86_s2S6 :: Int#)
(w1_s2S7 [OS=OneShot] :: State# RealWorld) ->
let {
$w$j_s2S8 [InlPrag=[0], Occ=Once*!]
:: Char#
-> CC Int
-> (# State# RealWorld, Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><L,1*U(U(U),U,U)>,
Unf=OtherCon []]
$w$j_s2S8 =
\ (ww87_s2S9 [OS=OneShot] :: Char#)
(w2_s2Sa [Occ=Once*!, OS=OneShot]
:: CC Int) ->
let {
$j3_s2Sb [Occ=Once*!]
:: Int#
-> State# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><S,U>,
Unf=OtherCon []]
$j3_s2Sb =
\ (x2_s2Sc [Occ=Once, OS=OneShot]
:: Int#)
(eta1_s2Sd [Occ=Once*,
OS=OneShot]
:: State# RealWorld) ->
case >=# x2_s2Sc sc5_s2Rv
of sat_s2Se { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Se
of _ [Occ=Dead] {
False ->
case ord# ww87_s2S9
of n1_s2Sg [Dmd=<S,U>]
{ __DEFAULT ->
case <# n1_s2Sg 65536#
of sat_s2Sh { __DEFAULT ->
case tagToEnum#
@ Bool sat_s2Sh
of _ [Occ=Dead] {
False ->
case -# n1_s2Sg 65536#
of m1_s2Sj [Dmd=<S,U>]
{ __DEFAULT ->
case uncheckedIShiftRA#
m1_s2Sj 10#
of sat_s2Sk
{ __DEFAULT ->
case +# sat_s2Sk 55296#
of sat_s2Sl
{ __DEFAULT ->
case int2Word# sat_s2Sl
of sat_s2Sm
{ __DEFAULT ->
case narrow16Word#
sat_s2Sm
of sat_s2Sn
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww86_s2S6
sat_s2Sn
eta1_s2Sd
of s2#2_s2So [OS=OneShot]
{ __DEFAULT ->
case andI# m1_s2Sj 1023#
of sat_s2Sq
{ __DEFAULT ->
case +# sat_s2Sq 56320#
of sat_s2Sr
{ __DEFAULT ->
case int2Word# sat_s2Sr
of sat_s2Ss
{ __DEFAULT ->
case narrow16Word#
sat_s2Ss
of sat_s2St
{ __DEFAULT ->
case +# ww86_s2S6 1#
of sat_s2Sp
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
sat_s2Sp
sat_s2St
s2#2_s2So
of s2#3_s2Su [OS=OneShot]
{ __DEFAULT ->
case w2_s2Sa
of _ [Occ=Dead]
{ CC ww89_s2Sw [Occ=Once!]
ww90_s2Sx [Occ=Once]
ww91_s2Sy [Occ=Once] ->
case ww89_s2Sw
of _ [Occ=Dead]
{ I# ww93_s2SA [Occ=Once] ->
case +# ww86_s2S6 2#
of sat_s2SB
{ __DEFAULT ->
$wloop3_s2S2
ww93_s2SA
ww90_s2Sx
ww91_s2Sy
sat_s2SB
s2#3_s2Su
}
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case int2Word# n1_s2Sg
of sat_s2SC
{ __DEFAULT ->
case narrow16Word#
sat_s2SC
of sat_s2SD
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww86_s2S6
sat_s2SD
eta1_s2Sd
of s2#2_s2SE [OS=OneShot]
{ __DEFAULT ->
case w2_s2Sa
of _ [Occ=Dead]
{ CC ww89_s2SG [Occ=Once!]
ww90_s2SH [Occ=Once]
ww91_s2SI [Occ=Once] ->
case ww89_s2SG
of _ [Occ=Dead]
{ I# ww93_s2SK [Occ=Once] ->
case +# ww86_s2S6 1#
of sat_s2SL
{ __DEFAULT ->
$wloop3_s2S2
ww93_s2SK
ww90_s2SH
ww91_s2SI
sat_s2SL
s2#2_s2SE
}
}
}
}
}
}
}
}
};
True ->
case +# sc5_s2Rv 1#
of sat_s2SN { __DEFAULT ->
case uncheckedIShiftL#
sat_s2SN 1#
of top'_s2SM [Dmd=<S,U>]
{ __DEFAULT ->
case <# top'_s2SM 0#
of sat_s2SO { __DEFAULT ->
case tagToEnum#
@ Bool sat_s2SO
of _ [Occ=Dead] {
False ->
case andI#
top'_s2SM
4611686018427387904#
of _ [Occ=Dead] {
__DEFAULT ->
case array_size_error
of _ [Occ=Dead] {
};
0# ->
case uncheckedIShiftL#
top'_s2SM 1#
of sat_s2SS
{ __DEFAULT ->
case newByteArray#
@ RealWorld
sat_s2SS
eta1_s2Sd
of _ [Occ=Dead]
{ (# ipv4_s2SU [Occ=Once*],
ipv5_s2SV #) ->
case <=# sc5_s2Rv 0#
of sat_s2SW
{ __DEFAULT ->
case tagToEnum#
@ Bool
sat_s2SW
of _ [Occ=Dead] {
False ->
case int2Word#
sc5_s2Rv
of sat_s2SZ
{ __DEFAULT ->
case {__pkg_ccall text-1.2.2.1 _hs_text_memcpy forall s.
MutableByteArray# s
-> Word#
-> MutableByteArray# s
-> Word#
-> Word#
-> State# RealWorld
-> (# State# RealWorld #)}_s2SY
@ RealWorld
ipv5_s2SV
0##
sc6_s2Rw
0##
sat_s2SZ
ipv4_s2SU
of _ [Occ=Dead]
{ (# ds11_s2T1 [Occ=Once] #) ->
$s$wouter_s2Rp
ds11_s2T1
ww86_s2S6
ww85_s2S5
ww84_s2S4
ww83_s2S3
top'_s2SM
ipv5_s2SV
}
};
True ->
$s$wouter_s2Rp
ipv4_s2SU
ww86_s2S6
ww85_s2S5
ww84_s2S4
ww83_s2S3
top'_s2SM
ipv5_s2SV
}
}
}
}
};
True ->
case array_size_error
of _ [Occ=Dead] {
}
}
}
}
}
}
} } in
case ord# ww87_s2S9
of sat_s2T3 { __DEFAULT ->
case <# sat_s2T3 65536#
of sat_s2T4 { __DEFAULT ->
case tagToEnum# @ Bool sat_s2T4
of _ [Occ=Dead] {
False ->
case +# ww86_s2S6 1#
of sat_s2T6 { __DEFAULT ->
$j3_s2Sb sat_s2T6 w1_s2S7
};
True -> $j3_s2Sb ww86_s2S6 w1_s2S7
}
}
} } in
case ww84_s2S4 of ds3_s2T7 {
__DEFAULT ->
let {
sat_s2T8 [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2T8 = I# ww83_s2S3 } in
let {
sat_s2T9 [Occ=Once] :: CC Int
[LclId, Str=DmdType]
sat_s2T9 =
CC
@ Int
sat_s2T8
ww85_s2S5
'\NUL'# } in
$w$j_s2S8 ds3_s2T7 sat_s2T9;
'\NUL'# ->
case >=# ww83_s2S3 end_s2Ro
of sat_s2Ta { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Ta
of _ [Occ=Dead] {
False ->
case indexWord16Array#
dt9_s2Rd ww83_s2S3
of r#_s2Tc { __DEFAULT ->
case geWord# r#_s2Tc 55296##
of sat_s2Td { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Td
of _ [Occ=Dead] {
False ->
case +# ww83_s2S3 1#
of sat_s2Ti { __DEFAULT ->
let {
sat_s2Tj [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2Tj = I# sat_s2Ti } in
case word2Int# r#_s2Tc
of sat_s2Tf { __DEFAULT ->
case chr# sat_s2Tf
of sat_s2Tg { __DEFAULT ->
let {
sat_s2Th [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2Th = C# sat_s2Tg } in
case upperMapping
@ Int sat_s2Th sat_s2Tj
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc6_s2Rw
w1_s2S7
of _ [Occ=Dead]
{ (# ipv4_s2Tm [Occ=Once*],
ipv5_s2Tn [Occ=Once] #) ->
case ww86_s2S6
of wild12_s2To {
__DEFAULT ->
let {
sat_s2Tp [Occ=Once]
:: Text
[LclId, Str=DmdType]
sat_s2Tp =
Text
ipv5_s2Tn
0#
wild12_s2To } in
(# ipv4_s2Tm,
sat_s2Tp #);
0# ->
case empty
of vx_s2Tq
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2Tm, vx_s2Tq #)
}
}
};
Skip s'_s2Tu [Occ=Once!] ->
case s'_s2Tu
of _ [Occ=Dead]
{ CC ww88_s2Tw [Occ=Once!]
ww89_s2Tx [Occ=Once]
ww90_s2Ty [Occ=Once] ->
case ww88_s2Tw
of _ [Occ=Dead]
{ I# ww92_s2TA [Occ=Once] ->
$wloop3_s2S2
ww92_s2TA
ww89_s2Tx
ww90_s2Ty
ww86_s2S6
w1_s2S7
}
};
Yield x_s2TB [Occ=Once!]
s'_s2TC [Occ=Once] ->
case x_s2TB
of _ [Occ=Dead]
{ C# ww88_s2TE [Occ=Once] ->
$w$j_s2S8 ww88_s2TE s'_s2TC
}
}
}
}
};
True ->
case leWord# r#_s2Tc 56319##
of sat_s2TF { __DEFAULT ->
case tagToEnum# @ Bool sat_s2TF
of _ [Occ=Dead] {
False ->
case +# ww83_s2S3 1#
of sat_s2TK { __DEFAULT ->
let {
sat_s2TL [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2TL = I# sat_s2TK } in
case word2Int# r#_s2Tc
of sat_s2TH { __DEFAULT ->
case chr# sat_s2TH
of sat_s2TI { __DEFAULT ->
let {
sat_s2TJ [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2TJ = C# sat_s2TI } in
case upperMapping
@ Int
sat_s2TJ
sat_s2TL
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc6_s2Rw
w1_s2S7
of _ [Occ=Dead]
{ (# ipv4_s2TO [Occ=Once*],
ipv5_s2TP [Occ=Once] #) ->
case ww86_s2S6
of wild13_s2TQ {
__DEFAULT ->
let {
sat_s2TR [Occ=Once]
:: Text
[LclId,
Str=DmdType]
sat_s2TR =
Text
ipv5_s2TP
0#
wild13_s2TQ } in
(# ipv4_s2TO,
sat_s2TR #);
0# ->
case empty
of vx_s2TS
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2TO,
vx_s2TS #)
}
}
};
Skip s'_s2TW [Occ=Once!] ->
case s'_s2TW
of _ [Occ=Dead]
{ CC ww88_s2TY [Occ=Once!]
ww89_s2TZ [Occ=Once]
ww90_s2U0 [Occ=Once] ->
case ww88_s2TY
of _ [Occ=Dead]
{ I# ww92_s2U2 [Occ=Once] ->
$wloop3_s2S2
ww92_s2U2
ww89_s2TZ
ww90_s2U0
ww86_s2S6
w1_s2S7
}
};
Yield x_s2U3 [Occ=Once!]
s'_s2U4 [Occ=Once] ->
case x_s2U3
of _ [Occ=Dead]
{ C# ww88_s2U6 [Occ=Once] ->
$w$j_s2S8
ww88_s2U6 s'_s2U4
}
}
}
}
};
True ->
case +# ww83_s2S3 1#
of sat_s2U7 { __DEFAULT ->
case indexWord16Array#
dt9_s2Rd sat_s2U7
of r#1_s2U8 { __DEFAULT ->
case +# ww83_s2S3 2#
of sat_s2Ui { __DEFAULT ->
let {
sat_s2Uj [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2Uj = I# sat_s2Ui } in
case word2Int# r#1_s2U8
of sat_s2Uc { __DEFAULT ->
case -# sat_s2Uc 56320#
of sat_s2Ud { __DEFAULT ->
case word2Int# r#_s2Tc
of sat_s2U9 { __DEFAULT ->
case -# sat_s2U9 55296#
of sat_s2Ua { __DEFAULT ->
case uncheckedIShiftL#
sat_s2Ua 10#
of sat_s2Ub { __DEFAULT ->
case +# sat_s2Ub sat_s2Ud
of sat_s2Ue { __DEFAULT ->
case +# sat_s2Ue 65536#
of sat_s2Uf { __DEFAULT ->
case chr# sat_s2Uf
of sat_s2Ug { __DEFAULT ->
let {
sat_s2Uh [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2Uh = C# sat_s2Ug } in
case upperMapping
@ Int
sat_s2Uh
sat_s2Uj
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc6_s2Rw
w1_s2S7
of _ [Occ=Dead]
{ (# ipv4_s2Um [Occ=Once*],
ipv5_s2Un [Occ=Once] #) ->
case ww86_s2S6
of wild13_s2Uo {
__DEFAULT ->
let {
sat_s2Up [Occ=Once]
:: Text
[LclId,
Str=DmdType]
sat_s2Up =
Text
ipv5_s2Un
0#
wild13_s2Uo } in
(# ipv4_s2Um,
sat_s2Up #);
0# ->
case empty
of vx_s2Uq
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2Um,
vx_s2Uq #)
}
}
};
Skip s'_s2Uu [Occ=Once!] ->
case s'_s2Uu
of _ [Occ=Dead]
{ CC ww88_s2Uw [Occ=Once!]
ww89_s2Ux [Occ=Once]
ww90_s2Uy [Occ=Once] ->
case ww88_s2Uw
of _ [Occ=Dead]
{ I# ww92_s2UA [Occ=Once] ->
$wloop3_s2S2
ww92_s2UA
ww89_s2Ux
ww90_s2Uy
ww86_s2S6
w1_s2S7
}
};
Yield x_s2UB [Occ=Once!]
s'_s2UC [Occ=Once] ->
case x_s2UB
of _ [Occ=Dead]
{ C# ww88_s2UE [Occ=Once] ->
$w$j_s2S8
ww88_s2UE s'_s2UC
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case unsafeFreezeByteArray#
@ RealWorld sc6_s2Rw w1_s2S7
of _ [Occ=Dead]
{ (# ipv4_s2UG [Occ=Once*],
ipv5_s2UH [Occ=Once] #) ->
case ww86_s2S6 of wild10_s2UI {
__DEFAULT ->
let {
sat_s2UJ [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s2UJ =
Text
ipv5_s2UH
0#
wild10_s2UI } in
(# ipv4_s2UG, sat_s2UJ #);
0# ->
case empty
of vx_s2UK
{ Text _ [Occ=Dead] _ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2UG, vx_s2UK #)
}
}
}
}
}
}; } in
case +# ww82_s2RB 2# of sat_s2UO { __DEFAULT ->
$wloop3_s2S2
sc7_s2RE sc8_s2RF sc9_s2RG sat_s2UO s2#1_s2S1
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case int2Word# n_s2RN of sat_s2UP { __DEFAULT ->
case narrow16Word# sat_s2UP
of sat_s2UQ { __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww82_s2RB
sat_s2UQ
eta_s2RK
of s2#_s2UR [OS=OneShot] { __DEFAULT ->
letrec {
$wloop3_s2US [InlPrag=[0], Occ=LoopBreaker]
:: Int#
-> Char#
-> Char#
-> Int#
-> State# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=5,
Str=DmdType <L,U><S,U><L,U><L,U><S,U>,
Unf=OtherCon []]
$wloop3_s2US =
\ (ww83_s2UT :: Int#)
(ww84_s2UU :: Char#)
(ww85_s2UV :: Char#)
(ww86_s2UW :: Int#)
(w1_s2UX [OS=OneShot] :: State# RealWorld) ->
let {
$w$j_s2UY [InlPrag=[0], Occ=Once*!]
:: Char#
-> CC Int
-> (# State# RealWorld, Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><L,1*U(U(U),U,U)>,
Unf=OtherCon []]
$w$j_s2UY =
\ (ww87_s2UZ [OS=OneShot] :: Char#)
(w2_s2V0 [Occ=Once*!, OS=OneShot]
:: CC Int) ->
let {
$j3_s2V1 [Occ=Once*!]
:: Int#
-> State# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><S,U>,
Unf=OtherCon []]
$j3_s2V1 =
\ (x2_s2V2 [Occ=Once, OS=OneShot]
:: Int#)
(eta1_s2V3 [Occ=Once*,
OS=OneShot]
:: State# RealWorld) ->
case >=# x2_s2V2 sc5_s2Rv
of sat_s2V4 { __DEFAULT ->
case tagToEnum# @ Bool sat_s2V4
of _ [Occ=Dead] {
False ->
case ord# ww87_s2UZ
of n1_s2V6 [Dmd=<S,U>]
{ __DEFAULT ->
case <# n1_s2V6 65536#
of sat_s2V7 { __DEFAULT ->
case tagToEnum#
@ Bool sat_s2V7
of _ [Occ=Dead] {
False ->
case -# n1_s2V6 65536#
of m_s2V9 [Dmd=<S,U>]
{ __DEFAULT ->
case uncheckedIShiftRA#
m_s2V9 10#
of sat_s2Va
{ __DEFAULT ->
case +# sat_s2Va 55296#
of sat_s2Vb
{ __DEFAULT ->
case int2Word# sat_s2Vb
of sat_s2Vc
{ __DEFAULT ->
case narrow16Word#
sat_s2Vc
of sat_s2Vd
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww86_s2UW
sat_s2Vd
eta1_s2V3
of s2#1_s2Ve [OS=OneShot]
{ __DEFAULT ->
case andI# m_s2V9 1023#
of sat_s2Vg
{ __DEFAULT ->
case +# sat_s2Vg 56320#
of sat_s2Vh
{ __DEFAULT ->
case int2Word# sat_s2Vh
of sat_s2Vi
{ __DEFAULT ->
case narrow16Word#
sat_s2Vi
of sat_s2Vj
{ __DEFAULT ->
case +# ww86_s2UW 1#
of sat_s2Vf
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
sat_s2Vf
sat_s2Vj
s2#1_s2Ve
of s2#2_s2Vk [OS=OneShot]
{ __DEFAULT ->
case w2_s2V0
of _ [Occ=Dead]
{ CC ww89_s2Vm [Occ=Once!]
ww90_s2Vn [Occ=Once]
ww91_s2Vo [Occ=Once] ->
case ww89_s2Vm
of _ [Occ=Dead]
{ I# ww93_s2Vq [Occ=Once] ->
case +# ww86_s2UW 2#
of sat_s2Vr
{ __DEFAULT ->
$wloop3_s2US
ww93_s2Vq
ww90_s2Vn
ww91_s2Vo
sat_s2Vr
s2#2_s2Vk
}
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case int2Word# n1_s2V6
of sat_s2Vs
{ __DEFAULT ->
case narrow16Word#
sat_s2Vs
of sat_s2Vt
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww86_s2UW
sat_s2Vt
eta1_s2V3
of s2#1_s2Vu [OS=OneShot]
{ __DEFAULT ->
case w2_s2V0
of _ [Occ=Dead]
{ CC ww89_s2Vw [Occ=Once!]
ww90_s2Vx [Occ=Once]
ww91_s2Vy [Occ=Once] ->
case ww89_s2Vw
of _ [Occ=Dead]
{ I# ww93_s2VA [Occ=Once] ->
case +# ww86_s2UW 1#
of sat_s2VB
{ __DEFAULT ->
$wloop3_s2US
ww93_s2VA
ww90_s2Vx
ww91_s2Vy
sat_s2VB
s2#1_s2Vu
}
}
}
}
}
}
}
}
};
True ->
case +# sc5_s2Rv 1#
of sat_s2VD { __DEFAULT ->
case uncheckedIShiftL#
sat_s2VD 1#
of top'_s2VC [Dmd=<S,U>]
{ __DEFAULT ->
case <# top'_s2VC 0#
of sat_s2VE { __DEFAULT ->
case tagToEnum#
@ Bool sat_s2VE
of _ [Occ=Dead] {
False ->
case andI#
top'_s2VC
4611686018427387904#
of _ [Occ=Dead] {
__DEFAULT ->
case array_size_error
of _ [Occ=Dead] {
};
0# ->
case uncheckedIShiftL#
top'_s2VC 1#
of sat_s2VI
{ __DEFAULT ->
case newByteArray#
@ RealWorld
sat_s2VI
eta1_s2V3
of _ [Occ=Dead]
{ (# ipv4_s2VK [Occ=Once*],
ipv5_s2VL #) ->
case <=# sc5_s2Rv 0#
of sat_s2VM
{ __DEFAULT ->
case tagToEnum#
@ Bool
sat_s2VM
of _ [Occ=Dead] {
False ->
case int2Word#
sc5_s2Rv
of sat_s2VP
{ __DEFAULT ->
case {__pkg_ccall text-1.2.2.1 _hs_text_memcpy forall s.
MutableByteArray# s
-> Word#
-> MutableByteArray# s
-> Word#
-> Word#
-> State# RealWorld
-> (# State# RealWorld #)}_s2VO
@ RealWorld
ipv5_s2VL
0##
sc6_s2Rw
0##
sat_s2VP
ipv4_s2VK
of _ [Occ=Dead]
{ (# ds11_s2VR [Occ=Once] #) ->
$s$wouter_s2Rp
ds11_s2VR
ww86_s2UW
ww85_s2UV
ww84_s2UU
ww83_s2UT
top'_s2VC
ipv5_s2VL
}
};
True ->
$s$wouter_s2Rp
ipv4_s2VK
ww86_s2UW
ww85_s2UV
ww84_s2UU
ww83_s2UT
top'_s2VC
ipv5_s2VL
}
}
}
}
};
True ->
case array_size_error
of _ [Occ=Dead] {
}
}
}
}
}
}
} } in
case ord# ww87_s2UZ
of sat_s2VT { __DEFAULT ->
case <# sat_s2VT 65536#
of sat_s2VU { __DEFAULT ->
case tagToEnum# @ Bool sat_s2VU
of _ [Occ=Dead] {
False ->
case +# ww86_s2UW 1#
of sat_s2VW { __DEFAULT ->
$j3_s2V1 sat_s2VW w1_s2UX
};
True -> $j3_s2V1 ww86_s2UW w1_s2UX
}
}
} } in
case ww84_s2UU of ds3_s2VX {
__DEFAULT ->
let {
sat_s2VY [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2VY = I# ww83_s2UT } in
let {
sat_s2VZ [Occ=Once] :: CC Int
[LclId, Str=DmdType]
sat_s2VZ =
CC
@ Int
sat_s2VY
ww85_s2UV
'\NUL'# } in
$w$j_s2UY ds3_s2VX sat_s2VZ;
'\NUL'# ->
case >=# ww83_s2UT end_s2Ro
of sat_s2W0 { __DEFAULT ->
case tagToEnum# @ Bool sat_s2W0
of _ [Occ=Dead] {
False ->
case indexWord16Array#
dt9_s2Rd ww83_s2UT
of r#_s2W2 { __DEFAULT ->
case geWord# r#_s2W2 55296##
of sat_s2W3 { __DEFAULT ->
case tagToEnum# @ Bool sat_s2W3
of _ [Occ=Dead] {
False ->
case +# ww83_s2UT 1#
of sat_s2W8 { __DEFAULT ->
let {
sat_s2W9 [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2W9 = I# sat_s2W8 } in
case word2Int# r#_s2W2
of sat_s2W5 { __DEFAULT ->
case chr# sat_s2W5
of sat_s2W6 { __DEFAULT ->
let {
sat_s2W7 [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2W7 = C# sat_s2W6 } in
case upperMapping
@ Int sat_s2W7 sat_s2W9
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc6_s2Rw
w1_s2UX
of _ [Occ=Dead]
{ (# ipv4_s2Wc [Occ=Once*],
ipv5_s2Wd [Occ=Once] #) ->
case ww86_s2UW
of wild12_s2We {
__DEFAULT ->
let {
sat_s2Wf [Occ=Once]
:: Text
[LclId, Str=DmdType]
sat_s2Wf =
Text
ipv5_s2Wd
0#
wild12_s2We } in
(# ipv4_s2Wc,
sat_s2Wf #);
0# ->
case empty
of vx_s2Wg
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2Wc, vx_s2Wg #)
}
}
};
Skip s'_s2Wk [Occ=Once!] ->
case s'_s2Wk
of _ [Occ=Dead]
{ CC ww88_s2Wm [Occ=Once!]
ww89_s2Wn [Occ=Once]
ww90_s2Wo [Occ=Once] ->
case ww88_s2Wm
of _ [Occ=Dead]
{ I# ww92_s2Wq [Occ=Once] ->
$wloop3_s2US
ww92_s2Wq
ww89_s2Wn
ww90_s2Wo
ww86_s2UW
w1_s2UX
}
};
Yield x_s2Wr [Occ=Once!]
s'_s2Ws [Occ=Once] ->
case x_s2Wr
of _ [Occ=Dead]
{ C# ww88_s2Wu [Occ=Once] ->
$w$j_s2UY ww88_s2Wu s'_s2Ws
}
}
}
}
};
True ->
case leWord# r#_s2W2 56319##
of sat_s2Wv { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Wv
of _ [Occ=Dead] {
False ->
case +# ww83_s2UT 1#
of sat_s2WA { __DEFAULT ->
let {
sat_s2WB [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2WB = I# sat_s2WA } in
case word2Int# r#_s2W2
of sat_s2Wx { __DEFAULT ->
case chr# sat_s2Wx
of sat_s2Wy { __DEFAULT ->
let {
sat_s2Wz [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2Wz = C# sat_s2Wy } in
case upperMapping
@ Int
sat_s2Wz
sat_s2WB
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc6_s2Rw
w1_s2UX
of _ [Occ=Dead]
{ (# ipv4_s2WE [Occ=Once*],
ipv5_s2WF [Occ=Once] #) ->
case ww86_s2UW
of wild13_s2WG {
__DEFAULT ->
let {
sat_s2WH [Occ=Once]
:: Text
[LclId,
Str=DmdType]
sat_s2WH =
Text
ipv5_s2WF
0#
wild13_s2WG } in
(# ipv4_s2WE,
sat_s2WH #);
0# ->
case empty
of vx_s2WI
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2WE,
vx_s2WI #)
}
}
};
Skip s'_s2WM [Occ=Once!] ->
case s'_s2WM
of _ [Occ=Dead]
{ CC ww88_s2WO [Occ=Once!]
ww89_s2WP [Occ=Once]
ww90_s2WQ [Occ=Once] ->
case ww88_s2WO
of _ [Occ=Dead]
{ I# ww92_s2WS [Occ=Once] ->
$wloop3_s2US
ww92_s2WS
ww89_s2WP
ww90_s2WQ
ww86_s2UW
w1_s2UX
}
};
Yield x_s2WT [Occ=Once!]
s'_s2WU [Occ=Once] ->
case x_s2WT
of _ [Occ=Dead]
{ C# ww88_s2WW [Occ=Once] ->
$w$j_s2UY
ww88_s2WW s'_s2WU
}
}
}
}
};
True ->
case +# ww83_s2UT 1#
of sat_s2WX { __DEFAULT ->
case indexWord16Array#
dt9_s2Rd sat_s2WX
of r#1_s2WY { __DEFAULT ->
case +# ww83_s2UT 2#
of sat_s2X8 { __DEFAULT ->
let {
sat_s2X9 [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s2X9 = I# sat_s2X8 } in
case word2Int# r#1_s2WY
of sat_s2X2 { __DEFAULT ->
case -# sat_s2X2 56320#
of sat_s2X3 { __DEFAULT ->
case word2Int# r#_s2W2
of sat_s2WZ { __DEFAULT ->
case -# sat_s2WZ 55296#
of sat_s2X0 { __DEFAULT ->
case uncheckedIShiftL#
sat_s2X0 10#
of sat_s2X1 { __DEFAULT ->
case +# sat_s2X1 sat_s2X3
of sat_s2X4 { __DEFAULT ->
case +# sat_s2X4 65536#
of sat_s2X5 { __DEFAULT ->
case chr# sat_s2X5
of sat_s2X6 { __DEFAULT ->
let {
sat_s2X7 [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s2X7 = C# sat_s2X6 } in
case upperMapping
@ Int
sat_s2X7
sat_s2X9
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc6_s2Rw
w1_s2UX
of _ [Occ=Dead]
{ (# ipv4_s2Xc [Occ=Once*],
ipv5_s2Xd [Occ=Once] #) ->
case ww86_s2UW
of wild13_s2Xe {
__DEFAULT ->
let {
sat_s2Xf [Occ=Once]
:: Text
[LclId,
Str=DmdType]
sat_s2Xf =
Text
ipv5_s2Xd
0#
wild13_s2Xe } in
(# ipv4_s2Xc,
sat_s2Xf #);
0# ->
case empty
of vx_s2Xg
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2Xc,
vx_s2Xg #)
}
}
};
Skip s'_s2Xk [Occ=Once!] ->
case s'_s2Xk
of _ [Occ=Dead]
{ CC ww88_s2Xm [Occ=Once!]
ww89_s2Xn [Occ=Once]
ww90_s2Xo [Occ=Once] ->
case ww88_s2Xm
of _ [Occ=Dead]
{ I# ww92_s2Xq [Occ=Once] ->
$wloop3_s2US
ww92_s2Xq
ww89_s2Xn
ww90_s2Xo
ww86_s2UW
w1_s2UX
}
};
Yield x_s2Xr [Occ=Once!]
s'_s2Xs [Occ=Once] ->
case x_s2Xr
of _ [Occ=Dead]
{ C# ww88_s2Xu [Occ=Once] ->
$w$j_s2UY
ww88_s2Xu s'_s2Xs
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case unsafeFreezeByteArray#
@ RealWorld sc6_s2Rw w1_s2UX
of _ [Occ=Dead]
{ (# ipv4_s2Xw [Occ=Once*],
ipv5_s2Xx [Occ=Once] #) ->
case ww86_s2UW of wild10_s2Xy {
__DEFAULT ->
let {
sat_s2Xz [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s2Xz =
Text
ipv5_s2Xx
0#
wild10_s2Xy } in
(# ipv4_s2Xw, sat_s2Xz #);
0# ->
case empty
of vx_s2XA
{ Text _ [Occ=Dead] _ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s2Xw, vx_s2XA #)
}
}
}
}
}
}; } in
case +# ww82_s2RB 1# of sat_s2XE { __DEFAULT ->
$wloop3_s2US
sc7_s2RE sc8_s2RF sc9_s2RG sat_s2XE s2#_s2UR
}
}
}
}
}
}
};
True ->
case +# sc5_s2Rv 1# of sat_s2XG { __DEFAULT ->
case uncheckedIShiftL# sat_s2XG 1#
of top'_s2XF [Dmd=<S,U>] { __DEFAULT ->
case <# top'_s2XF 0# of sat_s2XH { __DEFAULT ->
case tagToEnum# @ Bool sat_s2XH of _ [Occ=Dead] {
False ->
case andI# top'_s2XF 4611686018427387904#
of _ [Occ=Dead] {
__DEFAULT ->
case array_size_error of _ [Occ=Dead] { };
0# ->
case uncheckedIShiftL# top'_s2XF 1#
of sat_s2XL { __DEFAULT ->
case newByteArray#
@ RealWorld sat_s2XL eta_s2RK
of _ [Occ=Dead]
{ (# ipv4_s2XN [Occ=Once*], ipv5_s2XO #) ->
case <=# sc5_s2Rv 0# of sat_s2XP { __DEFAULT ->
case tagToEnum# @ Bool sat_s2XP
of _ [Occ=Dead] {
False ->
case int2Word# sc5_s2Rv
of sat_s2XS { __DEFAULT ->
case {__pkg_ccall text-1.2.2.1 _hs_text_memcpy forall s.
MutableByteArray# s
-> Word#
-> MutableByteArray# s
-> Word#
-> Word#
-> State# RealWorld
-> (# State# RealWorld #)}_s2XR
@ RealWorld
ipv5_s2XO
0##
sc6_s2Rw
0##
sat_s2XS
ipv4_s2XN
of _ [Occ=Dead]
{ (# ds11_s2XU [Occ=Once] #) ->
$s$wouter_s2Rp
ds11_s2XU
ww82_s2RB
ww81_s2RA
ww80_s2Rz
ww79_s2Ry
top'_s2XF
ipv5_s2XO
}
};
True ->
$s$wouter_s2Rp
ipv4_s2XN
ww82_s2RB
ww81_s2RA
ww80_s2Rz
ww79_s2Ry
top'_s2XF
ipv5_s2XO
}
}
}
}
};
True -> case array_size_error of _ [Occ=Dead] { }
}
}
}
}
}
} } in
case ord# sc10_s2RH of sat_s2XW { __DEFAULT ->
case <# sat_s2XW 65536# of sat_s2XX { __DEFAULT ->
case tagToEnum# @ Bool sat_s2XX of _ [Occ=Dead] {
False ->
case +# ww82_s2RB 1# of sat_s2XZ { __DEFAULT ->
$j2_s2RI sat_s2XZ w_s2RC
};
True -> $j2_s2RI ww82_s2RB w_s2RC
}
}
} } in
let {
$w$j_s2Y0 [InlPrag=[0], Occ=Once*!]
:: Char# -> CC Int -> (# State# RealWorld, Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><L,1*U(U(U),U,U)>,
Unf=OtherCon []]
$w$j_s2Y0 =
\ (ww83_s2Y1 [OS=OneShot] :: Char#)
(w1_s2Y2 [Occ=Once*!, OS=OneShot] :: CC Int) ->
let {
$j2_s2Y3 [Occ=Once*!]
:: Int# -> State# RealWorld -> (# State# RealWorld, Text #)
[LclId, Arity=2, Str=DmdType <S,U><S,U>, Unf=OtherCon []]
$j2_s2Y3 =
\ (x1_s2Y4 [Occ=Once, OS=OneShot] :: Int#)
(eta_s2Y5 [Occ=Once*, OS=OneShot] :: State# RealWorld) ->
case >=# x1_s2Y4 sc5_s2Rv of sat_s2Y6 { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Y6 of _ [Occ=Dead] {
False ->
case ord# ww83_s2Y1
of n_s2Y8 [Dmd=<S,U>] { __DEFAULT ->
case <# n_s2Y8 65536# of sat_s2Y9 { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Y9 of _ [Occ=Dead] {
False ->
case -# n_s2Y8 65536#
of m_s2Yb [Dmd=<S,U>] { __DEFAULT ->
case uncheckedIShiftRA# m_s2Yb 10#
of sat_s2Yc { __DEFAULT ->
case +# sat_s2Yc 55296# of sat_s2Yd { __DEFAULT ->
case int2Word# sat_s2Yd of sat_s2Ye { __DEFAULT ->
case narrow16Word# sat_s2Ye
of sat_s2Yf { __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww82_s2RB
sat_s2Yf
eta_s2Y5
of s2#_s2Yg [OS=OneShot] { __DEFAULT ->
case andI# m_s2Yb 1023# of sat_s2Yi { __DEFAULT ->
case +# sat_s2Yi 56320# of sat_s2Yj { __DEFAULT ->
case int2Word# sat_s2Yj of sat_s2Yk { __DEFAULT ->
case narrow16Word# sat_s2Yk
of sat_s2Yl { __DEFAULT ->
case +# ww82_s2RB 1# of sat_s2Yh { __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
sat_s2Yh
sat_s2Yl
s2#_s2Yg
of s2#1_s2Ym [OS=OneShot] { __DEFAULT ->
case w1_s2Y2
of _ [Occ=Dead]
{ CC ww85_s2Yo [Occ=Once!] ww86_s2Yp [Occ=Once]
ww87_s2Yq [Occ=Once] ->
case ww85_s2Yo
of _ [Occ=Dead] { I# ww89_s2Ys [Occ=Once] ->
letrec {
$wloop3_s2Yt [InlPrag=[0], Occ=LoopBreaker]
:: Int#
-> Char#
-> Char#
-> Int#
-> State# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=5,
Str=DmdType <L,U><S,U><L,U><L,U><S,U>,
Unf=OtherCon []]
$wloop3_s2Yt =
\ (ww90_s2Yu :: Int#)
(ww91_s2Yv :: Char#)
(ww92_s2Yw :: Char#)
(ww93_s2Yx :: Int#)
(w2_s2Yy [OS=OneShot] :: State# RealWorld) ->
let {
$s$w$j1_s2Yz [Occ=Once!]
:: Int#
-> Char#
-> Char#
-> Char#
-> (# State# RealWorld, Text #)
[LclId,
Arity=4,
Str=DmdType <L,U><L,U><L,U><S,U>,
Unf=OtherCon []]
$s$w$j1_s2Yz =
\ (sc7_s2YA [Occ=Once*] :: Int#)
(sc8_s2YB [Occ=Once*] :: Char#)
(sc9_s2YC [Occ=Once*] :: Char#)
(sc10_s2YD :: Char#) ->
let {
$j3_s2YE [Occ=Once*!]
:: Int#
-> State# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><S,U>,
Unf=OtherCon []]
$j3_s2YE =
\ (x2_s2YF [Occ=Once, OS=OneShot]
:: Int#)
(eta1_s2YG [Occ=Once*,
OS=OneShot]
:: State# RealWorld) ->
case >=# x2_s2YF sc5_s2Rv
of sat_s2YH { __DEFAULT ->
case tagToEnum# @ Bool sat_s2YH
of _ [Occ=Dead] {
False ->
case ord# sc10_s2YD
of n1_s2YJ [Dmd=<S,U>]
{ __DEFAULT ->
case <# n1_s2YJ 65536#
of sat_s2YK { __DEFAULT ->
case tagToEnum#
@ Bool sat_s2YK
of _ [Occ=Dead] {
False ->
case -# n1_s2YJ 65536#
of m1_s2YM [Dmd=<S,U>]
{ __DEFAULT ->
case uncheckedIShiftRA#
m1_s2YM 10#
of sat_s2YN
{ __DEFAULT ->
case +# sat_s2YN 55296#
of sat_s2YO
{ __DEFAULT ->
case int2Word# sat_s2YO
of sat_s2YP
{ __DEFAULT ->
case narrow16Word#
sat_s2YP
of sat_s2YQ
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww93_s2Yx
sat_s2YQ
eta1_s2YG
of s2#2_s2YR [OS=OneShot]
{ __DEFAULT ->
case andI# m1_s2YM 1023#
of sat_s2YT
{ __DEFAULT ->
case +# sat_s2YT 56320#
of sat_s2YU
{ __DEFAULT ->
case int2Word# sat_s2YU
of sat_s2YV
{ __DEFAULT ->
case narrow16Word#
sat_s2YV
of sat_s2YW
{ __DEFAULT ->
case +# ww93_s2Yx 1#
of sat_s2YS
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
sat_s2YS
sat_s2YW
s2#2_s2YR
of s2#3_s2YX [OS=OneShot]
{ __DEFAULT ->
case +# ww93_s2Yx 2#
of sat_s2YY
{ __DEFAULT ->
$wloop3_s2Yt
sc7_s2YA
sc8_s2YB
sc9_s2YC
sat_s2YY
s2#3_s2YX
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case int2Word# n1_s2YJ
of sat_s2YZ
{ __DEFAULT ->
case narrow16Word#
sat_s2YZ
of sat_s2Z0
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww93_s2Yx
sat_s2Z0
eta1_s2YG
of s2#2_s2Z1 [OS=OneShot]
{ __DEFAULT ->
case +# ww93_s2Yx 1#
of sat_s2Z2
{ __DEFAULT ->
$wloop3_s2Yt
sc7_s2YA
sc8_s2YB
sc9_s2YC
sat_s2Z2
s2#2_s2Z1
}
}
}
}
}
}
};
True ->
case +# sc5_s2Rv 1#
of sat_s2Z4 { __DEFAULT ->
case uncheckedIShiftL#
sat_s2Z4 1#
of top'_s2Z3 [Dmd=<S,U>]
{ __DEFAULT ->
case <# top'_s2Z3 0#
of sat_s2Z5 { __DEFAULT ->
case tagToEnum#
@ Bool sat_s2Z5
of _ [Occ=Dead] {
False ->
case andI#
top'_s2Z3
4611686018427387904#
of _ [Occ=Dead] {
__DEFAULT ->
case array_size_error
of _ [Occ=Dead] {
};
0# ->
case uncheckedIShiftL#
top'_s2Z3 1#
of sat_s2Z9
{ __DEFAULT ->
case newByteArray#
@ RealWorld
sat_s2Z9
eta1_s2YG
of _ [Occ=Dead]
{ (# ipv4_s2Zb [Occ=Once*],
ipv5_s2Zc #) ->
case <=# sc5_s2Rv 0#
of sat_s2Zd
{ __DEFAULT ->
case tagToEnum#
@ Bool
sat_s2Zd
of _ [Occ=Dead] {
False ->
case int2Word#
sc5_s2Rv
of sat_s2Zg
{ __DEFAULT ->
case {__pkg_ccall text-1.2.2.1 _hs_text_memcpy forall s.
MutableByteArray# s
-> Word#
-> MutableByteArray# s
-> Word#
-> Word#
-> State# RealWorld
-> (# State# RealWorld #)}_s2Zf
@ RealWorld
ipv5_s2Zc
0##
sc6_s2Rw
0##
sat_s2Zg
ipv4_s2Zb
of _ [Occ=Dead]
{ (# ds11_s2Zi [Occ=Once] #) ->
$s$wouter_s2Rp
ds11_s2Zi
ww93_s2Yx
ww92_s2Yw
ww91_s2Yv
ww90_s2Yu
top'_s2Z3
ipv5_s2Zc
}
};
True ->
$s$wouter_s2Rp
ipv4_s2Zb
ww93_s2Yx
ww92_s2Yw
ww91_s2Yv
ww90_s2Yu
top'_s2Z3
ipv5_s2Zc
}
}
}
}
};
True ->
case array_size_error
of _ [Occ=Dead] {
}
}
}
}
}
}
} } in
case ord# sc10_s2YD
of sat_s2Zk { __DEFAULT ->
case <# sat_s2Zk 65536#
of sat_s2Zl { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Zl
of _ [Occ=Dead] {
False ->
case +# ww93_s2Yx 1#
of sat_s2Zn { __DEFAULT ->
$j3_s2YE sat_s2Zn w2_s2Yy
};
True -> $j3_s2YE ww93_s2Yx w2_s2Yy
}
}
} } in
let {
$w$j1_s2Zo [InlPrag=[0], Occ=Once*!]
:: Char#
-> CC Int
-> (# State# RealWorld, Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><L,1*U(U(U),U,U)>,
Unf=OtherCon []]
$w$j1_s2Zo =
\ (ww94_s2Zp [OS=OneShot] :: Char#)
(w3_s2Zq [Occ=Once*!, OS=OneShot]
:: CC Int) ->
let {
$j3_s2Zr [Occ=Once*!]
:: Int#
-> State# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><S,U>,
Unf=OtherCon []]
$j3_s2Zr =
\ (x2_s2Zs [Occ=Once, OS=OneShot]
:: Int#)
(eta1_s2Zt [Occ=Once*,
OS=OneShot]
:: State# RealWorld) ->
case >=# x2_s2Zs sc5_s2Rv
of sat_s2Zu { __DEFAULT ->
case tagToEnum# @ Bool sat_s2Zu
of _ [Occ=Dead] {
False ->
case ord# ww94_s2Zp
of n1_s2Zw [Dmd=<S,U>]
{ __DEFAULT ->
case <# n1_s2Zw 65536#
of sat_s2Zx { __DEFAULT ->
case tagToEnum#
@ Bool sat_s2Zx
of _ [Occ=Dead] {
False ->
case -# n1_s2Zw 65536#
of m1_s2Zz [Dmd=<S,U>]
{ __DEFAULT ->
case uncheckedIShiftRA#
m1_s2Zz 10#
of sat_s2ZA
{ __DEFAULT ->
case +# sat_s2ZA 55296#
of sat_s2ZB
{ __DEFAULT ->
case int2Word# sat_s2ZB
of sat_s2ZC
{ __DEFAULT ->
case narrow16Word#
sat_s2ZC
of sat_s2ZD
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww93_s2Yx
sat_s2ZD
eta1_s2Zt
of s2#2_s2ZE [OS=OneShot]
{ __DEFAULT ->
case andI# m1_s2Zz 1023#
of sat_s2ZG
{ __DEFAULT ->
case +# sat_s2ZG 56320#
of sat_s2ZH
{ __DEFAULT ->
case int2Word# sat_s2ZH
of sat_s2ZI
{ __DEFAULT ->
case narrow16Word#
sat_s2ZI
of sat_s2ZJ
{ __DEFAULT ->
case +# ww93_s2Yx 1#
of sat_s2ZF
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
sat_s2ZF
sat_s2ZJ
s2#2_s2ZE
of s2#3_s2ZK [OS=OneShot]
{ __DEFAULT ->
case w3_s2Zq
of _ [Occ=Dead]
{ CC ww96_s2ZM [Occ=Once!]
ww97_s2ZN [Occ=Once]
ww98_s2ZO [Occ=Once] ->
case ww96_s2ZM
of _ [Occ=Dead]
{ I# ww100_s2ZQ [Occ=Once] ->
case +# ww93_s2Yx 2#
of sat_s2ZR
{ __DEFAULT ->
$wloop3_s2Yt
ww100_s2ZQ
ww97_s2ZN
ww98_s2ZO
sat_s2ZR
s2#3_s2ZK
}
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case int2Word# n1_s2Zw
of sat_s2ZS
{ __DEFAULT ->
case narrow16Word#
sat_s2ZS
of sat_s2ZT
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww93_s2Yx
sat_s2ZT
eta1_s2Zt
of s2#2_s2ZU [OS=OneShot]
{ __DEFAULT ->
case w3_s2Zq
of _ [Occ=Dead]
{ CC ww96_s2ZW [Occ=Once!]
ww97_s2ZX [Occ=Once]
ww98_s2ZY [Occ=Once] ->
case ww96_s2ZW
of _ [Occ=Dead]
{ I# ww100_s300 [Occ=Once] ->
case +# ww93_s2Yx 1#
of sat_s301
{ __DEFAULT ->
$wloop3_s2Yt
ww100_s300
ww97_s2ZX
ww98_s2ZY
sat_s301
s2#2_s2ZU
}
}
}
}
}
}
}
}
};
True ->
case +# sc5_s2Rv 1#
of sat_s303 { __DEFAULT ->
case uncheckedIShiftL#
sat_s303 1#
of top'_s302 [Dmd=<S,U>]
{ __DEFAULT ->
case <# top'_s302 0#
of sat_s304 { __DEFAULT ->
case tagToEnum#
@ Bool sat_s304
of _ [Occ=Dead] {
False ->
case andI#
top'_s302
4611686018427387904#
of _ [Occ=Dead] {
__DEFAULT ->
case array_size_error
of _ [Occ=Dead] {
};
0# ->
case uncheckedIShiftL#
top'_s302 1#
of sat_s308
{ __DEFAULT ->
case newByteArray#
@ RealWorld
sat_s308
eta1_s2Zt
of _ [Occ=Dead]
{ (# ipv4_s30a [Occ=Once*],
ipv5_s30b #) ->
case <=# sc5_s2Rv 0#
of sat_s30c
{ __DEFAULT ->
case tagToEnum#
@ Bool
sat_s30c
of _ [Occ=Dead] {
False ->
case int2Word#
sc5_s2Rv
of sat_s30f
{ __DEFAULT ->
case {__pkg_ccall text-1.2.2.1 _hs_text_memcpy forall s.
MutableByteArray# s
-> Word#
-> MutableByteArray# s
-> Word#
-> Word#
-> State# RealWorld
-> (# State# RealWorld #)}_s30e
@ RealWorld
ipv5_s30b
0##
sc6_s2Rw
0##
sat_s30f
ipv4_s30a
of _ [Occ=Dead]
{ (# ds11_s30h [Occ=Once] #) ->
$s$wouter_s2Rp
ds11_s30h
ww93_s2Yx
ww92_s2Yw
ww91_s2Yv
ww90_s2Yu
top'_s302
ipv5_s30b
}
};
True ->
$s$wouter_s2Rp
ipv4_s30a
ww93_s2Yx
ww92_s2Yw
ww91_s2Yv
ww90_s2Yu
top'_s302
ipv5_s30b
}
}
}
}
};
True ->
case array_size_error
of _ [Occ=Dead] {
}
}
}
}
}
}
} } in
case ord# ww94_s2Zp
of sat_s30j { __DEFAULT ->
case <# sat_s30j 65536#
of sat_s30k { __DEFAULT ->
case tagToEnum# @ Bool sat_s30k
of _ [Occ=Dead] {
False ->
case +# ww93_s2Yx 1#
of sat_s30m { __DEFAULT ->
$j3_s2Zr sat_s30m w2_s2Yy
};
True -> $j3_s2Zr ww93_s2Yx w2_s2Yy
}
}
} } in
case ww91_s2Yv of ds3_s30n {
__DEFAULT ->
$s$w$j1_s2Yz
ww90_s2Yu ww92_s2Yw '\NUL'# ds3_s30n;
'\NUL'# ->
case >=# ww90_s2Yu end_s2Ro
of sat_s30o { __DEFAULT ->
case tagToEnum# @ Bool sat_s30o
of _ [Occ=Dead] {
False ->
case indexWord16Array#
dt9_s2Rd ww90_s2Yu
of r#_s30q { __DEFAULT ->
case geWord# r#_s30q 55296##
of sat_s30r { __DEFAULT ->
case tagToEnum# @ Bool sat_s30r
of _ [Occ=Dead] {
False ->
case +# ww90_s2Yu 1#
of sat_s30w { __DEFAULT ->
let {
sat_s30x [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s30x = I# sat_s30w } in
case word2Int# r#_s30q
of sat_s30t { __DEFAULT ->
case chr# sat_s30t
of sat_s30u { __DEFAULT ->
let {
sat_s30v [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s30v = C# sat_s30u } in
case upperMapping
@ Int sat_s30v sat_s30x
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc6_s2Rw
w2_s2Yy
of _ [Occ=Dead]
{ (# ipv4_s30A [Occ=Once*],
ipv5_s30B [Occ=Once] #) ->
case ww93_s2Yx
of wild12_s30C {
__DEFAULT ->
let {
sat_s30D [Occ=Once]
:: Text
[LclId, Str=DmdType]
sat_s30D =
Text
ipv5_s30B
0#
wild12_s30C } in
(# ipv4_s30A,
sat_s30D #);
0# ->
case empty
of vx_s30E
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s30A, vx_s30E #)
}
}
};
Skip s'_s30I [Occ=Once!] ->
case s'_s30I
of _ [Occ=Dead]
{ CC ww95_s30K [Occ=Once!]
ww96_s30L [Occ=Once]
ww97_s30M [Occ=Once] ->
case ww95_s30K
of _ [Occ=Dead]
{ I# ww99_s30O [Occ=Once] ->
$wloop3_s2Yt
ww99_s30O
ww96_s30L
ww97_s30M
ww93_s2Yx
w2_s2Yy
}
};
Yield x_s30P [Occ=Once!]
s'_s30Q [Occ=Once] ->
case x_s30P
of _ [Occ=Dead]
{ C# ww95_s30S [Occ=Once] ->
$w$j1_s2Zo ww95_s30S s'_s30Q
}
}
}
}
};
True ->
case leWord# r#_s30q 56319##
of sat_s30T { __DEFAULT ->
case tagToEnum# @ Bool sat_s30T
of _ [Occ=Dead] {
False ->
case +# ww90_s2Yu 1#
of sat_s30Y { __DEFAULT ->
let {
sat_s30Z [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s30Z = I# sat_s30Y } in
case word2Int# r#_s30q
of sat_s30V { __DEFAULT ->
case chr# sat_s30V
of sat_s30W { __DEFAULT ->
let {
sat_s30X [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s30X = C# sat_s30W } in
case upperMapping
@ Int
sat_s30X
sat_s30Z
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc6_s2Rw
w2_s2Yy
of _ [Occ=Dead]
{ (# ipv4_s312 [Occ=Once*],
ipv5_s313 [Occ=Once] #) ->
case ww93_s2Yx
of wild13_s314 {
__DEFAULT ->
let {
sat_s315 [Occ=Once]
:: Text
[LclId,
Str=DmdType]
sat_s315 =
Text
ipv5_s313
0#
wild13_s314 } in
(# ipv4_s312,
sat_s315 #);
0# ->
case empty
of vx_s316
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s312,
vx_s316 #)
}
}
};
Skip s'_s31a [Occ=Once!] ->
case s'_s31a
of _ [Occ=Dead]
{ CC ww95_s31c [Occ=Once!]
ww96_s31d [Occ=Once]
ww97_s31e [Occ=Once] ->
case ww95_s31c
of _ [Occ=Dead]
{ I# ww99_s31g [Occ=Once] ->
$wloop3_s2Yt
ww99_s31g
ww96_s31d
ww97_s31e
ww93_s2Yx
w2_s2Yy
}
};
Yield x_s31h [Occ=Once!]
s'_s31i [Occ=Once] ->
case x_s31h
of _ [Occ=Dead]
{ C# ww95_s31k [Occ=Once] ->
$w$j1_s2Zo
ww95_s31k s'_s31i
}
}
}
}
};
True ->
case +# ww90_s2Yu 1#
of sat_s31l { __DEFAULT ->
case indexWord16Array#
dt9_s2Rd sat_s31l
of r#1_s31m { __DEFAULT ->
case +# ww90_s2Yu 2#
of sat_s31w { __DEFAULT ->
let {
sat_s31x [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s31x = I# sat_s31w } in
case word2Int# r#1_s31m
of sat_s31q { __DEFAULT ->
case -# sat_s31q 56320#
of sat_s31r { __DEFAULT ->
case word2Int# r#_s30q
of sat_s31n { __DEFAULT ->
case -# sat_s31n 55296#
of sat_s31o { __DEFAULT ->
case uncheckedIShiftL#
sat_s31o 10#
of sat_s31p { __DEFAULT ->
case +# sat_s31p sat_s31r
of sat_s31s { __DEFAULT ->
case +# sat_s31s 65536#
of sat_s31t { __DEFAULT ->
case chr# sat_s31t
of sat_s31u { __DEFAULT ->
let {
sat_s31v [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s31v = C# sat_s31u } in
case upperMapping
@ Int
sat_s31v
sat_s31x
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc6_s2Rw
w2_s2Yy
of _ [Occ=Dead]
{ (# ipv4_s31A [Occ=Once*],
ipv5_s31B [Occ=Once] #) ->
case ww93_s2Yx
of wild13_s31C {
__DEFAULT ->
let {
sat_s31D [Occ=Once]
:: Text
[LclId,
Str=DmdType]
sat_s31D =
Text
ipv5_s31B
0#
wild13_s31C } in
(# ipv4_s31A,
sat_s31D #);
0# ->
case empty
of vx_s31E
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s31A,
vx_s31E #)
}
}
};
Skip s'_s31I [Occ=Once!] ->
case s'_s31I
of _ [Occ=Dead]
{ CC ww95_s31K [Occ=Once!]
ww96_s31L [Occ=Once]
ww97_s31M [Occ=Once] ->
case ww95_s31K
of _ [Occ=Dead]
{ I# ww99_s31O [Occ=Once] ->
$wloop3_s2Yt
ww99_s31O
ww96_s31L
ww97_s31M
ww93_s2Yx
w2_s2Yy
}
};
Yield x_s31P [Occ=Once!]
s'_s31Q [Occ=Once] ->
case x_s31P
of _ [Occ=Dead]
{ C# ww95_s31S [Occ=Once] ->
$w$j1_s2Zo
ww95_s31S s'_s31Q
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case unsafeFreezeByteArray#
@ RealWorld sc6_s2Rw w2_s2Yy
of _ [Occ=Dead]
{ (# ipv4_s31U [Occ=Once*],
ipv5_s31V [Occ=Once] #) ->
case ww93_s2Yx of wild10_s31W {
__DEFAULT ->
let {
sat_s31X [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s31X =
Text
ipv5_s31V
0#
wild10_s31W } in
(# ipv4_s31U, sat_s31X #);
0# ->
case empty
of vx_s31Y
{ Text _ [Occ=Dead] _ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s31U, vx_s31Y #)
}
}
}
}
}
}; } in
case +# ww82_s2RB 2# of sat_s322 { __DEFAULT ->
$wloop3_s2Yt
ww89_s2Ys ww86_s2Yp ww87_s2Yq sat_s322 s2#1_s2Ym
}
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case int2Word# n_s2Y8 of sat_s323 { __DEFAULT ->
case narrow16Word# sat_s323
of sat_s324 { __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww82_s2RB
sat_s324
eta_s2Y5
of s2#_s325 [OS=OneShot] { __DEFAULT ->
case w1_s2Y2
of _ [Occ=Dead]
{ CC ww85_s327 [Occ=Once!] ww86_s328 [Occ=Once]
ww87_s329 [Occ=Once] ->
case ww85_s327
of _ [Occ=Dead] { I# ww89_s32b [Occ=Once] ->
letrec {
$wloop3_s32c [InlPrag=[0], Occ=LoopBreaker]
:: Int#
-> Char#
-> Char#
-> Int#
-> State# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=5,
Str=DmdType <L,U><S,U><L,U><L,U><S,U>,
Unf=OtherCon []]
$wloop3_s32c =
\ (ww90_s32d :: Int#)
(ww91_s32e :: Char#)
(ww92_s32f :: Char#)
(ww93_s32g :: Int#)
(w2_s32h [OS=OneShot] :: State# RealWorld) ->
let {
$s$w$j1_s32i [Occ=Once!]
:: Int#
-> Char#
-> Char#
-> Char#
-> (# State# RealWorld, Text #)
[LclId,
Arity=4,
Str=DmdType <L,U><L,U><L,U><S,U>,
Unf=OtherCon []]
$s$w$j1_s32i =
\ (sc7_s32j [Occ=Once*] :: Int#)
(sc8_s32k [Occ=Once*] :: Char#)
(sc9_s32l [Occ=Once*] :: Char#)
(sc10_s32m :: Char#) ->
let {
$j3_s32n [Occ=Once*!]
:: Int#
-> State# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><S,U>,
Unf=OtherCon []]
$j3_s32n =
\ (x2_s32o [Occ=Once, OS=OneShot]
:: Int#)
(eta1_s32p [Occ=Once*,
OS=OneShot]
:: State# RealWorld) ->
case >=# x2_s32o sc5_s2Rv
of sat_s32q { __DEFAULT ->
case tagToEnum# @ Bool sat_s32q
of _ [Occ=Dead] {
False ->
case ord# sc10_s32m
of n1_s32s [Dmd=<S,U>]
{ __DEFAULT ->
case <# n1_s32s 65536#
of sat_s32t { __DEFAULT ->
case tagToEnum#
@ Bool sat_s32t
of _ [Occ=Dead] {
False ->
case -# n1_s32s 65536#
of m_s32v [Dmd=<S,U>]
{ __DEFAULT ->
case uncheckedIShiftRA#
m_s32v 10#
of sat_s32w
{ __DEFAULT ->
case +# sat_s32w 55296#
of sat_s32x
{ __DEFAULT ->
case int2Word# sat_s32x
of sat_s32y
{ __DEFAULT ->
case narrow16Word#
sat_s32y
of sat_s32z
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww93_s32g
sat_s32z
eta1_s32p
of s2#1_s32A [OS=OneShot]
{ __DEFAULT ->
case andI# m_s32v 1023#
of sat_s32C
{ __DEFAULT ->
case +# sat_s32C 56320#
of sat_s32D
{ __DEFAULT ->
case int2Word# sat_s32D
of sat_s32E
{ __DEFAULT ->
case narrow16Word#
sat_s32E
of sat_s32F
{ __DEFAULT ->
case +# ww93_s32g 1#
of sat_s32B
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
sat_s32B
sat_s32F
s2#1_s32A
of s2#2_s32G [OS=OneShot]
{ __DEFAULT ->
case +# ww93_s32g 2#
of sat_s32H
{ __DEFAULT ->
$wloop3_s32c
sc7_s32j
sc8_s32k
sc9_s32l
sat_s32H
s2#2_s32G
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case int2Word# n1_s32s
of sat_s32I
{ __DEFAULT ->
case narrow16Word#
sat_s32I
of sat_s32J
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww93_s32g
sat_s32J
eta1_s32p
of s2#1_s32K [OS=OneShot]
{ __DEFAULT ->
case +# ww93_s32g 1#
of sat_s32L
{ __DEFAULT ->
$wloop3_s32c
sc7_s32j
sc8_s32k
sc9_s32l
sat_s32L
s2#1_s32K
}
}
}
}
}
}
};
True ->
case +# sc5_s2Rv 1#
of sat_s32N { __DEFAULT ->
case uncheckedIShiftL#
sat_s32N 1#
of top'_s32M [Dmd=<S,U>]
{ __DEFAULT ->
case <# top'_s32M 0#
of sat_s32O { __DEFAULT ->
case tagToEnum#
@ Bool sat_s32O
of _ [Occ=Dead] {
False ->
case andI#
top'_s32M
4611686018427387904#
of _ [Occ=Dead] {
__DEFAULT ->
case array_size_error
of _ [Occ=Dead] {
};
0# ->
case uncheckedIShiftL#
top'_s32M 1#
of sat_s32S
{ __DEFAULT ->
case newByteArray#
@ RealWorld
sat_s32S
eta1_s32p
of _ [Occ=Dead]
{ (# ipv4_s32U [Occ=Once*],
ipv5_s32V #) ->
case <=# sc5_s2Rv 0#
of sat_s32W
{ __DEFAULT ->
case tagToEnum#
@ Bool
sat_s32W
of _ [Occ=Dead] {
False ->
case int2Word#
sc5_s2Rv
of sat_s32Z
{ __DEFAULT ->
case {__pkg_ccall text-1.2.2.1 _hs_text_memcpy forall s.
MutableByteArray# s
-> Word#
-> MutableByteArray# s
-> Word#
-> Word#
-> State# RealWorld
-> (# State# RealWorld #)}_s32Y
@ RealWorld
ipv5_s32V
0##
sc6_s2Rw
0##
sat_s32Z
ipv4_s32U
of _ [Occ=Dead]
{ (# ds11_s331 [Occ=Once] #) ->
$s$wouter_s2Rp
ds11_s331
ww93_s32g
ww92_s32f
ww91_s32e
ww90_s32d
top'_s32M
ipv5_s32V
}
};
True ->
$s$wouter_s2Rp
ipv4_s32U
ww93_s32g
ww92_s32f
ww91_s32e
ww90_s32d
top'_s32M
ipv5_s32V
}
}
}
}
};
True ->
case array_size_error
of _ [Occ=Dead] {
}
}
}
}
}
}
} } in
case ord# sc10_s32m
of sat_s333 { __DEFAULT ->
case <# sat_s333 65536#
of sat_s334 { __DEFAULT ->
case tagToEnum# @ Bool sat_s334
of _ [Occ=Dead] {
False ->
case +# ww93_s32g 1#
of sat_s336 { __DEFAULT ->
$j3_s32n sat_s336 w2_s32h
};
True -> $j3_s32n ww93_s32g w2_s32h
}
}
} } in
let {
$w$j1_s337 [InlPrag=[0], Occ=Once*!]
:: Char#
-> CC Int
-> (# State# RealWorld, Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><L,1*U(U(U),U,U)>,
Unf=OtherCon []]
$w$j1_s337 =
\ (ww94_s338 [OS=OneShot] :: Char#)
(w3_s339 [Occ=Once*!, OS=OneShot]
:: CC Int) ->
let {
$j3_s33a [Occ=Once*!]
:: Int#
-> State# RealWorld
-> (# State# RealWorld, Text #)
[LclId,
Arity=2,
Str=DmdType <S,U><S,U>,
Unf=OtherCon []]
$j3_s33a =
\ (x2_s33b [Occ=Once, OS=OneShot]
:: Int#)
(eta1_s33c [Occ=Once*,
OS=OneShot]
:: State# RealWorld) ->
case >=# x2_s33b sc5_s2Rv
of sat_s33d { __DEFAULT ->
case tagToEnum# @ Bool sat_s33d
of _ [Occ=Dead] {
False ->
case ord# ww94_s338
of n1_s33f [Dmd=<S,U>]
{ __DEFAULT ->
case <# n1_s33f 65536#
of sat_s33g { __DEFAULT ->
case tagToEnum#
@ Bool sat_s33g
of _ [Occ=Dead] {
False ->
case -# n1_s33f 65536#
of m_s33i [Dmd=<S,U>]
{ __DEFAULT ->
case uncheckedIShiftRA#
m_s33i 10#
of sat_s33j
{ __DEFAULT ->
case +# sat_s33j 55296#
of sat_s33k
{ __DEFAULT ->
case int2Word# sat_s33k
of sat_s33l
{ __DEFAULT ->
case narrow16Word#
sat_s33l
of sat_s33m
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww93_s32g
sat_s33m
eta1_s33c
of s2#1_s33n [OS=OneShot]
{ __DEFAULT ->
case andI# m_s33i 1023#
of sat_s33p
{ __DEFAULT ->
case +# sat_s33p 56320#
of sat_s33q
{ __DEFAULT ->
case int2Word# sat_s33q
of sat_s33r
{ __DEFAULT ->
case narrow16Word#
sat_s33r
of sat_s33s
{ __DEFAULT ->
case +# ww93_s32g 1#
of sat_s33o
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
sat_s33o
sat_s33s
s2#1_s33n
of s2#2_s33t [OS=OneShot]
{ __DEFAULT ->
case w3_s339
of _ [Occ=Dead]
{ CC ww96_s33v [Occ=Once!]
ww97_s33w [Occ=Once]
ww98_s33x [Occ=Once] ->
case ww96_s33v
of _ [Occ=Dead]
{ I# ww100_s33z [Occ=Once] ->
case +# ww93_s32g 2#
of sat_s33A
{ __DEFAULT ->
$wloop3_s32c
ww100_s33z
ww97_s33w
ww98_s33x
sat_s33A
s2#2_s33t
}
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case int2Word# n1_s33f
of sat_s33B
{ __DEFAULT ->
case narrow16Word#
sat_s33B
of sat_s33C
{ __DEFAULT ->
case writeWord16Array#
@ RealWorld
sc6_s2Rw
ww93_s32g
sat_s33C
eta1_s33c
of s2#1_s33D [OS=OneShot]
{ __DEFAULT ->
case w3_s339
of _ [Occ=Dead]
{ CC ww96_s33F [Occ=Once!]
ww97_s33G [Occ=Once]
ww98_s33H [Occ=Once] ->
case ww96_s33F
of _ [Occ=Dead]
{ I# ww100_s33J [Occ=Once] ->
case +# ww93_s32g 1#
of sat_s33K
{ __DEFAULT ->
$wloop3_s32c
ww100_s33J
ww97_s33G
ww98_s33H
sat_s33K
s2#1_s33D
}
}
}
}
}
}
}
}
};
True ->
case +# sc5_s2Rv 1#
of sat_s33M { __DEFAULT ->
case uncheckedIShiftL#
sat_s33M 1#
of top'_s33L [Dmd=<S,U>]
{ __DEFAULT ->
case <# top'_s33L 0#
of sat_s33N { __DEFAULT ->
case tagToEnum#
@ Bool sat_s33N
of _ [Occ=Dead] {
False ->
case andI#
top'_s33L
4611686018427387904#
of _ [Occ=Dead] {
__DEFAULT ->
case array_size_error
of _ [Occ=Dead] {
};
0# ->
case uncheckedIShiftL#
top'_s33L 1#
of sat_s33R
{ __DEFAULT ->
case newByteArray#
@ RealWorld
sat_s33R
eta1_s33c
of _ [Occ=Dead]
{ (# ipv4_s33T [Occ=Once*],
ipv5_s33U #) ->
case <=# sc5_s2Rv 0#
of sat_s33V
{ __DEFAULT ->
case tagToEnum#
@ Bool
sat_s33V
of _ [Occ=Dead] {
False ->
case int2Word#
sc5_s2Rv
of sat_s33Y
{ __DEFAULT ->
case {__pkg_ccall text-1.2.2.1 _hs_text_memcpy forall s.
MutableByteArray# s
-> Word#
-> MutableByteArray# s
-> Word#
-> Word#
-> State# RealWorld
-> (# State# RealWorld #)}_s33X
@ RealWorld
ipv5_s33U
0##
sc6_s2Rw
0##
sat_s33Y
ipv4_s33T
of _ [Occ=Dead]
{ (# ds11_s340 [Occ=Once] #) ->
$s$wouter_s2Rp
ds11_s340
ww93_s32g
ww92_s32f
ww91_s32e
ww90_s32d
top'_s33L
ipv5_s33U
}
};
True ->
$s$wouter_s2Rp
ipv4_s33T
ww93_s32g
ww92_s32f
ww91_s32e
ww90_s32d
top'_s33L
ipv5_s33U
}
}
}
}
};
True ->
case array_size_error
of _ [Occ=Dead] {
}
}
}
}
}
}
} } in
case ord# ww94_s338
of sat_s342 { __DEFAULT ->
case <# sat_s342 65536#
of sat_s343 { __DEFAULT ->
case tagToEnum# @ Bool sat_s343
of _ [Occ=Dead] {
False ->
case +# ww93_s32g 1#
of sat_s345 { __DEFAULT ->
$j3_s33a sat_s345 w2_s32h
};
True -> $j3_s33a ww93_s32g w2_s32h
}
}
} } in
case ww91_s32e of ds3_s346 {
__DEFAULT ->
$s$w$j1_s32i
ww90_s32d ww92_s32f '\NUL'# ds3_s346;
'\NUL'# ->
case >=# ww90_s32d end_s2Ro
of sat_s347 { __DEFAULT ->
case tagToEnum# @ Bool sat_s347
of _ [Occ=Dead] {
False ->
case indexWord16Array#
dt9_s2Rd ww90_s32d
of r#_s349 { __DEFAULT ->
case geWord# r#_s349 55296##
of sat_s34a { __DEFAULT ->
case tagToEnum# @ Bool sat_s34a
of _ [Occ=Dead] {
False ->
case +# ww90_s32d 1#
of sat_s34f { __DEFAULT ->
let {
sat_s34g [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s34g = I# sat_s34f } in
case word2Int# r#_s349
of sat_s34c { __DEFAULT ->
case chr# sat_s34c
of sat_s34d { __DEFAULT ->
let {
sat_s34e [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s34e = C# sat_s34d } in
case upperMapping
@ Int sat_s34e sat_s34g
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc6_s2Rw
w2_s32h
of _ [Occ=Dead]
{ (# ipv4_s34j [Occ=Once*],
ipv5_s34k [Occ=Once] #) ->
case ww93_s32g
of wild12_s34l {
__DEFAULT ->
let {
sat_s34m [Occ=Once]
:: Text
[LclId, Str=DmdType]
sat_s34m =
Text
ipv5_s34k
0#
wild12_s34l } in
(# ipv4_s34j,
sat_s34m #);
0# ->
case empty
of vx_s34n
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s34j, vx_s34n #)
}
}
};
Skip s'_s34r [Occ=Once!] ->
case s'_s34r
of _ [Occ=Dead]
{ CC ww95_s34t [Occ=Once!]
ww96_s34u [Occ=Once]
ww97_s34v [Occ=Once] ->
case ww95_s34t
of _ [Occ=Dead]
{ I# ww99_s34x [Occ=Once] ->
$wloop3_s32c
ww99_s34x
ww96_s34u
ww97_s34v
ww93_s32g
w2_s32h
}
};
Yield x_s34y [Occ=Once!]
s'_s34z [Occ=Once] ->
case x_s34y
of _ [Occ=Dead]
{ C# ww95_s34B [Occ=Once] ->
$w$j1_s337 ww95_s34B s'_s34z
}
}
}
}
};
True ->
case leWord# r#_s349 56319##
of sat_s34C { __DEFAULT ->
case tagToEnum# @ Bool sat_s34C
of _ [Occ=Dead] {
False ->
case +# ww90_s32d 1#
of sat_s34H { __DEFAULT ->
let {
sat_s34I [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s34I = I# sat_s34H } in
case word2Int# r#_s349
of sat_s34E { __DEFAULT ->
case chr# sat_s34E
of sat_s34F { __DEFAULT ->
let {
sat_s34G [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s34G = C# sat_s34F } in
case upperMapping
@ Int
sat_s34G
sat_s34I
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc6_s2Rw
w2_s32h
of _ [Occ=Dead]
{ (# ipv4_s34L [Occ=Once*],
ipv5_s34M [Occ=Once] #) ->
case ww93_s32g
of wild13_s34N {
__DEFAULT ->
let {
sat_s34O [Occ=Once]
:: Text
[LclId,
Str=DmdType]
sat_s34O =
Text
ipv5_s34M
0#
wild13_s34N } in
(# ipv4_s34L,
sat_s34O #);
0# ->
case empty
of vx_s34P
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s34L,
vx_s34P #)
}
}
};
Skip s'_s34T [Occ=Once!] ->
case s'_s34T
of _ [Occ=Dead]
{ CC ww95_s34V [Occ=Once!]
ww96_s34W [Occ=Once]
ww97_s34X [Occ=Once] ->
case ww95_s34V
of _ [Occ=Dead]
{ I# ww99_s34Z [Occ=Once] ->
$wloop3_s32c
ww99_s34Z
ww96_s34W
ww97_s34X
ww93_s32g
w2_s32h
}
};
Yield x_s350 [Occ=Once!]
s'_s351 [Occ=Once] ->
case x_s350
of _ [Occ=Dead]
{ C# ww95_s353 [Occ=Once] ->
$w$j1_s337
ww95_s353 s'_s351
}
}
}
}
};
True ->
case +# ww90_s32d 1#
of sat_s354 { __DEFAULT ->
case indexWord16Array#
dt9_s2Rd sat_s354
of r#1_s355 { __DEFAULT ->
case +# ww90_s32d 2#
of sat_s35f { __DEFAULT ->
let {
sat_s35g [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s35g = I# sat_s35f } in
case word2Int# r#1_s355
of sat_s359 { __DEFAULT ->
case -# sat_s359 56320#
of sat_s35a { __DEFAULT ->
case word2Int# r#_s349
of sat_s356 { __DEFAULT ->
case -# sat_s356 55296#
of sat_s357 { __DEFAULT ->
case uncheckedIShiftL#
sat_s357 10#
of sat_s358 { __DEFAULT ->
case +# sat_s358 sat_s35a
of sat_s35b { __DEFAULT ->
case +# sat_s35b 65536#
of sat_s35c { __DEFAULT ->
case chr# sat_s35c
of sat_s35d { __DEFAULT ->
let {
sat_s35e [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s35e = C# sat_s35d } in
case upperMapping
@ Int
sat_s35e
sat_s35g
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld
sc6_s2Rw
w2_s32h
of _ [Occ=Dead]
{ (# ipv4_s35j [Occ=Once*],
ipv5_s35k [Occ=Once] #) ->
case ww93_s32g
of wild13_s35l {
__DEFAULT ->
let {
sat_s35m [Occ=Once]
:: Text
[LclId,
Str=DmdType]
sat_s35m =
Text
ipv5_s35k
0#
wild13_s35l } in
(# ipv4_s35j,
sat_s35m #);
0# ->
case empty
of vx_s35n
{ Text _ [Occ=Dead]
_ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s35j,
vx_s35n #)
}
}
};
Skip s'_s35r [Occ=Once!] ->
case s'_s35r
of _ [Occ=Dead]
{ CC ww95_s35t [Occ=Once!]
ww96_s35u [Occ=Once]
ww97_s35v [Occ=Once] ->
case ww95_s35t
of _ [Occ=Dead]
{ I# ww99_s35x [Occ=Once] ->
$wloop3_s32c
ww99_s35x
ww96_s35u
ww97_s35v
ww93_s32g
w2_s32h
}
};
Yield x_s35y [Occ=Once!]
s'_s35z [Occ=Once] ->
case x_s35y
of _ [Occ=Dead]
{ C# ww95_s35B [Occ=Once] ->
$w$j1_s337
ww95_s35B s'_s35z
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case unsafeFreezeByteArray#
@ RealWorld sc6_s2Rw w2_s32h
of _ [Occ=Dead]
{ (# ipv4_s35D [Occ=Once*],
ipv5_s35E [Occ=Once] #) ->
case ww93_s32g of wild10_s35F {
__DEFAULT ->
let {
sat_s35G [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s35G =
Text
ipv5_s35E
0#
wild10_s35F } in
(# ipv4_s35D, sat_s35G #);
0# ->
case empty
of vx_s35H
{ Text _ [Occ=Dead] _ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s35D, vx_s35H #)
}
}
}
}
}
}; } in
case +# ww82_s2RB 1# of sat_s35L { __DEFAULT ->
$wloop3_s32c
ww89_s32b ww86_s328 ww87_s329 sat_s35L s2#_s325
}
}
}
}
}
}
}
}
};
True ->
case +# sc5_s2Rv 1# of sat_s35N { __DEFAULT ->
case uncheckedIShiftL# sat_s35N 1#
of top'_s35M [Dmd=<S,U>] { __DEFAULT ->
case <# top'_s35M 0# of sat_s35O { __DEFAULT ->
case tagToEnum# @ Bool sat_s35O of _ [Occ=Dead] {
False ->
case andI# top'_s35M 4611686018427387904#
of _ [Occ=Dead] {
__DEFAULT ->
case array_size_error of _ [Occ=Dead] { };
0# ->
case uncheckedIShiftL# top'_s35M 1#
of sat_s35S { __DEFAULT ->
case newByteArray#
@ RealWorld sat_s35S eta_s2Y5
of _ [Occ=Dead]
{ (# ipv4_s35U [Occ=Once*], ipv5_s35V #) ->
case <=# sc5_s2Rv 0# of sat_s35W { __DEFAULT ->
case tagToEnum# @ Bool sat_s35W
of _ [Occ=Dead] {
False ->
case int2Word# sc5_s2Rv
of sat_s35Z { __DEFAULT ->
case {__pkg_ccall text-1.2.2.1 _hs_text_memcpy forall s.
MutableByteArray# s
-> Word#
-> MutableByteArray# s
-> Word#
-> Word#
-> State# RealWorld
-> (# State# RealWorld #)}_s35Y
@ RealWorld
ipv5_s35V
0##
sc6_s2Rw
0##
sat_s35Z
ipv4_s35U
of _ [Occ=Dead]
{ (# ds11_s361 [Occ=Once] #) ->
$s$wouter_s2Rp
ds11_s361
ww82_s2RB
ww81_s2RA
ww80_s2Rz
ww79_s2Ry
top'_s35M
ipv5_s35V
}
};
True ->
$s$wouter_s2Rp
ipv4_s35U
ww82_s2RB
ww81_s2RA
ww80_s2Rz
ww79_s2Ry
top'_s35M
ipv5_s35V
}
}
}
}
};
True -> case array_size_error of _ [Occ=Dead] { }
}
}
}
}
}
} } in
case ord# ww83_s2Y1 of sat_s363 { __DEFAULT ->
case <# sat_s363 65536# of sat_s364 { __DEFAULT ->
case tagToEnum# @ Bool sat_s364 of _ [Occ=Dead] {
False ->
case +# ww82_s2RB 1# of sat_s366 { __DEFAULT ->
$j2_s2Y3 sat_s366 w_s2RC
};
True -> $j2_s2Y3 ww82_s2RB w_s2RC
}
}
} } in
case ww80_s2Rz of ds3_s367 {
__DEFAULT -> $s$w$j_s2RD ww79_s2Ry ww81_s2RA '\NUL'# ds3_s367;
'\NUL'# ->
case >=# ww79_s2Ry end_s2Ro of sat_s368 { __DEFAULT ->
case tagToEnum# @ Bool sat_s368 of _ [Occ=Dead] {
False ->
case indexWord16Array# dt9_s2Rd ww79_s2Ry
of r#_s36a { __DEFAULT ->
case geWord# r#_s36a 55296## of sat_s36b { __DEFAULT ->
case tagToEnum# @ Bool sat_s36b of _ [Occ=Dead] {
False ->
case +# ww79_s2Ry 1# of sat_s36g { __DEFAULT ->
let {
sat_s36h [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s36h = I# sat_s36g } in
case word2Int# r#_s36a of sat_s36d { __DEFAULT ->
case chr# sat_s36d of sat_s36e { __DEFAULT ->
let {
sat_s36f [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s36f = C# sat_s36e } in
case upperMapping @ Int sat_s36f sat_s36h of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray# @ RealWorld sc6_s2Rw w_s2RC
of _ [Occ=Dead]
{ (# ipv4_s36k [Occ=Once*], ipv5_s36l [Occ=Once] #) ->
case ww82_s2RB of wild9_s36m {
__DEFAULT ->
let {
sat_s36n [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s36n = Text ipv5_s36l 0# wild9_s36m } in
(# ipv4_s36k, sat_s36n #);
0# ->
case empty
of vx_s36o
{ Text _ [Occ=Dead] _ [Occ=Dead] _ [Occ=Dead] ->
(# ipv4_s36k, vx_s36o #)
}
}
};
Skip s'_s36s [Occ=Once!] ->
case s'_s36s
of _ [Occ=Dead]
{ CC ww84_s36u [Occ=Once!] ww85_s36v [Occ=Once]
ww86_s36w [Occ=Once] ->
case ww84_s36u
of _ [Occ=Dead] { I# ww88_s36y [Occ=Once] ->
$wloop2_s2Rx
ww88_s36y ww85_s36v ww86_s36w ww82_s2RB w_s2RC
}
};
Yield x_s36z [Occ=Once!] s'_s36A [Occ=Once] ->
case x_s36z
of _ [Occ=Dead] { C# ww84_s36C [Occ=Once] ->
$w$j_s2Y0 ww84_s36C s'_s36A
}
}
}
}
};
True ->
case leWord# r#_s36a 56319## of sat_s36D { __DEFAULT ->
case tagToEnum# @ Bool sat_s36D of _ [Occ=Dead] {
False ->
case +# ww79_s2Ry 1# of sat_s36I { __DEFAULT ->
let {
sat_s36J [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s36J = I# sat_s36I } in
case word2Int# r#_s36a of sat_s36F { __DEFAULT ->
case chr# sat_s36F of sat_s36G { __DEFAULT ->
let {
sat_s36H [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s36H = C# sat_s36G } in
case upperMapping @ Int sat_s36H sat_s36J
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld sc6_s2Rw w_s2RC
of _ [Occ=Dead]
{ (# ipv4_s36M [Occ=Once*],
ipv5_s36N [Occ=Once] #) ->
case ww82_s2RB of wild10_s36O {
__DEFAULT ->
let {
sat_s36P [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s36P = Text ipv5_s36N 0# wild10_s36O } in
(# ipv4_s36M, sat_s36P #);
0# ->
case empty
of vx_s36Q
{ Text _ [Occ=Dead] _ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s36M, vx_s36Q #)
}
}
};
Skip s'_s36U [Occ=Once!] ->
case s'_s36U
of _ [Occ=Dead]
{ CC ww84_s36W [Occ=Once!] ww85_s36X [Occ=Once]
ww86_s36Y [Occ=Once] ->
case ww84_s36W
of _ [Occ=Dead] { I# ww88_s370 [Occ=Once] ->
$wloop2_s2Rx
ww88_s370 ww85_s36X ww86_s36Y ww82_s2RB w_s2RC
}
};
Yield x_s371 [Occ=Once!] s'_s372 [Occ=Once] ->
case x_s371
of _ [Occ=Dead] { C# ww84_s374 [Occ=Once] ->
$w$j_s2Y0 ww84_s374 s'_s372
}
}
}
}
};
True ->
case +# ww79_s2Ry 1# of sat_s375 { __DEFAULT ->
case indexWord16Array# dt9_s2Rd sat_s375
of r#1_s376 { __DEFAULT ->
case +# ww79_s2Ry 2# of sat_s37g { __DEFAULT ->
let {
sat_s37h [Occ=Once] :: Int
[LclId, Str=DmdType]
sat_s37h = I# sat_s37g } in
case word2Int# r#1_s376 of sat_s37a { __DEFAULT ->
case -# sat_s37a 56320# of sat_s37b { __DEFAULT ->
case word2Int# r#_s36a of sat_s377 { __DEFAULT ->
case -# sat_s377 55296# of sat_s378 { __DEFAULT ->
case uncheckedIShiftL# sat_s378 10#
of sat_s379 { __DEFAULT ->
case +# sat_s379 sat_s37b of sat_s37c { __DEFAULT ->
case +# sat_s37c 65536# of sat_s37d { __DEFAULT ->
case chr# sat_s37d of sat_s37e { __DEFAULT ->
let {
sat_s37f [Occ=Once] :: Char
[LclId, Str=DmdType]
sat_s37f = C# sat_s37e } in
case upperMapping @ Int sat_s37f sat_s37h
of _ [Occ=Dead] {
Done ->
case unsafeFreezeByteArray#
@ RealWorld sc6_s2Rw w_s2RC
of _ [Occ=Dead]
{ (# ipv4_s37k [Occ=Once*],
ipv5_s37l [Occ=Once] #) ->
case ww82_s2RB of wild10_s37m {
__DEFAULT ->
let {
sat_s37n [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s37n = Text ipv5_s37l 0# wild10_s37m } in
(# ipv4_s37k, sat_s37n #);
0# ->
case empty
of vx_s37o
{ Text _ [Occ=Dead] _ [Occ=Dead]
_ [Occ=Dead] ->
(# ipv4_s37k, vx_s37o #)
}
}
};
Skip s'_s37s [Occ=Once!] ->
case s'_s37s
of _ [Occ=Dead]
{ CC ww84_s37u [Occ=Once!] ww85_s37v [Occ=Once]
ww86_s37w [Occ=Once] ->
case ww84_s37u
of _ [Occ=Dead] { I# ww88_s37y [Occ=Once] ->
$wloop2_s2Rx
ww88_s37y ww85_s37v ww86_s37w ww82_s2RB w_s2RC
}
};
Yield x_s37z [Occ=Once!] s'_s37A [Occ=Once] ->
case x_s37z
of _ [Occ=Dead] { C# ww84_s37C [Occ=Once] ->
$w$j_s2Y0 ww84_s37C s'_s37A
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
};
True ->
case unsafeFreezeByteArray# @ RealWorld sc6_s2Rw w_s2RC
of _ [Occ=Dead]
{ (# ipv4_s37E [Occ=Once*], ipv5_s37F [Occ=Once] #) ->
case ww82_s2RB of wild7_s37G {
__DEFAULT ->
let {
sat_s37H [Occ=Once] :: Text
[LclId, Str=DmdType]
sat_s37H = Text ipv5_s37F 0# wild7_s37G } in
(# ipv4_s37E, sat_s37H #);
0# ->
case empty
of vx_s37I { Text _ [Occ=Dead] _ [Occ=Dead] _ [Occ=Dead] ->
(# ipv4_s37E, vx_s37I #)
}
}
}
}
}
}; } in
$wloop2_s2Rx sc4_s2Ru sc3_s2Rt sc2_s2Rs sc1_s2Rr sc_s2Rq; } in
$s$wouter_s2Rp
ipv2_s2Rm 0# '\NUL'# '\NUL'# dt10_s2Re dt11_s2Rf ipv3_s2Rn
}
}
}
};
True -> case array_size_error of _ [Occ=Dead] { }
}
of _ [Occ=Dead] { (# _ [Occ=Dead], ipv3_s37P [Occ=Once!] #) ->
case ipv3_s37P
of _ [Occ=Dead] { Text ww80_s37R ww81_s37S ww82_s37T ->
let {
$w$j_s37U [InlPrag=[0], Occ=Once*!]
:: ByteArray# -> Int# -> Int# -> Text
[LclId, Arity=3, Str=DmdType <S,U><S,U><S,U>, Unf=OtherCon []]
$w$j_s37U =
\ (w_s37V [OS=OneShot] :: ByteArray#)
(w1_s37W [OS=OneShot] :: Int#)
(w2_s37X [OS=OneShot] :: Int#) ->
let {
$w$j1_s37Y [InlPrag=[0], Occ=Once*!]
:: ByteArray# -> Int# -> Int# -> Text
[LclId, Arity=3, Str=DmdType <S,U><S,U><S,U>, Unf=OtherCon []]
$w$j1_s37Y =
\ (w3_s37Z [OS=OneShot] :: ByteArray#)
(w4_s380 [OS=OneShot] :: Int#)
(w5_s381 [OS=OneShot] :: Int#) ->
let {
$w$j2_s382 [InlPrag=[0], Occ=Once*!]
:: ByteArray# -> Int# -> Int# -> Text
[LclId, Arity=3, Str=DmdType <S,U><S,U><S,U>, Unf=OtherCon []]
$w$j2_s382 =
\ (w6_s383 [OS=OneShot] :: ByteArray#)
(w7_s384 [OS=OneShot] :: Int#)
(w8_s385 [OS=OneShot] :: Int#) ->
let {
$w$j3_s386 [InlPrag=[0], Occ=Once*!]
:: ByteArray# -> Int# -> Int# -> Text
[LclId, Arity=3, Str=DmdType <S,U><S,U><S,U>, Unf=OtherCon []]
$w$j3_s386 =
\ (w9_s387 [OS=OneShot] :: ByteArray#)
(w10_s388 [OS=OneShot] :: Int#)
(w11_s389 [OS=OneShot] :: Int#) ->
let {
$w$j4_s38a [InlPrag=[0], Occ=Once*!]
:: ByteArray# -> Int# -> Int# -> Text
[LclId, Arity=3, Str=DmdType <S,U><S,U><S,U>, Unf=OtherCon []]
$w$j4_s38a =
\ (w12_s38b [OS=OneShot] :: ByteArray#)
(w13_s38c [OS=OneShot] :: Int#)
(w14_s38d [OS=OneShot] :: Int#) ->
let {
$j2_s38e [Occ=Once*!] :: ByteArray# -> Int# -> Int# -> Text
[LclId, Arity=3, Str=DmdType <S,U><S,U><S,U>, Unf=OtherCon []]
$j2_s38e =
\ (ww83_s38f [OS=OneShot] :: ByteArray#)
(ww84_s38g [OS=OneShot] :: Int#)
(ww85_s38h [OS=OneShot] :: Int#) ->
let {
$w$j5_s38i [InlPrag=[0], Occ=Once*!]
:: ByteArray# -> Int# -> Int# -> Text
[LclId,
Arity=3,
Str=DmdType <S,U><S,U><S,U>,
Unf=OtherCon []]
$w$j5_s38i =
\ (w15_s38j [OS=OneShot] :: ByteArray#)
(w16_s38k [OS=OneShot] :: Int#)
(w17_s38l [OS=OneShot] :: Int#) ->
let {
$w$j6_s38m [InlPrag=[0], Occ=Once*!]
:: ByteArray# -> Int# -> Int# -> Text
[LclId,
Arity=3,
Str=DmdType <S,U><S,U><S,U>,
Unf=OtherCon []]
$w$j6_s38m =
\ (w18_s38n [OS=OneShot] :: ByteArray#)
(w19_s38o [OS=OneShot] :: Int#)
(w20_s38p [OS=OneShot] :: Int#) ->
let {
$w$j7_s38q [InlPrag=[0], Occ=Once*!]
:: ByteArray# -> Int# -> Int# -> Text
[LclId,
Arity=3,
Str=DmdType <S,U><S,U><S,U>,
Unf=OtherCon []]
$w$j7_s38q =
\ (w21_s38r [OS=OneShot] :: ByteArray#)
(w22_s38s [OS=OneShot] :: Int#)
(w23_s38t [OS=OneShot] :: Int#) ->
let {
$w$j8_s38u [InlPrag=[0], Occ=Once*!]
:: ByteArray# -> Int# -> Int# -> Text
[LclId,
Arity=3,
Str=DmdType <S,U><S,U><S,U>,
Unf=OtherCon []]
$w$j8_s38u =
\ (w24_s38v [OS=OneShot]
:: ByteArray#)
(w25_s38w [OS=OneShot] :: Int#)
(w26_s38x [OS=OneShot] :: Int#) ->
let {
$j3_s38y [Occ=Once*!]
:: ByteArray#
-> Int# -> Int# -> Text
[LclId,
Arity=3,
Str=DmdType <S,U><S,U><S,U>,
Unf=OtherCon []]
$j3_s38y =
\ (ww86_s38z [OS=OneShot]
:: ByteArray#)
(ww87_s38A [OS=OneShot]
:: Int#)
(ww88_s38B [OS=OneShot]
:: Int#) ->
let {
$j4_s38C [Occ=Once*!]
:: ByteArray#
-> Int#
-> Int#
-> Text
-> Text
[LclId,
Arity=4,
Str=DmdType <S,U><S,U><S,U><L,1*U(U,U,U)>,
Unf=OtherCon []]
$j4_s38C =
\ (ww89_s38D [OS=OneShot]
:: ByteArray#)
(ww90_s38E [OS=OneShot]
:: Int#)
(ww91_s38F [OS=OneShot]
:: Int#)
(ww92_s38G [Occ=Once,
OS=OneShot]
:: Text) ->
let {
$j5_s38H [Occ=Once*!]
:: ByteArray#
-> Int#
-> Int#
-> Text
-> Text
[LclId,
Arity=4,
Str=DmdType <S,U><S,U><S,U><L,1*U(U,U,U)>,
Unf=OtherCon []]
$j5_s38H =
\ (ww93_s38I [OS=OneShot]
:: ByteArray#)
(ww94_s38J [OS=OneShot]
:: Int#)
(ww95_s38K [OS=OneShot]
:: Int#)
(ww96_s38L [Occ=Once,
OS=OneShot]
:: Text) ->
let {
$j6_s38M [Occ=Once*!]
:: ByteArray#
-> Int#
-> Int#
-> Text
-> Text
[LclId,
Arity=4,
Str=DmdType <S,U><S,U><S,U><L,1*U(U,U,U)>,
Unf=OtherCon []]
$j6_s38M =
\ (ww97_s38N [OS=OneShot]
:: ByteArray#)
(ww98_s38O [OS=OneShot]
:: Int#)
(ww99_s38P [OS=OneShot]
:: Int#)
(ww100_s38Q [Occ=Once,
OS=OneShot]
:: Text) ->
let {
$j7_s38R [Occ=Once*!]
:: ByteArray#
-> Int#
-> Int#
-> Text
-> Text
[LclId,
Arity=4,
Str=DmdType <S,U><S,U><S,U><L,1*U(U,U,U)>,
Unf=OtherCon []]
$j7_s38R =
\ (ww101_s38S [OS=OneShot]
:: ByteArray#)
(ww102_s38T [OS=OneShot]
:: Int#)
(ww103_s38U [OS=OneShot]
:: Int#)
(ww104_s38V [Occ=Once,
OS=OneShot]
:: Text) ->
let {
$j8_s38W [Occ=Once*!]
:: ByteArray#
-> Int#
-> Int#
-> Text
-> Text
[LclId,
Arity=4,
Str=DmdType <S,U><S,U><S,U><L,1*U(U,U,U)>,
Unf=OtherCon []]
$j8_s38W =
\ (ww105_s38X [OS=OneShot]
:: ByteArray#)
(ww106_s38Y [OS=OneShot]
:: Int#)
(ww107_s38Z [OS=OneShot]
:: Int#)
(ww108_s390 [Occ=Once,
OS=OneShot]
:: Text) ->
let {
$j9_s391 [Occ=Once*!]
:: ByteArray#
-> Int#
-> Int#
-> Text
-> Text
[LclId,
Arity=4,
Str=DmdType <S,U><S,U><S,U><L,1*U(U,U,U)>,
Unf=OtherCon []]
$j9_s391 =
\ (ww109_s392 [OS=OneShot]
:: ByteArray#)
(ww110_s393 [OS=OneShot]
:: Int#)
(ww111_s394 [OS=OneShot]
:: Int#)
(ww112_s395 [Occ=Once,
OS=OneShot]
:: Text) ->
case $wstripSuffix
ww8_s2GK
ww9_s2GL
ww10_s2GM
ww109_s392
ww110_s393
ww111_s394
of _ [Occ=Dead] {
Nothing ->
case $wstripSuffix
ww4_s2GG
ww5_s2GH
ww6_s2GI
ww109_s392
ww110_s393
ww111_s394
of _ [Occ=Dead] {
Nothing ->
ww112_s395;
Just v_s398 [Occ=Once] ->
v_s398
};
Just v_s399 [Occ=Once!] ->
case v_s399
of ww113_s39a
{ Text ww114_s39b [Occ=Once]
ww115_s39c [Occ=Once]
ww116_s39d [Occ=Once] ->
case $wstripSuffix
ww4_s2GG
ww5_s2GH
ww6_s2GI
ww114_s39b
ww115_s39c
ww116_s39d
of _ [Occ=Dead] {
Nothing ->
ww113_s39a;
Just v1_s39f [Occ=Once] ->
v1_s39f
}
}
} } in
case $wstripSuffix
ww12_s2GO
ww13_s2GP
ww14_s2GQ
ww105_s38X
ww106_s38Y
ww107_s38Z
of _ [Occ=Dead] {
Nothing ->
$j9_s391
ww105_s38X
ww106_s38Y
ww107_s38Z
ww108_s390;
Just v_s39h [Occ=Once!] ->
case v_s39h
of ww109_s39i
{ Text ww110_s39j [Occ=Once]
ww111_s39k [Occ=Once]
ww112_s39l [Occ=Once] ->
$j9_s391
ww110_s39j
ww111_s39k
ww112_s39l
ww109_s39i
}
} } in
case $wstripSuffix
ww16_s2GS
ww17_s2GT
ww18_s2GU
ww101_s38S
ww102_s38T
ww103_s38U
of _ [Occ=Dead] {
Nothing ->
$j8_s38W
ww101_s38S
ww102_s38T
ww103_s38U
ww104_s38V;
Just v_s39n [Occ=Once!] ->
case v_s39n
of ww105_s39o
{ Text ww106_s39p [Occ=Once]
ww107_s39q [Occ=Once]
ww108_s39r [Occ=Once] ->
$j8_s38W
ww106_s39p
ww107_s39q
ww108_s39r
ww105_s39o
}
} } in
case $wstripSuffix
ww20_s2GW
ww21_s2GX
ww22_s2GY
ww97_s38N
ww98_s38O
ww99_s38P
of _ [Occ=Dead] {
Nothing ->
$j7_s38R
ww97_s38N
ww98_s38O
ww99_s38P
ww100_s38Q;
Just v_s39t [Occ=Once!] ->
case v_s39t
of ww101_s39u
{ Text ww102_s39v [Occ=Once]
ww103_s39w [Occ=Once]
ww104_s39x [Occ=Once] ->
$j7_s38R
ww102_s39v
ww103_s39w
ww104_s39x
ww101_s39u
}
} } in
case $wstripSuffix
ww24_s2H0
ww25_s2H1
ww26_s2H2
ww93_s38I
ww94_s38J
ww95_s38K
of _ [Occ=Dead] {
Nothing ->
$j6_s38M
ww93_s38I
ww94_s38J
ww95_s38K
ww96_s38L;
Just v_s39z [Occ=Once!] ->
case v_s39z
of ww97_s39A
{ Text ww98_s39B [Occ=Once]
ww99_s39C [Occ=Once]
ww100_s39D [Occ=Once] ->
$j6_s38M
ww98_s39B
ww99_s39C
ww100_s39D
ww97_s39A
}
} } in
case $wstripSuffix
ww28_s2H4
ww29_s2H5
ww30_s2H6
ww89_s38D
ww90_s38E
ww91_s38F
of _ [Occ=Dead] {
Nothing ->
$j5_s38H
ww89_s38D
ww90_s38E
ww91_s38F
ww92_s38G;
Just v_s39F [Occ=Once!] ->
case v_s39F
of ww93_s39G
{ Text ww94_s39H [Occ=Once]
ww95_s39I [Occ=Once]
ww96_s39J [Occ=Once] ->
$j5_s38H
ww94_s39H
ww95_s39I
ww96_s39J
ww93_s39G
}
} } in
case $wstripSuffix
ww32_s2H8
ww33_s2H9
ww34_s2Ha
ww86_s38z
ww87_s38A
ww88_s38B
of _ [Occ=Dead] {
Nothing ->
case $j_r2Fv
ww86_s38z
ww87_s38A
ww88_s38B
of ww89_s39L
{ Text ww90_s39M [Occ=Once]
ww91_s39N [Occ=Once]
ww92_s39O [Occ=Once] ->
$j4_s38C
ww90_s39M
ww91_s39N
ww92_s39O
ww89_s39L
};
Just v_s39P [Occ=Once!] ->
case v_s39P
of _ [Occ=Dead]
{ Text dt12_s39R [Occ=Once]
dt13_s39S [Occ=Once]
dt14_s39T [Occ=Once] ->
case $j_r2Fv
dt12_s39R
dt13_s39S
dt14_s39T
of ww89_s39U
{ Text ww90_s39V [Occ=Once]
ww91_s39W [Occ=Once]
ww92_s39X [Occ=Once] ->
$j4_s38C
ww90_s39V
ww91_s39W
ww92_s39X
ww89_s39U
}
}
} } in
case $wstripSuffix
ww36_s2Hc
ww37_s2Hd
ww38_s2He
w24_s38v
w25_s38w
w26_s38x
of _ [Occ=Dead] {
Nothing ->
$j3_s38y
w24_s38v w25_s38w w26_s38x;
Just v_s39Z [Occ=Once!] ->
case v_s39Z
of _ [Occ=Dead]
{ Text ww87_s3a1 [Occ=Once]
ww88_s3a2 [Occ=Once]
ww89_s3a3 [Occ=Once] ->
$j3_s38y
ww87_s3a1 ww88_s3a2 ww89_s3a3
}
} } in
case $wstripSuffix
ww40_s2Hg
ww41_s2Hh
ww42_s2Hi
w21_s38r
w22_s38s
w23_s38t
of _ [Occ=Dead] {
Nothing ->
$w$j8_s38u w21_s38r w22_s38s w23_s38t;
Just v_s3a5 [Occ=Once!] ->
case v_s3a5
of _ [Occ=Dead]
{ Text ww87_s3a7 [Occ=Once]
ww88_s3a8 [Occ=Once]
ww89_s3a9 [Occ=Once] ->
$w$j8_s38u
ww87_s3a7 ww88_s3a8 ww89_s3a9
}
} } in
case $wstripSuffix
ww44_s2Hk
ww45_s2Hl
ww46_s2Hm
w18_s38n
w19_s38o
w20_s38p
of _ [Occ=Dead] {
Nothing ->
$w$j7_s38q w18_s38n w19_s38o w20_s38p;
Just v_s3ab [Occ=Once!] ->
case v_s3ab
of _ [Occ=Dead]
{ Text ww87_s3ad [Occ=Once]
ww88_s3ae [Occ=Once]
ww89_s3af [Occ=Once] ->
$w$j7_s38q ww87_s3ad ww88_s3ae ww89_s3af
}
} } in
case $wstripSuffix
ww48_s2Ho
ww49_s2Hp
ww50_s2Hq
w15_s38j
w16_s38k
w17_s38l
of _ [Occ=Dead] {
Nothing -> $w$j6_s38m w15_s38j w16_s38k w17_s38l;
Just v_s3ah [Occ=Once!] ->
case v_s3ah
of _ [Occ=Dead]
{ Text ww87_s3aj [Occ=Once] ww88_s3ak [Occ=Once]
ww89_s3al [Occ=Once] ->
$w$j6_s38m ww87_s3aj ww88_s3ak ww89_s3al
}
} } in
case $wstripSuffix
ww52_s2Hs
ww53_s2Ht
ww54_s2Hu
ww83_s38f
ww84_s38g
ww85_s38h
of _ [Occ=Dead] {
Nothing ->
case $j_r2Fv ww83_s38f ww84_s38g ww85_s38h
of _ [Occ=Dead]
{ Text ww87_s3ao [Occ=Once] ww88_s3ap [Occ=Once]
ww89_s3aq [Occ=Once] ->
$w$j5_s38i ww87_s3ao ww88_s3ap ww89_s3aq
};
Just v_s3ar [Occ=Once!] ->
case v_s3ar
of _ [Occ=Dead]
{ Text dt12_s3at [Occ=Once] dt13_s3au [Occ=Once]
dt14_s3av [Occ=Once] ->
case $j_r2Fv dt12_s3at dt13_s3au dt14_s3av
of _ [Occ=Dead]
{ Text ww87_s3ax [Occ=Once] ww88_s3ay [Occ=Once]
ww89_s3az [Occ=Once] ->
$w$j5_s38i ww87_s3ax ww88_s3ay ww89_s3az
}
}
} } in
case $wstripSuffix
ww56_s2Hw ww57_s2Hx ww58_s2Hy w12_s38b w13_s38c w14_s38d
of _ [Occ=Dead] {
Nothing -> $j2_s38e w12_s38b w13_s38c w14_s38d;
Just v_s3aB [Occ=Once!] ->
case v_s3aB
of _ [Occ=Dead]
{ Text ww84_s3aD [Occ=Once] ww85_s3aE [Occ=Once]
ww86_s3aF [Occ=Once] ->
$j2_s38e ww84_s3aD ww85_s3aE ww86_s3aF
}
} } in
case $wstripSuffix
ww60_s2HA ww61_s2HB ww62_s2HC w9_s387 w10_s388 w11_s389
of _ [Occ=Dead] {
Nothing -> $w$j4_s38a w9_s387 w10_s388 w11_s389;
Just v_s3aH [Occ=Once!] ->
case v_s3aH
of _ [Occ=Dead]
{ Text ww84_s3aJ [Occ=Once] ww85_s3aK [Occ=Once]
ww86_s3aL [Occ=Once] ->
$w$j4_s38a ww84_s3aJ ww85_s3aK ww86_s3aL
}
} } in
case $wstripSuffix
ww64_s2HE ww65_s2HF ww66_s2HG w6_s383 w7_s384 w8_s385
of _ [Occ=Dead] {
Nothing -> $w$j3_s386 w6_s383 w7_s384 w8_s385;
Just v_s3aN [Occ=Once!] ->
case v_s3aN
of _ [Occ=Dead]
{ Text ww84_s3aP [Occ=Once] ww85_s3aQ [Occ=Once]
ww86_s3aR [Occ=Once] ->
$w$j3_s386 ww84_s3aP ww85_s3aQ ww86_s3aR
}
} } in
case $wstripSuffix
ww68_s2HI ww69_s2HJ ww70_s2HK w3_s37Z w4_s380 w5_s381
of _ [Occ=Dead] {
Nothing -> $w$j2_s382 w3_s37Z w4_s380 w5_s381;
Just v_s3aT [Occ=Once!] ->
case v_s3aT
of _ [Occ=Dead]
{ Text ww84_s3aV [Occ=Once] ww85_s3aW [Occ=Once]
ww86_s3aX [Occ=Once] ->
$w$j2_s382 ww84_s3aV ww85_s3aW ww86_s3aX
}
} } in
case $wstripSuffix
ww72_s2HM ww73_s2HN ww74_s2HO w_s37V w1_s37W w2_s37X
of _ [Occ=Dead] {
Nothing -> $w$j1_s37Y w_s37V w1_s37W w2_s37X;
Just v_s3aZ [Occ=Once!] ->
case v_s3aZ
of _ [Occ=Dead]
{ Text ww84_s3b1 [Occ=Once] ww85_s3b2 [Occ=Once]
ww86_s3b3 [Occ=Once] ->
$w$j1_s37Y ww84_s3b1 ww85_s3b2 ww86_s3b3
}
} } in
case $wstripSuffix
ww76_s2HQ ww77_s2HR ww78_s2HS ww80_s37R ww81_s37S ww82_s37T
of _ [Occ=Dead] {
Nothing -> $w$j_s37U ww80_s37R ww81_s37S ww82_s37T;
Just v_s3b5 [Occ=Once!] ->
case v_s3b5
of _ [Occ=Dead]
{ Text ww84_s3b7 [Occ=Once] ww85_s3b8 [Occ=Once]
ww86_s3b9 [Occ=Once] ->
$w$j_s37U ww84_s3b7 ww85_s3b8 ww86_s3b9
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
simplifyInstName [InlPrag=INLINE[0]] :: Text -> Text
[GblId, Arity=1, Str=DmdType <S(SSS),1*U(U,U,U)>, Unf=OtherCon []]
simplifyInstName =
\ (w_s3ba [Occ=Once!] :: Text) ->
case w_s3ba
of _ [Occ=Dead]
{ Text ww1_s3bc [Occ=Once] ww2_s3bd [Occ=Once]
ww3_s3be [Occ=Once] ->
$wsimplifyInstName ww1_s3bc ww2_s3bd ww3_s3be
}
*** End of Offense ***
<no location info>: error:
Compilation had errors
<3>builder for ‘/nix/store/4nd41pzqyjh3kfbhv9pfnxnpmrv8yfma-circuithub-api-0.0.4.drv’ failed with exit code 1
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment