Skip to content

Instantly share code, notes, and snippets.

View krgn's full-sized avatar

Karsten Gebbert krgn

  • Staffbase
  • Berlin, Germany
View GitHub Profile
let accountShouldCreateUser =
ftestCaseAsync "account should create user" $ async {
let source = ContractSource.read "../../../build" "FileSyncContract"
let password = "password"
/// personal stuff
let name = "karsten"
let! personalAddress = Web3().Personal.NewAccount.SendRequestAsync(password)
let personalAccount = ManagedAccount(personalAddress, password)
@krgn
krgn / neth.fs
Created October 11, 2017 15:27
fsharp nethereum
[<EntryPoint>]
let main argv =
let dir = argv.[0]
let account = ManagedAccount(sender, password)
let web3 = Web3Geth(account)
web3.Personal.UnlockAccount.SendRequestAsync(
sender,
password,

Keybase proof

I hereby claim:

  • I am krgn on github.
  • I am krgn (https://keybase.io/krgn) on keybase.
  • I have a public key whose fingerprint is BE43 30E7 E8D2 B558 3304 DB1D 9B50 B62F DD55 0852

To claim this, I am signing this object:

@krgn
krgn / receiver.c
Created December 13, 2015 11:47
Multicast Receiver
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <time.h>
#include <string.h>
#include <stdio.h>
#define HELLO_PORT 12345
#define HELLO_GROUP "225.0.0.37"
@krgn
krgn / sender.c
Created December 13, 2015 11:46
Multicast Sender
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <time.h>
#include <string.h>
#include <stdio.h>
#define HELLO_PORT 12345
@krgn
krgn / Program.fs
Created December 8, 2015 09:58
Cluster routers
namespace TestCluster
open Akka
open Akka.Routing
open Akka.Actor
open Akka.Cluster
open Akka.FSharp
open System
module Main =
@krgn
krgn / Program.fs
Created December 8, 2015 09:31
akka test cluster
namespace TestCluster
open Akka
open Akka.Routing
open Akka.Actor
open Akka.Cluster
open Akka.FSharp
open System
module Main =
➜ native git:(frontend-rewrite) ✗ mono src/Iris.Service/bin/Debug/Iris.Service.exe
Unhandled Exception:
System.ArgumentException: Interface not found
Parameter name: interfaceType
at System.MonoType.GetInterfaceMap (System.Type interfaceType) [0x00000] in <filename unknown>:0
at FunScript.Comparison.tryGetCompareToMethod (ICompiler compiler, System.Type t) [0x00000] in <filename unknown>:0
at FunScript.Comparison.comparableCompareComponent$cont@170 (ICompiler compiler, Microsoft.FSharp.Quotations.FSharpExpr exprA, Microsoft.FSharp.Quotations.FSharpExpr exprB, Microsoft.FSharp.Core.Unit unitVar) [0x00000] in <filename unknown>:0
at FunScript.Comparison+comparableCompareComponent@163.Invoke (Microsoft.FSharp.Core.FSharpFunc`2 _arg2, ICompiler compiler, IReturnStrategy _arg1, Microsoft.FSharp.Quotations.FSharpExpr exprA, Microsoft.FSharp.Quotations.FSharpExpr exprB) [0x00000] in <filename unknown>:0
at Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Core.FSharpFunc`2[Microsoft.FSharp.Quotati
{ stdenv, lib, requireFile, demo, fetchurl, libX11, libXext, libXcursor, libXrandr, libjack2, alsaLib, ... }:
stdenv.mkDerivation rec {
name = "renoise";
buildInputs = [ libX11 libXext libXcursor libXrandr alsaLib libjack2 ];
phases = "unpackPhase installPhase";
suffix = if builtins.currentSystem == "x86_64-linux" then "_64" else "";
@krgn
krgn / stacktrace
Created June 8, 2012 11:41
simplecov/rspec segfault
(erb):35: [BUG] Segmentation fault
ruby 1.9.3p194 (2012-04-20 revision 35410) [x86_64-linux]
-- Control frame information -----------------------------------------------
c:0024 p:---- s:0082 b:0082 l:000081 d:000081 CFUNC :round
c:0023 p:0132 s:0078 b:0077 l:001878 d:000076 BLOCK (erb):35
c:0022 p:---- s:0074 b:0074 l:000073 d:000073 FINISH
c:0021 p:---- s:0072 b:0072 l:000071 d:000071 CFUNC :each
c:0020 p:0521 s:0069 b:0069 l:001878 d:000a30 EVAL (erb):32
c:0019 p:---- s:0066 b:0066 l:000065 d:000065 FINISH