From 442dc8755b4ac8d8fb4e31906f12ce98ff4858ac Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Tue, 3 May 2016 21:42:05 -0700 Subject: [PATCH] ragg changes --- beautiful-racket-ragg/br/ragg.rkt | 5 +++++ beautiful-racket-ragg/br/ragg/codegen/{lang => }/reader.rkt | 0 beautiful-racket-ragg/br/ragg/codegen/sexp-based-lang.rkt | 3 ++- beautiful-racket-ragg/br/ragg/lang/reader.rkt | 4 ---- 4 files changed, 7 insertions(+), 5 deletions(-) create mode 100755 beautiful-racket-ragg/br/ragg.rkt rename beautiful-racket-ragg/br/ragg/codegen/{lang => }/reader.rkt (100%) delete mode 100755 beautiful-racket-ragg/br/ragg/lang/reader.rkt diff --git a/beautiful-racket-ragg/br/ragg.rkt b/beautiful-racket-ragg/br/ragg.rkt new file mode 100755 index 0000000..35db95a --- /dev/null +++ b/beautiful-racket-ragg/br/ragg.rkt @@ -0,0 +1,5 @@ +#lang racket/base + +(module+ reader + (require "ragg/codegen/reader.rkt") + (provide (all-from-out "ragg/codegen/reader.rkt"))) diff --git a/beautiful-racket-ragg/br/ragg/codegen/lang/reader.rkt b/beautiful-racket-ragg/br/ragg/codegen/reader.rkt similarity index 100% rename from beautiful-racket-ragg/br/ragg/codegen/lang/reader.rkt rename to beautiful-racket-ragg/br/ragg/codegen/reader.rkt diff --git a/beautiful-racket-ragg/br/ragg/codegen/sexp-based-lang.rkt b/beautiful-racket-ragg/br/ragg/codegen/sexp-based-lang.rkt index 80acdf7..3919bb7 100755 --- a/beautiful-racket-ragg/br/ragg/codegen/sexp-based-lang.rkt +++ b/beautiful-racket-ragg/br/ragg/codegen/sexp-based-lang.rkt @@ -87,7 +87,8 @@ "codegen.rkt")) (provide rules - (rename-out [#%plain-module-begin #%module-begin])) + (rename-out [#%plain-module-begin #%module-begin]) + #%top-interaction) (define-syntax (rules stx) (rules-codegen #:parser-provider-module 'br/ragg/cfg-parser/cfg-parser ;; 'parser-tools/yacc diff --git a/beautiful-racket-ragg/br/ragg/lang/reader.rkt b/beautiful-racket-ragg/br/ragg/lang/reader.rkt deleted file mode 100755 index 5a6c52e..0000000 --- a/beautiful-racket-ragg/br/ragg/lang/reader.rkt +++ /dev/null @@ -1,4 +0,0 @@ -#lang racket/base - -(require "../codegen/lang/reader.rkt") -(provide (all-from-out "../codegen/lang/reader.rkt"))