Needed for Outlaw notes.

Author: dvanhorn

langs/outlaw/a.rkt

@@ -0,0 +1,8 @@
+#lang racket
+(provide a)
+(require "b.rkt")
+
+(define (a x)
+  (+ (b x) (b x)))
+
+(a 10)

langs/outlaw/b.rkt

@@ -0,0 +1,6 @@
+#lang racket
+(provide b)
+(require "c.rkt")
+
+(define (b x)
+  (add1 (c x)))

langs/outlaw/c.rkt

@@ -0,0 +1,4 @@
+#lang racket
+(provide c)
+(define (c x)
+  (+ x 5))

langs/outlaw/combine.rkt

@@ -38,7 +38,7 @@
   (match fs
     ['() (void)]
     [(cons f fs)
-     (displayln (make-string 72 #\;))
+     (displayln (make-string 12 #\;))
      (displayln (string-append ";; " f "\n"))
      (print-file f)
      (print-files fs)]))