Skip to content
Newer
Older
100644 26 lines (19 sloc) 934 Bytes
88694da [clean] bypassHoisting: simplifying it a lot
Valentin Gatien-Baron authored Jun 17, 2011
1 (*
2 Copyright © 2011 MLstate
3
4 This file is part of OPA.
5
6 OPA is free software: you can redistribute it and/or modify it under the
7 terms of the GNU Affero General Public License, version 3, as published by
8 the Free Software Foundation.
9
10 OPA is distributed in the hope that it will be useful, but WITHOUT ANY
11 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
12 FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for
13 more details.
14
15 You should have received a copy of the GNU Affero General Public License
16 along with OPA. If not, see <http://www.gnu.org/licenses/>.
17 *)
18
19 (**
20 This pass guarantees that bypasses are always applied
21 (by eta expanding bypasses that are not applied)
22 (this is needed by the closure passes (at least on the server))
23 *)
24
25 val process_code : QmlTypes.gamma -> QmlAst.annotmap -> QmlAst.code -> QmlAst.annotmap * QmlAst.code
Something went wrong with that request. Please try again.