Skip to content

Commit 01c7ea5

Browse files
committed
wrong order
1 parent aa64476 commit 01c7ea5

File tree

1 file changed

+4
-3
lines changed

1 file changed

+4
-3
lines changed

r2-typeinference.ss

Lines changed: 4 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,11 @@
11
#lang racket
22

33

4-
;; ----- main code -----
4+
;; ----- data structures -----
5+
(struct Closure (fun env))
6+
57

8+
;; ----- main code -----
69
(define r2i
710
(lambda (exp)
811
(infer exp env0)))
@@ -70,8 +73,6 @@
7073

7174

7275
;; ----- environment -----
73-
(struct Closure (fun env))
74-
7576
(define env0 '())
7677

7778
(define ext-env

0 commit comments

Comments
 (0)