jartur

// Tested with Opera only!
//
// ==UserScript==
// @name          reddit sfw
// @description   Removes reddits from /r/nsfw & with [NSFW] tag in title
// @include       http://www.reddit.com/*
// ==/UserScript==

var items = document.getElementsByClassName("thing");
for (i=0; i < items.length; i++)

jartur

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

/* Define a constant */
#define NUMBER 110771

int ctoi(char c)
{
    return (int)c - 48;

jartur

(define-syntax (lexer-src-pos-kw s)
    (define (char->ci-pattern c)
      (list ':or (char-downcase c) (char-upcase c)))
    
    (define (string->ci-pattern s)
      (if (symbol? s)
          (string->ci-pattern (symbol->string s))
          (cons ':: (map char->ci-pattern (string->list s)))))
    
    (define (token-name s)

jartur

pipeline.addLast("encoder", new OneToOneEncoder() {
            @Override
            protected Object encode(ChannelHandlerContext channelHandlerContext, Channel channel, Object o) throws Exception
            {
                Server.getStatisticator().increaseResponses();
                Response response = (Response) o;

                byte[] bytes = response.getXML().getBytes();

                if (Server.isUseEncoder())

jartur

-module(geometry).
-export([startN/1]).

ringAgent(Next) ->                 
    receive
        {next, N} when Next =:= undefined ->
            ringAgent(N);
        kill -> Next ! kill;       
        M ->
            io:format("~p received ~p~n", [self(), M]),

jartur

#include "erl_nif.h"
// aes.h & aes_core.c & couple of other files are from openssl
#include "aes.h"
#include <memory.h>
#include <string.h>

static ERL_NIF_TERM aes_ecb_encrypt(ErlNifEnv* env, int argc, const ERL_NIF_TERM argv[])
{
  ErlNifBinary in, out, key;
  unsigned char* to_encode;

jartur

import java.io.BufferedReader;
import java.io.InputStreamReader;
import java.io.PrintWriter;
import java.net.Socket;

public class Client {
    public static void main(String[] argv)
    {
        PrintWriter out;
        BufferedReader in;

jartur

public class Wewe {
    interface A {
        int run(int x);
    }

    interface B {
        int run(String x);
    }

    private void overloaded(A a)

jartur

module Main where

import System.IO
import qualified Data.Map as M

main = do
	inh <- openFile "text.txt" ReadMode
	outh <- openFile "dict.txt" WriteMode
	counts <- mainLoop inh M.empty
	let excsPairs = M.assocs counts

jartur

module Main where

import System.IO
import qualified Data.Map as M
import qualified Data.Text.Lazy as T
import qualified Data.Text.Lazy.IO as T
import Data.List (foldl')
-- maybe Data.Text.Lazy  maybe ByteString
(+++) = T.append