@@ -91,19 +91,13 @@ module internal MSBuildResolver =
91
91
let private Net40 = " v4.0"
92
92
[<Literal>]
93
93
let private Net45 = " v4.5"
94
- #if BUILDING_ PROTO
95
- #else
96
94
[<Literal>]
97
95
let private Net451 = " v4.5.1"
98
- #endif
99
96
100
- #if BUILDING_ PROTO
101
- let SupportedNetFrameworkVersions = set [ Net20; Net30; Net35; Net40; Net45; (* SL only*) " v5.0" ]
102
- #else
103
97
let SupportedNetFrameworkVersions = set [ Net20; Net30; Net35; Net40; Net45; Net451; (* SL only*) " v5.0" ]
104
- #endif
105
- let GetPathToDotNetFramework ( v ) =
98
+
106
99
#if FX_ ATLEAST_ 45
100
+ let GetPathToDotNetFramework ( v ) =
107
101
let v =
108
102
match v with
109
103
| Net11 -> Some TargetDotNetFrameworkVersion.Version11
@@ -112,10 +106,7 @@ module internal MSBuildResolver =
112
106
| Net35 -> Some TargetDotNetFrameworkVersion.Version35
113
107
| Net40 -> Some TargetDotNetFrameworkVersion.Version40
114
108
| Net45 -> Some TargetDotNetFrameworkVersion.Version45
115
- #if BUILDING_ PROTO
116
- #else
117
109
| Net451 -> Some TargetDotNetFrameworkVersion.Version451
118
- #endif
119
110
| _ -> assert false ; None
120
111
match v with
121
112
| Some v ->
@@ -124,21 +115,19 @@ module internal MSBuildResolver =
124
115
| x -> [ x]
125
116
| _ -> []
126
117
#else
118
+ let GetPathToDotNetFramework ( _ ) =
127
119
// FX_ATLEAST_45 is not defined for step when we build compiler with proto compiler.
128
120
[]
129
121
#endif
130
122
131
- let DeriveTargetFrameworkDirectoriesFor40Plus ( version ) =
132
123
#if FX_ ATLEAST_ 45
124
+ let DeriveTargetFrameworkDirectoriesFor40Plus ( version ) =
133
125
// starting with .Net 4.0, the runtime dirs (WindowsFramework) are never used by MSBuild RAR
134
126
let v =
135
127
match version with
136
128
| Net40 -> Some TargetDotNetFrameworkVersion.Version40
137
129
| Net45 -> Some TargetDotNetFrameworkVersion.Version45
138
- #if BUILDING_ PROTO
139
- #else
140
130
| Net451 -> Some TargetDotNetFrameworkVersion.Version451
141
- #endif
142
131
| _ -> assert false ; None // unknown version - some parts in the code are not synced
143
132
match v with
144
133
| Some v ->
@@ -147,21 +136,18 @@ module internal MSBuildResolver =
147
136
| x -> [ x]
148
137
| None -> []
149
138
#else
139
+ let DeriveTargetFrameworkDirectoriesFor40Plus ( _ ) =
150
140
// FX_ATLEAST_45 is not defined for step when we build compiler with proto compiler.
151
141
[]
152
142
#endif
153
143
154
144
/// Determine the default "frameworkVersion" (which is passed into MSBuild resolve).
155
145
/// This code uses MSBuild to determine version of the highest installed framework.
156
146
let HighestInstalledNetFrameworkVersionMajorMinor () =
157
- #if FX_ ATLEAST_ 45
158
- #if BUILDING_ PROTO
159
- #else
160
- if box ( ToolLocationHelper.GetPathToDotNetFramework( TargetDotNetFrameworkVersion.Version451)) <> null then 4 , Net451
161
- else
162
- #endif
163
- if box ( ToolLocationHelper.GetPathToDotNetFramework( TargetDotNetFrameworkVersion.Version45)) <> null then 4 , Net45
164
- else 4 , Net40 // version is 4.0 assumed since this code is running.
147
+ #if FX_ ATLEAST_ 45
148
+ if box ( ToolLocationHelper.GetPathToDotNetFramework( TargetDotNetFrameworkVersion.Version451)) <> null then 4 , Net451
149
+ elif box ( ToolLocationHelper.GetPathToDotNetFramework( TargetDotNetFrameworkVersion.Version45)) <> null then 4 , Net45
150
+ else 4 , Net40 // version is 4.0 assumed since this code is running.
165
151
#else
166
152
// FX_ATLEAST_45 is not defined is required for step when we build compiler with proto compiler and this branch should not be hit
167
153
4 , Net40
0 commit comments