Skip to content

Instantly share code, notes, and snippets.

Everything is cool.

Adam Hoka ahoka

Everything is cool.
View GitHub Profile
View resume.json
"basics": {
"name": "Adam Hoka",
"label": "Software Architect",
"picture": "",
"email": "",
"phone": "",
"website": "",
"summary": "As a software architect I provide both technical guidance and people management for my teams. I'm a self-taught software developer, so continuous learning is natural for me. I like to keep up with the latest technology, because anything that could solve a problem for our customers is worth trying. I believe that unit testing, integration testing, CI and a healthy code review culture are tools everyone should have. I recommend Lean and Kan-ban for everyone who wants to make state-of-the-art software. A good way to shape company culture is to show a good example. One-on-ones are also something you should be doing.",
"location": {
View .emacs.el
;; .emacs file for c, c++, python development
;; Adam Hoka, 2016
(require 'package)
(setq package-archives '(("melpa" . "")
("gnu" . "")))
#include <functional>
#include <iostream>
template <class A, class B, class C>
class Infix
std::function<C(A, B)> funM;
if [ "$1" = "--list" ]
echo "{"
echo " \"nodes\": {"
echo -n " \"hosts\": ["
for host in $(cut -d ' ' -f 3 /var/lib/libvirt/dnsmasq/default.leases)
View rot90.fs
let rot90 m =
let rec rot90 m acc =
if List.isEmpty <| List.head m then
List.rev acc
rot90 ( List.tail m) ( List.head m :: acc)
rot90 m []
let matrix = [[1; 2; 3;];
View rot90.sml
val m = [[1, 2, 3], [6, 5, 4]];
fun rot90 (matrix) =
fun rot90 (m, acc) =
if null (hd m) then
rev acc
rot90 (map tl m, map hd m :: acc)
#!/usr/bin/env python
from socket import *
import umsgpack
s = socket(AF_TIPC, SOCK_RDM)
message = umsgpack.packb({ "version": 1, "command": "open"})
length = s.sendto(message, (TIPC_ADDR_NAME, 40000, 0, 0))
ahoka / c-include-guard.el
Created May 17, 2014
elisp function for generating header guards for C/C++ headers.
View c-include-guard.el
(defun c-include-guard ()
"Insert C header include guards."
(let (original-point macro-name)
(set 'original-point (point))
(set 'macro-name
You can’t perform that action at this time.