kakkun61

-- http://www.cs.ru.nl/~W.Swierstra/Publications/DataTypesALaCarte.pdf

{-# LANGUAGE TypeOperators #-}
{-# LANGUAGE DeriveFunctor #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE TypeFamilies #-}

main :: IO ()

kakkun61

#!/usr/bin/env bash

set -e

GCC_PATH=/usr/local/bin/gcc

usage() {
  echo "$(basename $0) [fsf/apple]" >&2
}

kakkun61

module Main where

import Prelude hiding (break)
import Control.Monad (when)
import Control.Monad.Cont (callCC, ContT, runContT)
import Control.Monad.IO.Class (liftIO)
import qualified Data.Foldable
import Data.IORef (newIORef, readIORef, writeIORef)
import qualified Data.Traversable

kakkun61

λ stack exec pacman -- -S -y mingw64/mingw-w64-x86_64-zlib
λ stack exec pacman -- -Ql mingw-w64-x86_64-zlib

kakkun61

#include<stdio.h>
#include<stdlib.h>

#define COMMAND_SIZE 256

int main(int argc, char **argv) {
    char *mysql_config="C:\\Strawberry\\perl\\bin\\perl.exe /tools/mysql/current/bin/mysql_config.pl";
    char command[COMMAND_SIZE];

    if (argc == 0) {

kakkun61

to write this later

kakkun61

using System;
using System.Collections.Generic;

class CounterHashSet<T>
{
    Dictionary<T, int> container;

    public CounterHashSet()
    {
        container = new Dictionary<T, int>();

kakkun61

~/"Library/Application Support/JetBrains/Toolbox/apps/IDEA-C/ch-0/$(ls ~/Library/Application\ Support/JetBrains/Toolbox/apps/IDEA-C/ch-0 | sort -r | head -1)/IntelliJ IDEA CE.app/Contents/MacOS/idea" diff "$1" "$2"

kakkun61

#define STRING_SIZE 50

#define SELECT_SAMPLE "SELECT col1, col2, col3, col4 \
                       FROM test_table"

MYSQL_STMT    *stmt;
MYSQL_BIND    bind[4];
MYSQL_RES     *prepare_meta_result;
MYSQL_TIME    ts;
unsigned long length[4];

kakkun61

#define STRING_SIZE 50

#define DROP_SAMPLE_TABLE "DROP TABLE IF EXISTS test_table"
#define CREATE_SAMPLE_TABLE "CREATE TABLE test_table(col1 INT,\
                                                 col2 VARCHAR(40),\
                                                 col3 SMALLINT,\
                                                 col4 TIMESTAMP)"
#define INSERT_SAMPLE "INSERT INTO \
                       test_table(col1,col2,col3) \
                       VALUES(?,?,?)"