spratt

(defun ttt-repl (board)
  "Read-Eval-Print-Loop for Tic-Tac-Toe"
  (ttt-print board)
  (ttt-repl (ttt-eval (ttt-read board))))

spratt

(documentation 'ttt-repl 'function)

spratt

'(nil nil nil nil X nil nil nil O)

spratt

(defun ttt-print (board)
  "Prints a tic-tac-toe board."
  (let* ((nl (string #\Newline))
	 (str (concatenate 'string
			   "S|S|S" nl
			   "-|-|-" nl
			   "S|S|S" nl
			   "-|-|-" nl
			   "S|S|S" nl)))
    (format t str)))

spratt

(defun ttt-print (board)
  "Prints a tic-tac-toe board."
  (let* ((symbol nil)
	 (nl (string #\Newline))
	 (str (concatenate 'string
			   "S|S|S" nl
			   "-|-|-" nl
			   "S|S|S" nl
			   "-|-|-" nl
			   "S|S|S" nl)))

spratt

(defun ttt-print (board)
  "Pretty prints a given board."
  (format t "~%  1 2 3 <- cols~%~%")
  (format t "1 ~1<~@[~A~]~>|~1<~@[~A~]~>|~1<~@[~A~]~>~%  -+-+-~%"
	  (pop board) (pop board) (pop board))
  (format t "2 ~1<~@[~A~]~>|~1<~@[~A~]~>|~1<~@[~A~]~>~%  -+-+-~%"
	  (pop board) (pop board) (pop board))
  (format t "3 ~1<~@[~A~]~>|~1<~@[~A~]~>|~1<~@[~A~]~>~%"
	  (pop board) (pop board) (pop board))
  (format t "^~% \\_ rows~%"))

spratt

for(var i = 0; i < objects.length; i++) {
    build_element(objects[i]);
}

spratt

#!/usr/bin/env python2.7
import random
from sys import stdin

words = []
for line in stdin:
    words.append(line.strip())

print(random.sample(words,12))

spratt

#!/usr/bin/env python2.7                                                        
import random
from sys import stdin, argv

words = []
for line in stdin:
    words.append(line.strip())

n = int(argv[1])

spratt

    Aerospace film
    Biography
    Buddy Cop film
    Burlesque film
    Chick Flick
    Circus film
    Comedy film
        Black comedy
        Gross-out film
        Romantic comedy film