Network.Bugsnag.StackFrame

Documentation

newtype BugsnagCode

Lines of code surrounding the error

Pairs of (line-number, line-of-code), up to 3 on either side.

Constructors

BugsnagCode [(Natural, Text)]

Instances

Show BugsnagCode

Defined in Network.Bugsnag.StackFrame

Methods

showsPrec :: Int -> BugsnagCode -> ShowS

show :: BugsnagCode -> String

showList :: [BugsnagCode] -> ShowS

ToJSON BugsnagCode

Defined in Network.Bugsnag.StackFrame

Methods

toJSON :: BugsnagCode -> Value

toEncoding :: BugsnagCode -> Encoding

toJSONList :: [BugsnagCode] -> Value

toEncodingList :: [BugsnagCode] -> Encoding

attachBugsnagCode :: CodeIndex -> BugsnagStackFrame -> BugsnagStackFrame

Attempt to attach a BugsnagCode to a BugsnagStackFrame

Looks up the content in the Index by File/LineNumber and, if found, sets it on the record.

data BugsnagStackFrame

Constructors

BugsnagStackFrame

Fields

• bsfFile :: FilePath
• bsfLineNumber :: Natural
• bsfColumnNumber :: Maybe Natural
• bsfMethod :: Text

  Function, in our parlance

• bsfInProject :: Maybe Bool
• bsfCode :: Maybe BugsnagCode

Instances

Show BugsnagStackFrame

Defined in Network.Bugsnag.StackFrame

Methods

showsPrec :: Int -> BugsnagStackFrame -> ShowS

show :: BugsnagStackFrame -> String

showList :: [BugsnagStackFrame] -> ShowS

Generic BugsnagStackFrame

Defined in Network.Bugsnag.StackFrame

Associated Types

type Rep BugsnagStackFrame :: Type -> Type

Methods

from :: BugsnagStackFrame -> Rep BugsnagStackFrame x

to :: Rep BugsnagStackFrame x -> BugsnagStackFrame

ToJSON BugsnagStackFrame

Defined in Network.Bugsnag.StackFrame

Methods

toJSON :: BugsnagStackFrame -> Value

toEncoding :: BugsnagStackFrame -> Encoding

toJSONList :: [BugsnagStackFrame] -> Value

toEncodingList :: [BugsnagStackFrame] -> Encoding

type Rep BugsnagStackFrame

Defined in Network.Bugsnag.StackFrame

type Rep BugsnagStackFrame = D1 ('MetaData "BugsnagStackFrame" "Network.Bugsnag.StackFrame" "bugsnag-haskell-0.0.4.1-2wBPl8SEYMUGu61lEE3DvW" 'False) (C1 ('MetaCons "BugsnagStackFrame" 'PrefixI 'True) ((S1 ('MetaSel ('Just "bsfFile") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 FilePath) :*: (S1 ('MetaSel ('Just "bsfLineNumber") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Natural) :*: S1 ('MetaSel ('Just "bsfColumnNumber") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Natural)))) :*: (S1 ('MetaSel ('Just "bsfMethod") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: (S1 ('MetaSel ('Just "bsfInProject") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)) :*: S1 ('MetaSel ('Just "bsfCode") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe BugsnagCode))))))

bugsnagStackFrame :: FilePath -> Natural -> Text -> BugsnagStackFrame

currentStackFrame :: Q Exp

Construct a BugsnagStackFrame from the point of this splice

Unfortunately there's no way to know the function, so that must be given:

>>> :set -XOverloadedStrings -XTemplateHaskell
>>> :m +Control.Arrow
>>> (bsfFile &&& bsfMethod) $ $(currentStackFrame) "myFunc"
("<interactive>","myFunc")