kgadek

-- ---------------------------------------------------------------------------------------------------------------------
-- MOCK INTERFEJSU DOSTĘPNEGO NA APPCE
-- ---------------------------------------------------------------------------------------------------------------------
os = require "os"
local android = {}
function android.send(self, x)
    print("ANDROID:SEND:", x)
end
function android.sleep(self, t)
    print("ANDROID:SLEEP:", t)

kgadek

-- =====================================================================================================================
-- MOCK INTERFEJSU DOSTĘPNEGO NA APPCE
-- Dzięki temu można "ot tak" wrzucić kod w interpreter i będzie działać
-- ---------------------------------------------------------------------------------------------------------------------
local android = {}
function android.send(self, x)
    print("ANDROID:SEND:", x)
end
function android.sleep(self, t)
    print("ANDROID:SLEEP:", t)

kgadek

#!/usr/bin/env python
# -*- coding: utf-8 -*-

import re
import lxml
import lxml.html
from itertools import count


def clipboard_to_cells():

kgadek

#!/usr/bin/env python
# coding=utf-8
import os
from bs4 import BeautifulSoup
import requests
import time
import itertools


url = ("http://www.eventim.pl/Bilety-sonisphere-warszawa.html?affiliate=LNP&fun=evdetail"

kgadek

from contextlib import contextmanager
from functools import wraps
from inspect import signature
from itertools import chain


class TypoDynoMismatch(Exception):
    pass

kgadek

[1 of 1] Compiling Main             ( bench.hs, bench.o )

==================== Tidy Core ====================
Result size of Tidy Core = {terms: 85, types: 57, coercions: 30}

lvl_r2PK :: Type.Integer

lvl_r2PK = __integer 0

main11 :: Type.Integer

kgadek

{-# LANGUAGE ExistentialQuantification #-}


data Point = Point { x :: Int, y :: Int } deriving (Show)
data Rect = Rect { a :: Point, b :: Point, c :: Point, d :: Point } deriving (Show)


data Lens s a = Lens { get :: s -> a, set :: s -> a -> s}

kgadek

{-# LANGUAGE RankNTypes #-}
import Data.Functor.Identity
import Control.Applicative

data Point = Point { _x :: Int, _y :: Int } deriving (Show)
data Rect = Rect { _a :: Point, _b :: Point, _c :: Point, _d :: Point} deriving (Show)



type Lens s a = forall f. Functor f => (a -> f a) -> s -> f s

kgadek

-module(example).

-export(sort/1).
-export(spawnedsort/3, merge/3).        % publishing internal funs
                                        % only for debugging


sort(X) ->
  ChunkLen = length(X) div 2,
  {L1, L2} = lists:split(ChunkLen, X),  % pattern matching example 1

kgadek

#!/usr/bin/env python

class CQ(object):
    bla = None

    """CQ Instance Object"""
    def __init__(self, port, path, init):
        self.port = port
        self.path = path
        self.init = init