Tarrasch

From 8016ef549062e6622a6acece5499501999c58994 Mon Sep 17 00:00:00 2001
From: Arash Rouhani <[email protected]>
Date: Mon, 13 Jan 2014 14:53:53 +0100
Subject: [PATCH] Make CAFs backtraceable for stack tracing

Before:
  0: stg_bh_upd_frame_ret (at rts/Updates.cmm:86:1-91:2)
  1: crashSelf (at my/Main.hs:23:15-23:40)
  2: + (at libraries/base/GHC/Num.lhs:86:19-86:30)
  3: crashSelf (at my/Main.hs:23:15-23:40)

Tarrasch

# I used this to get https://github.com/termoshtt/unite-bibtex working

from pybtex import errors
from pybtex.database.input import bibtex
errors.enable_strict_mode()
parser = bibtex.Parser()
path = '/home/YOUR_NAME/your/path/to/bibtex/file.bib'
parser.parse_file(path)

Tarrasch

Haskell API for stack traces

– what we have:

catch# :: (State# RealWorld -> (# State# RealWorld, a #) ) -> (b -> ByteArray# -> State# RealWorld -> (# State# RealWorld, a #) ) -> State# RealWorld -> (# State# RealWorld, a #)

dumpStack :: ByteArray# -> State# RealWorld -> State# RealWorld

Tarrasch

{-# LANGUAGE DeriveDataTypeable #-}
module InsideNew where

import Control.Exception
import Data.Typeable

data MyException = MyException
    deriving (Show, Typeable)

instance Exception MyException

Tarrasch

public class InOut {
  public static void main(String[] args) {
    insideSame();
    insideNew();
    outsideSame();
    outsideNew();
  }

  public static abstract class CatchPrint {
    public abstract void body() throws Exception;

Tarrasch

public class Main {
  public static void main(String[] args) {
    Exception e2 = new Exception();
    try {
      test();
    }
    catch (Exception e) {
      e2 = e;
    }
    e2.printStackTrace(); // The exception value is used outside of it's handler

Tarrasch

{-# LANGUAGE MagicHash #-}
module Main where

import GHC.IO (reifyStack, MyArray(..))
import GHC.Prim
import GHC.Exts
import Unsafe.Coerce
import Data.Primitive.ByteArray
import Data.Primitive.Types
import System.Mem

Tarrasch

-- version 1:

e = do print 1002
       ba <- reifyStack'
       print $ sizeofByteArray ba
       printStackTrace ba
       print $ 1 `div` 0
       print 2002

-- gives:

Tarrasch

\documentclass{article}
\usepackage[utf8]{inputenc}
\usepackage[pdfpagelabels]{hyperref}

\title{[Title]}
\author{N.N.}

\begin{document}

\pagenumbering{Alph}

Tarrasch

// LiveBordShuffler.cpp : Defines the entry point for the console application.
//

#include "stdafx.h"
#include <iostream>
#include <vector>
#include <string>
#include <algorithm>
using namespace std;