titouancreach

#include <iostream>
#include <cstdlib>


typedef int handle_type;

namespace uEye
{

class uEye

titouancreach

const expr = ["min", ["max", 0.5, ["toto", 1, 2]],1];

const env = {
  'eegle:min': Math.min,
  'eegle:max': Math.max,
  'UI:COMPONENT': function (x) {
    console.log('Component called', x);
    return 1;
  }
}

titouancreach

titouancreach

titouancreach

const addTodo = todoItem => {type: 'ADD_TODO', payload: {todoItem}};

titouancreach

open Util;

[@bs.module "semantic-ui-react"] external button : ReasonReact.reactClass = "Button";


let make = (children) => 
  ReasonReact.wrapJsForReason(
    ~reactClass=button,
    children
);

titouancreach

export function compose(...fns) {
  if (fns.length === 0) {
    return fns;
  }
  return value => {
    const g = fnsAcc => {
      if (fnsAcc.length === 1) {
        return fnsAcc[0](value);
      }
      const [head, ...tail] = fnsAcc;

titouancreach

const state = {
  dataset: [{
    name: 'dataset1',
    template: 0
  }, {
    name: 'dataset2',
    template: 1
  }],
  template: {
    0: {

titouancreach

def make(s) do 
    case (s) do 
        [line, sens | rest] -> [{line, sens} | make(rest)]
        [] -> []
    end
end

titouancreach

const matchString = (s, patterns) => {
  	if (patterns.length === 0) {
      throw new Error('Not exhaustive string matching');
    } 
    const [matching, ...rest] = patterns;
    const [re, fn] = matching;
    if (re.test(s)) {
      const matches = re.exec(s);
      return matches ? fn(...matches) : fn();
    }