moved the parsers into a parser subdirectory

bootstrapped-primitives.rkt

@@ -4,7 +4,6 @@
          "il-structs.rkt"
          "compiler.rkt"
          "compiler-structs.rkt"
-         "parser/typed-parse.rkt"
          "where-is-collects.rkt")
 
 (require/typed "parameters.rkt"
@@ -12,6 +11,9 @@
 (require/typed "parser/parse-bytecode.rkt"
                (parse-bytecode (Path -> Expression)))
 
+(require/typed "parser/baby-parser.rkt"
+               [parse (Any -> Expression)])
+
 
 
 (provide get-bootstrapping-code)

parser/baby-parser.rkt

@@ -5,7 +5,7 @@
          "../lexical-structs.rkt"
          "../helpers.rkt"
          "../parameters.rkt"
-         "../lam-entry-gensym.rkt"
+         "lam-entry-gensym.rkt"
          racket/list)
 
 (provide (rename-out (-parse parse)))

parser/parse-bytecode-5.1.1.rkt

@@ -1,19 +1,16 @@
 #lang racket/base
 
-(require "../expression-structs.rkt"
+;; Parsing Racket 5.1.1 bytecode structures into our own structures.
+(require "typed-module-path.rkt"
+         "lam-entry-gensym.rkt"
+         "../expression-structs.rkt"
          "../lexical-structs.rkt"
-         "../typed-module-path.rkt"
          "../path-rewriter.rkt"
          "../parameters.rkt"
-         "../lam-entry-gensym.rkt"
          "../get-module-bytecode.rkt"
+         syntax/modresolve
+         compiler/zo-parse
          racket/path
-         syntax/modresolve)
-
-
-;; Parsing Racket 5.1.1 bytecode structures into our own structures.
-
-(require compiler/zo-parse
          racket/match
          racket/list)
 

parser/typed-parse.rkt

@@ -1,7 +0,0 @@
-#lang typed/racket/base
-(require "../expression-structs.rkt")
-
-(require/typed "parse.rkt"
-               [parse (Any -> Expression)])
-
-(provide parse)

tests/test-parse.rkt

@@ -1,6 +1,6 @@
 #lang racket/base
 
-(require "../parser/parse.rkt"
+(require "../parser/baby-parser.rkt"
          "../lexical-structs.rkt"
          "../expression-structs.rkt"
          "../lam-entry-gensym.rkt"