Aethaeryn

Re, Re, Re, Gg, Gg, Gg, Gg^Efm, Gs^Fds, Gs, Gs, Gs, Gs, Re, Gs, Gs^Fds, Gs^Fds, Gs^Fds, Gs^Fds, Gg, Gll^Fp, Gll^Fp, Gll^Fp, Gll^Fp, Gs^Fds, Gll^Fp, Gs, Gs, Gd, Gd, Gd, Re, Re, Gd^Fds, Gd, Gd
Re, Re, Re, Gg, Gg, Gg, Gg^Efm, Gs^Fds, Gs, Gs, Re, Gs, Re, Gs, Gs^Fds, Gs^Fds, Gs^Fds, Gs^Fds, Gg, Gll^Fp, Gs^Fms, Gll^Fp, Gll^Fp, Gll^Fp, Gd^Fp, Gs, Gs, Gs, Gd, Gd, Re, Re, Re^Fds, Gd, Gd
Gg, Gg, Re, Gg, Gg, Gg, Gs^Fds, Gs^Fds, Re, Re, Ce, Re, Re, Gs, Gs^Fds, Gs^Fds, Gs^Fds, Gs^Efm, Gg^Efm, Gs^Fms, Gs^Fms, Gll^Fp, Gll^Fp, Gd^Fp, Gll^Fp, Gd^Fp, Gd^Fp, Gd, Gd, Re, Ce, Re^Fds, Ce, Gd, Gd
Gg, Gg, Gg, Gg, Gg, Gg, Gs^Fds, Re^Fds, Re, Ce, 3 Ke, Ce, Re, Gd^Fds, Gs^Fds, Gs^Fds, Gs^Fds, Gg^Ve, Gg^Efm, Gs^Fds, Gs^Fds, Gs^Fds, Gs^Uf, Gll^Fp, Gll^Fp, Gll^Fp, Gll^Fp, Gd^Fp, Re, Re, Ce, 4 Ke, Ce, Re^Fds, Gs^Fds
Gg, Gg, Gg, Re, Gg, Gg, Gs^Fds, Re^Fds, Re^Fds, Ce, Ce, Ce, Re^Fds, Re^Fds, Gs^Fds, Gs^Fds, Gs^Fds, Gs^Fds, Gg^Efm, Gs^Fms, Gs^Fms, Gs^Fms, Gs^Fds, Gll^Fp, Gs^Fds, Gs^Fms, Gd^Fp, Gd^Fp, Re, Re, Ce, Ce, Re^Fds, Gs, Gs
Gg, Gg, Gg

Aethaeryn

#include "/usr/include/SDL2/SDL.h"

int main()
{
  SDL_Window *window;
  SDL_Init(SDL_INIT_VIDEO);
  /* Play around with different x and y sizes. */
  window = SDL_CreateWindow("Test Window",
                            SDL_WINDOWPOS_CENTERED,
                            SDL_WINDOWPOS_CENTERED,

Aethaeryn

$ ed foo.txt
foo.txt: No such file or directory
a
foo
.
s/foo/bar
bar
wq
4
$ cat foo.txt

Aethaeryn

;;; What's a better way to list things than a list? :-)

;; Not an exhaustive list.
(defparameter *protocols*
  '("dns"
    "http"
    "ftp"
    "ipv4"
    "ipv6"
    "pop"

Aethaeryn

(defun growth (start-amount end-time percent)
  (let ((multiplier (* 0.01 percent)))
    (do ((time 0 (1+ time))
         (amount start-amount (+ amount (* amount multiplier))))
        ((= time end-time) amount))))

Aethaeryn

/* This is generated from the Python file below. */

CREATE TABLE users (
	id INTEGER NOT NULL, 
	username VARCHAR, 
	joined DATETIME, 
	email VARCHAR, 
	PRIMARY KEY (id), 
	UNIQUE (username)
)

Aethaeryn

A family tree of major Lisps. (Work in progress.)

--------------------------------------------------------------------------------------------
                                            LISP
--------------------------------------------------------------------------------------------
            MACLISP           |  InterLisp   ||                                ||
-------------------------     |              ||                                ||
  Emacs  | Lisp Machine | ... |     ...      ||             Scheme             ||
         |-----------------------------------||                                ||
         |           Common Lisp             ||                                ||

Aethaeryn

This is function from the MIT SICP videos on YouTube:

  (define (map p l) (if (null? l) '() (cons (p (car l)) (map p (cdr l)))))

This is a tree version of the quoted S-expression, keeping in mind
that lists are really just cons pairs:

  Key: * is a cons pair, ---- is its cdr, | is its car.

  *------------*----------------------*-------------------------------------------------------------------------'()

Aethaeryn

#!/usr/bin/env python

# This program is free software. It comes without any warranty, to
# the extent permitted by applicable law. You can redistribute it
# and/or modify it under the terms of the Do What The Fuck You Want
# To Public License, Version 2, as published by Sam Hocevar. See
# http://sam.zoy.org/wtfpl/COPYING for more details.

# Note: The numbers provided are only approximations, and the
# percentages aren't entirely accurate because something could be

Aethaeryn

# The rule is simple, print the numbers 1 to 100. Replace multiples of
# 3 with "Fizz", multiples of 5 with "Buzz", and multiples of both 3
# and 5 with "FizzBuzz".

# This is a simple and clear way to write it in Python.
def simple():
    for i in range(1, 101):
        if i % 3 == 0 and i % 5 == 0:
            print "FizzBuzz"