Skip to content

Commit 01192b1

Browse files
committed
temp CI fix
1 parent 7f93f2c commit 01192b1

File tree

3 files changed

+3
-3
lines changed

3 files changed

+3
-3
lines changed

src/Compiler/Checking/ConstraintSolver.fs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -337,7 +337,7 @@ type ConstraintSolverEnv =
337337

338338
member csenv.amap = csenv.SolverState.amap
339339

340-
override csenv.ToString() = "<ConstraintSolverEnv> @ " + csenv.m.ToString()
340+
override csenv.ToString() = "<ConstraintSolverEnv> @ " + nonNull (csenv.m.ToString())
341341

342342
let MakeConstraintSolverEnv contextInfo css m denv =
343343
{ SolverState = css

src/Compiler/Facilities/DiagnosticsLogger.fs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -88,7 +88,7 @@ exception DiagnosticWithText of number: int * message: string * range: range wit
8888
exception InternalError of message: string * range: range with
8989
override this.Message =
9090
match this :> exn with
91-
| InternalError(msg, m) -> msg + m.ToString()
91+
| InternalError(msg, m) -> msg + nonNull (m.ToString())
9292
| _ -> "impossible"
9393

9494
exception InternalException of exn: Exception * msg: string * range: range with

src/Compiler/TypedTree/TypedTree.fs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -5344,7 +5344,7 @@ type TOp =
53445344
| Label n -> "Label(" + string n + ")"
53455345
| TraitCall info -> "TraitCall(" + info.MemberLogicalName + ")"
53465346
| LValueOp (op, vref) -> sprintf "%+A(%s)" op vref.LogicalName
5347-
| ILCall (_,_,_,_,_,_,_,ilMethRef,_,_,_) -> "ILCall(" + ilMethRef.ToString() + ",..)"
5347+
| ILCall (_,_,_,_,_,_,_,ilMethRef,_,_,_) -> "ILCall(" + nonNull (ilMethRef.ToString()) + ",..)"
53485348

53495349
/// Represents the kind of record construction operation.
53505350
type RecordConstructionInfo =

0 commit comments

Comments
 (0)