16 lines
301 B
Racket
16 lines
301 B
Racket
#lang typed/racket/base
|
|
|
|
(provide (all-defined-out))
|
|
|
|
|
|
(require "il-structs.rkt")
|
|
|
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;; Assembly
|
|
|
|
(define-struct: BasicBlock ([name : Symbol]
|
|
[stmts : (Listof UnlabeledStatement)])
|
|
#:transparent)
|