added scraps from { pike prolog racket retro tcl unix }