ryukzak

#define led_conduction 0xFF
#define dip_state 0
#define init_led_state 1
#define led_state 2
#define rev_led_state 3

char din, dip, state;
while (dip = read_dip()){
  switch (state){
    case dip_state:

ryukzak

module Cmd where

import Data.Word
import qualified Data.ByteString as B
import Data.Array
import Data.Bits
import Debug.Trace
import Data.List

data State = State { pmem       :: B.ByteString

ryukzak

module Main where

import qualified Data.ByteString as B
import Cmd
import System.Environment   
import Data.Array

newState = State { pmem = B.empty
                 , dmem = array (0, 255) $ take 256 $ zip [0,1..] [0,0..]
                 , pc   = 0x00

ryukzak

class Foo(val bar:Bar) {
  def this() = this(new Bar)
}

ryukzak

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

struct List {
  struct List *next;
  int value;
};

ryukzak

test

ryukzak

{ "keys": ["alt+j"], "command": "do_after_mark", "args": {"command": "copy"}, "context": [{ "key": "setting.with_marker" }] },
{ "keys": ["alt+h"], "command": "move", "args": {"by": "characters", "forward": false, "extend": true}, "context": [{ "key": "setting.with_marker" }] }

ryukzak

import sublime, sublime_plugin

class ClearMarkCommand(sublime_plugin.TextCommand):
    def run(self, edit):
        self.view.run_command("clear_bookmarks", {"name": "mark"})
        self.view.settings().set('with_marker', False)

class DoAfterMarkCommand(sublime_plugin.TextCommand):
    def run(self, edit, command, args = {}):
        self.view.run_command("clear_mark")

ryukzak

Erlang

=============== Заглавие ==========

О чём будет данная лекция.

- описание области, о которой пойдёт речь.

- описание стилистики изложения (сравнение с традиционными
  методами).

ryukzak

data Code = Add | Div

class Compiler a where
    compile :: Code -> (String, String) -> String

instance Compiler Float where
    compile Add (a, b) = show (Unsafe.read a + Unsafe.read b :: Float)
    compile Div (a, b) = show (Unsafe.read a / Unsafe.read b :: Float)

instance Compiler Int where