Skip to content

Instantly share code, notes, and snippets.

View mpickering's full-sized avatar

Matthew Pickering mpickering

  • Well Typed LLP
  • Sheffield, UK
View GitHub Profile
DEBUG:urllib3.connectionpool:Starting new HTTPS connection (1): gitlab.haskell.org:443
DEBUG:urllib3.connectionpool:https://gitlab.haskell.org:443 "GET /api/v4/projects/ghc%2Fghc HTTP/1.1" 200 5104
DEBUG:urllib3.connectionpool:https://gitlab.haskell.org:443 "GET /api/v4/projects/1/pipelines/101815 HTTP/1.1" 200 1168
DEBUG:urllib3.connectionpool:https://gitlab.haskell.org:443 "GET /api/v4/projects/1/pipelines/101815/jobs HTTP/1.1" 200 57337
DEBUG:urllib3.connectionpool:https://gitlab.haskell.org:443 "GET /api/v4/projects/1/pipelines/101815/jobs?id=1&include_retried=false&page=2&per_page=20&pipeline_id=101815 HTTP/1.1" 200 57509
DEBUG:urllib3.connectionpool:https://gitlab.haskell.org:443 "GET /api/v4/projects/1/pipelines/101815/jobs?id=1&include_retried=false&page=3&per_page=20&pipeline_id=101815 HTTP/1.1" 200 10419
DEBUG:urllib3.connectionpool:https://gitlab.haskell.org:443 "GET /api/v4/projects/1/jobs/2009779 HTTP/1.1" 200 2945
Archive: fetch-gitlab/release-x86_64-linux-centos7-release+no_split_sections.zip
import networkx as nx
g = nx.drawing.nx_agraph.read_dot("/home/matt/ghc-clean/deps-2.dot")
#g.remove_edge("GHC.Iface.Type", "GHC.Tc.Utils.TcType")
#g.remove_edge("GHC.Core.Type", "GHC.Tc.Utils.TcType")
#g.remove_edge("GHC.Types.Var", "GHC.Tc.Utils.TcType")
# FFI stuff checking DynFlags
#g.remove_edge("GHC.Tc.Utils.TcType", "GHC.Driver.Session")
# Because of TcLclEnv import
{-# LANGUAGE TemplateHaskellQuotes #-}
{-# LANGUAGE GADTs #-}
module Pat3 where
import qualified Language.Haskell.TH as TH (Code, Q,)
import qualified Language.Haskell.TH.Syntax as TH (Lift(..))
import Data.Functor.Identity
type Code = TH.Code TH.Q
{-# LANGUAGE TemplateHaskellQuotes #-}
{-# LANGUAGE GADTs #-}
module Pat3 where
import qualified Language.Haskell.TH as TH (Code, Q,)
import qualified Language.Haskell.TH.Syntax as TH (Lift(..))
import Data.Functor.Identity
type Code = TH.Code TH.Q
{-# LANGUAGE GADTs #-}
{-# LANGUAGE TemplateHaskellQuotes #-}
module Pat where
import qualified Language.Haskell.TH as TH (Code, Q,)
import qualified Language.Haskell.TH.Syntax as TH (Lift(..))
-- Step 1: Unstaged interpreter
CondNode {condTreeData =
ProjectConfig {projectPackages =
["server","server/lib/*/*.cabal","server/forks/*/*.cabal"], projectPackagesOptional =
[], projectPackagesRepo =
[SourceRepositoryPackage {srpType =
KnownRepoType Git, srpLocation =
"https://github.com/agrafix/Spock", srpTag =
Just "40d028bfea0e94ca7096c719cd024ca47a46e559", srpBranch =
Nothing, srpSubdir =
["Spock-core"], srpCommand =
module Main where
import Distribution.Client.ProjectConfig
import Distribution.Client.HttpUtils
import Distribution.Client.DistDirLayout
import Distribution.Client.RebuildMonad
import System.Environment
main = do
[root] <- getArgs
abstract-deque
abstract-deque-tests
abstract-par
AC-Angle
acc
ace
acid-state
action-permutations
active
ad

Revision history for test

0.1.0.0 -- YYYY-mm-dd

  • First version. Released on an unsuspecting world.
Read the interface file T16875.hi
loadHiBootInterface T16875
Reading [boot] interface for main:T16875;
reason: Need the hi-boot interface for T16875 to compare against the Real Thing
readIFace T16875.hi-boot
Considering whether to load Prelude
Reading interface for base:Prelude;
reason: Prelude is implicitly imported
readIFace /home/matt/ghc-ticky/_build/stage1/lib/../lib/x86_64-linux-ghc-9.11.20240715/base-4.20.0.0-inplace/Prelude.hi
updating EPS