sanxiyn

#include <assert.h>
#include <stdarg.h>
#include <stdbool.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>

enum type {
    NIL,

daGrevis

def fibonacci(n):

    result = []
    x, y = 0, 1

    while x < n:
    
        result.append(x)

        x, y = y, y + x

nikcub

In August 2007 a hacker found a way to expose the PHP source code on facebook.com. He retrieved two files and then emailed them to me, and I wrote about the issue:

http://techcrunch.com/2007/08/11/facebook-source-code-leaked/

It became a big deal:

http://www.techmeme.com/070812/p1#a070812p1

The two files are index.php (the homepage) and search.php (the search page)

franks42

(ns cljs-uuidv4
  "Generator for a v4/random UUID that works with cljs.core/UUID"
  (:require [goog.string.StringBuffer]))


(defn UUIDv4
  "Returns a new randomly generated (version 4) cljs.core/UUID,
  like: xxxxxxxx-xxxx-4xxx-yxxx-xxxxxxxxxxxx
  as per http://www.ietf.org/rfc/rfc4122.txt.
  Usage:

nodesocket

/* Flatten das boostrap */
.well, .navbar-inner, .popover, .btn, .tooltip, input, select, textarea, pre, .progress, .modal, .add-on, .alert, .table-bordered, .nav>.active>a, .dropdown-menu, .tooltip-inner, .badge, .label, .img-polaroid {
 	-moz-box-shadow: none !important;
	-webkit-box-shadow: none !important;
	box-shadow: none !important;
	-webkit-border-radius: 0px !important;
	-moz-border-radius: 0px !important;
	border-radius: 0px !important;
	border-collapse: collapse !important;
	background-image: none !important;

rvikmanis

(defmacro makexml [code]
    (import [hy.models.expression [HyExpression]]
            [hy.models.dict [HyDict]])
    (defn dict-to-attrs [d]
        (setv keys (slice d 0 (len d) 2))
        (setv vals (slice d 1 (len d) 2))
        (.join " " (list-comp
            (kwapply
                (.format "{name}=\"{value}\"")
                {"name" i "value" (get vals (.index keys i))})

aseemk

CoffeeScript 1.7 is shaping up to be a pretty kick-ass release with significant improvements. Here are the ones I'm most excited about, in order of my own excitement.

Parentheses-free chaining

jashkenas/coffeescript#3263

Years of being wished for, finally granted!

lelandbatey

Description

This simple script will take a picture of a whiteboard and use parts of the ImageMagick library with sane defaults to clean it up tremendously.

The script is here:

#!/bin/bash
convert "$1" -morphology Convolve DoG:15,100,0 -negate -normalize -blur 0x1 -channel RBG -level 60%,91%,0.1 "$2"

Results

rwaldron

/*!
 * jQuery JavaScript Library v2.1.1pre
 * http://jquery.com/
 *
 * Includes Sizzle.js
 * http://sizzlejs.com/
 *
 * Copyright 2005, 2014 jQuery Foundation, Inc. and other contributors
 * Released under the MIT license
 * http://jquery.org/license

daGrevis

(defn pivot-and-rest [coll]
  (let [splitted (split-at (quot (count coll) 2) coll)
        second-part (second splitted)]
    [(first second-part) (concat (first splitted) (rest second-part))]))

(defn quicksort [coll]
  (cond
    (empty? coll) []
    (= (count coll) 1) coll
    :else (let [[p xs] (pivot-and-rest coll)