garretraziel

(require 'package)
(let* ((no-ssl (and (memq system-type '(windows-nt ms-dos))
                    (not (gnutls-available-p))))
       (proto (if no-ssl "http" "https")))
  (add-to-list 'package-archives (cons "melpa" (concat proto "://melpa.org/packages/")) t))

;; Added by Package.el.  This must come before configurations of
;; installed packages.  Don't delete this line.  If you don't want it,
;; just comment it out by adding a semicolon to the start of the line.
;; You may delete these explanatory comments.

garretraziel

import Leap
import pyatspi

debounce = False
WIDTH = 1366
HEIGHT = 768

class MouseListener(Leap.Listener):
    def on_frame(self, controller):
        global debounce

garretraziel

#include <stdio.h>
#include <stdlib.h>
#include <limits.h>
#include <SDL/SDL.h>
#include <SDL/SDL_gfxPrimitives.h>

#define WIDTH 800
#define HEIGHT 600
#define RED 0xff0000ff
#define BMP_TYPE 19778

garretraziel

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

import sys, codecs

dictableSmall = list(u"ěščřžýáíéúůóťďň")
nedictableSmall = list("escrzyaieuuotdn")

dictableBig = list(u"ĚŠČŘŽÝÁÍÉÚŮŤĎŇ")
nedictableBig = list("ESCRZYAIEUUTDN")

garretraziel

#! /usr/bin/env python

import sys, string

def analyze_log(path):
    logfile = open(path,"r")
    cont = logfile.readlines()
    logfile.close()
    cont = parse_log(cont)
    toinstall = {}

garretraziel

#! /usr/bin/gst -f

Object subclass: Zamestnanci[
|seznam|
  init [
    seznam := OrderedCollection new.
  ]
  pridej: zamestnanec [
    seznam add: zamestnanec.
    Transcript cr;cr.

garretraziel

#! /usr/bin/gst -f

Object subclass: Automat [
	oddelejMezery: soubor uloz: soubor2[
		|vstup vystup retezec|
		vystup:=FileStream open: soubor2 mode: FileStream write.
		vstup:=FileStream open: soubor mode: FileStream read.
		[ vstup atEnd ] whileFalse: [
			retezec := vstup upTo: Character space.
			vystup nextPutAll: retezec.