cpressey

(define reduce
  (lambda (subject complete-rules rules generation-id)
    (if (null? rules)
      subject
      (let* ((rule-pair     (car rules))
             (rest-of-rules (cdr rules))
             (pattern       (car rule-pair))
             (replacements  (cdr rule-pair))
             (new-gen-id    (+ generation-id 1))
             (new-subject   (apply-rule subject pattern replacements generation-id)))

cpressey

NOTE: this document is out of date. See the Wagon distribution for the latest version of this document.

Wagon

In a conventional concatenative language, every symbol represents a function which takes program states to program states, and the program is a concatenation (sequential composition) of such functions. This is fine when it comes to manipulating state, but what about control?

cpressey

-- implementation of https://esolangs.org/wiki/An_Odd_Rewriting_System
-- I, Chris Pressey, hereby place this source code into the public domain.

import Data.Char

-- A program in An Odd Rewriting System consists an alphabet of symbols,
-- each of which belongs to one of two categories (an odd symbol or an even symbol),
-- except for a special halt symbol that appears in neither category;
-- two definitions for each symbol (an odd definition and an even definition);
-- and an initial string.  Both the initial string, and each definition, is simply a

cpressey

#
# "The Defeat at Procyon V"
# Chris Pressey, Cat's Eye Technologies
# for NaNoGenMo 2018
#


#
# General Utility
#

cpressey

This code has moved to git.catseye.tc/HTML5-Gewgaws.

cpressey

This document has moved to The Dossier:

Text Adventures of Note

cpressey

This document has moved to the MARYSUE repository:

Overview of a Story Compiler

cpressey

#!/usr/bin/env python

# the contents of this file are in the public domain

import os
import random
import sys

def main(args):
    filename = args[0]

cpressey

# prelude
a = """# prelude"""
b = """# remainder
print a
print 'a = ""' + '"' + a + '""' + '"'
print 'b = ""' + '"' + b + '""' + '"'
print b
"""
# remainder
print a

cpressey

BUT HENCE ----- you'll need
++++ you'll say -----
---- SO HENCE they'll have
+++++ --- +
--- i'll have +
AND THEN +++ ++++
----- ++ ----
- BUT NOW AND NOW
++ - --
++ ---- SO NOW