1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
|
;Copyright (c) 2014 - 2016 The Regents of the University of
;California (Regents). All Rights Reserved. Redistribution and use in
;source and binary forms, with or without modification, are permitted
;provided that the following conditions are met:
; * Redistributions of source code must retain the above
; copyright notice, this list of conditions and the following
; two paragraphs of disclaimer.
; * Redistributions in binary form must reproduce the above
; copyright notice, this list of conditions and the following
; two paragraphs of disclaimer in the documentation and/or other materials
; provided with the distribution.
; * Neither the name of the Regents nor the names of its contributors
; may be used to endorse or promote products derived from this
; software without specific prior written permission.
;IN NO EVENT SHALL REGENTS BE LIABLE TO ANY PARTY FOR DIRECT, INDIRECT,
;SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES, INCLUDING LOST PROFITS,
;ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN IF
;REGENTS HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
;REGENTS SPECIFICALLY DISCLAIMS ANY WARRANTIES, INCLUDING, BUT NOT
;LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
;A PARTICULAR PURPOSE. THE SOFTWARE AND ACCOMPANYING DOCUMENTATION, IF
;ANY, PROVIDED HEREUNDER IS PROVIDED "AS IS". REGENTS HAS NO OBLIGATION
;TO PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR
;MODIFICATIONS.
#include<"core/stringeater.stanza">
#include<"core/macro-utils.stanza">
#include<"compiler/stz-algorithms.stanza">
#include<"compiler/stz-parser.stanza">
#include<"compiler/stz-lexer.stanza">
#include("firrtl-lexer.stanza")
#include("firrtl-ir.stanza")
#include("ir-utils.stanza")
#include("ir-parser.stanza")
#include("passes.stanza")
#include("primop.stanza")
#include("errors.stanza")
#include("symbolic-value.stanza")
defpackage firrtl-main :
import core
import verse
import firrtl/parser
import firrtl/passes
import firrtl/lexer
import stz/parser
import firrtl/ir-utils
defn main () :
val arg = commandline-arguments()
val args = split(arg,' ')
val lexed = lex-file(args[1])
val c = parse-firrtl(lexed)
;println(c)
run-passes(c,to-list(args[2]))
main()
|
