ahoka

Things I don't want to work with, if possible, in the order of non-preference:

- Clear Case: this one seems to be dead, but just to be sure
- Having to work through remote desktop: just no, nope.
- A locked down corporate Windows machine: it's just suffering
- Products not running on cloud for the wrong reasons: ItS NoT SeCuRE and ExPEnsIvE are not valid (or true) reasons
- Jira, Confluence: life is too short for wasting time on these crapware
- Scrum and other faux Agile crap: say no to two hour retrospectives with zero actionable outcome and user story tunnel vision
- Java: overengineering while failing to even adhere to separation of concerns is a core tenet in Java land
- Microsoft partners and stack: if your partner is MS, you don't need enemies

ahoka

#include <functional>
#include <iostream>

template <class A, class B, class C>
class Infix
{
private:
   std::function<C(A, B)> funM;
   
public:

ahoka

#!/bin/sh

if [ "$1" = "--list" ]
then
    echo "{"
    echo "  \"nodes\": {"
    echo -n "    \"hosts\": ["
    first=1
    for host in $(cut -d ' ' -f 3 /var/lib/libvirt/dnsmasq/default.leases)
    do

ahoka

let rot90 m =
    let rec rot90 m acc =
        if List.isEmpty <| List.head m then
            List.rev acc
        else
            rot90 (List.map List.tail m) (List.map List.head m :: acc)
    in
        rot90 m []

let matrix = [[1; 2; 3;];

ahoka

val m = [[1, 2, 3], [6, 5, 4]];

fun rot90 (matrix) =
  let
      fun rot90 (m, acc) =
        if null (hd m) then
            rev acc
        else
            rot90 (map tl m, map hd m :: acc)
  in

ahoka

#!/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

;;
;; .emacs file for c, c++, python development
;; Adam Hoka, 2016
;;

(require 'package)

(setq package-archives '(("melpa" . "https://melpa.org/packages/")
                         ("gnu" . "https://elpa.gnu.org/packages/")))
(package-initialize)

ahoka

(defun c-include-guard ()
  "Insert C header include guards."
  (interactive)
  (let (original-point macro-name)
    (set 'original-point (point))
    (set 'macro-name
         (upcase
          (replace-regexp-in-string
           "\\."
           "_"