elliotpotts

    // Execute the given c++ code, catching scheme exceptions thrown
    // NOTE: c++ exceptions cannot be caught in this environment!
    template <typename F>
    SCM in_try(F&& f) {
        return scm_c_catch (
            SCM_BOOL_T,
            &in_try_body<F>, reinterpret_cast<void*>(&f),
            &in_try_handler<F>, reinterpret_cast<void*>(&f),
            &in_try_preunwind_handler<F>, reinterpret_cast<void*>(&f)
        );

elliotpotts

  1: wl_drm: no handler
  2: wl_compositor: bound successfully
  3: wl_shm: bound successfully
  4: wl_output: no handler
  5: zxdg_output_manager_v1: no handler
  6: wl_data_device_manager: no handler
  7: gtk_primary_selection_device_manager: no handler
  8: wl_subcompositor: no handler
  9: xdg_wm_base: no handler
 10: zxdg_shell_v6: no handler

elliotpotts

Keybase proof

I hereby claim:

• I am elliotpotts on github.
• I am elliotpotts (https://keybase.io/elliotpotts) on keybase.
• I have a public key ASAcC1_IqIoja4wK0eww8A7akozBdL8tZDVjXLVRlVyKGwo

To claim this, I am signing this object:

elliotpotts

;*----------------------------------------------------------------------------*
;*   SOFTWARE PIPELINE INFORMATION
;*
;*      Loop found in file               : ../stereo_vision_c.c
;*      Loop source line                 : 13
;*      Loop opening brace source line   : 13
;*      Loop closing brace source line   : 26
;*      Known Minimum Trip Count         : 60                    
;*      Known Maximum Trip Count         : 60                    
;*      Known Max Trip Count Factor      : 60

elliotpotts

#define Height 223
#define Width 280

// TODO: optimise this function for better performance
void stereo_vision_c(unsigned char *L, unsigned char *R, unsigned char * restrict Disparity_Map, int Search_Range, int Radius)
{

    int i,j,k;
    int ii, jj;
    int Sum;

elliotpotts

#include <cstdint>
#include <cerrno>
#include <string>
#include <forward_list>
#include <utility>
#include <memory>
#include <fmt/format.h>
#include <wayland-client.h>
#include <wayland-client-protocol.h>
#include <wayland-egl.h>

elliotpotts

#include <stdbool.h>
#include <stdlib.h>
#include <stdio.h>

typedef struct {
    bool has_value;
    int value;
} maybe_int;

typedef struct {

elliotpotts

 1:    0,    1 |   1,    0
 2:   00,   01,   11,   10 |  10,   11,   01,   00
 3:  000,  001,  011,  010,  110,  111,  101,  100 | 100,  101,  111,  110,  010,  011,  001,  000
 4: 0000, 0001, 0011, 0010, 0110, 0111, 0101, 0100, 1100, 1101, 1111, 1110, 1010, 1011, 1001, 1000

elliotpotts

#include "example/ExampleClass.jh"
#include <iostream>
#include "J/Ref.hpp"
#include "J/Method.hpp"
#include "J/Tags.hpp"

using namespace J::tag;

void test(java::lang::Object& obj) {
    std::cout << "[Hash " << obj.hashCode() << "]\n";

elliotpotts

import Control.Applicative
import Control.Monad

newtype Parser a = Parser (String -> [(String, a)])

run :: Parser a -> String -> [(String, a)]
run (Parser pf) = pf

instance Functor Parser where
  fmap f (Parser pf) = Parser $ \s -> fmap (fmap f) (pf s)