SCM Repository
[smlnj] / sml / trunk / src / MLRISC / instructions / mlriscAnnotations.sml |
Diff of /sml/trunk/src/MLRISC/instructions/mlriscAnnotations.sml
Parent Directory
|
Revision Log
|
Patch
revision 1109, Fri Mar 1 13:56:06 2002 UTC | revision 1110, Fri Mar 1 14:07:58 2002 UTC | |
---|---|---|
# | Line 1 | Line 1 |
1 | (* | (* mlriscAnnotations.sml |
2 | * | |
3 | * COPYRIGHT (c) 2002 Bell Labs, Lucent Technologies | |
4 | * | |
5 | * These are some basic annotations understood by the MLRISC system | * These are some basic annotations understood by the MLRISC system |
6 | * | * |
7 | * -- Allen | * -- Allen |
# | Line 11 | Line 14 |
14 | ||
15 | (* the branch probability of conditional branches *) | (* the branch probability of conditional branches *) |
16 | (* in percentage *) | (* in percentage *) |
17 | exception BRANCHPROB of int | exception BRANCHPROB of Probability.prob |
18 | val BRANCH_PROB = A.new'{create=BRANCHPROB, | val BRANCH_PROB = A.new'{create=BRANCHPROB, |
19 | get=fn BRANCHPROB b => b | e => raise e, | get=fn BRANCHPROB b => b | e => raise e, |
20 | toString=fn b => "branch("^Int.toString b^"%)"} | toString=fn p => "branch("^Probability.toString p^")"} |
21 | ||
22 | (* the execution frequency of a basic block *) | (* the execution frequency of a basic block *) |
23 | exception EXECUTIONFREQ of int | exception EXECUTIONFREQ of int |
|
root@smlnj-gforge.cs.uchicago.edu | ViewVC Help |
Powered by ViewVC 1.0.0 |