freiksenet

import { 
  makeRemoteExecutableSchema, 
  mergeSchemas,
} from 'graphql-tools';
import {
  execute,
  HttpLink,
  makePromise,
} from 'apollo-link';

freiksenet

// 1) validate the scheme
var validateD = Promise.defer();

// code to validate scheme
// ..
if (schemeIsValid) {
  validateD.resolve();
} else {
  validateD.reject();
}

freiksenet

[
  {
    "name": "User",
    "kind": "OBJECT",
    "interfaces": [
      "Node"
    ],
    "fields": [
      {
        "name": "id",

freiksenet

Keybase proof

I hereby claim:

• I am freiksenet on github.
• I am freiksenet (https://keybase.io/freiksenet) on keybase.
• I have a public key whose fingerprint is 82D7 6A30 BD18 0F19 D3C6 F469 FA07 791D 3E33 68D7

To claim this, I am signing this object:

freiksenet

import Data.List

infinityString st = st ++ infinityString st

split :: String->Char->[String]
split [] ch = []
split st ch = start : split ending ch
    where (start, e) = break (==ch) st
          ending = drop 1 e

freiksenet

rle:: String -> [(String, Int)]
rle []        = error "Empty List"
rle [x]       = [([x], 1)]
rle st@(x:xs) = (start, cnt) : rle ending where
            start, ending = span (==x) st
            cnt = length start