From dd886be184867f7ee404bd3aa7b2f45480702186 Mon Sep 17 00:00:00 2001 From: Don Syme Date: Fri, 10 Apr 2015 14:03:02 +0200 Subject: [PATCH] update to fix build --- src/fsharp/Optimizer.fs | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/src/fsharp/Optimizer.fs b/src/fsharp/Optimizer.fs index 5c5d53e5533..4b5d4b3363c 100644 --- a/src/fsharp/Optimizer.fs +++ b/src/fsharp/Optimizer.fs @@ -498,6 +498,8 @@ let BindCcu (ccu:Tast.CcuThunk) mval env (g:TcGlobals) = #if DEBUG if verboseOptimizationInfo then dprintf "*** Reloading optimization data for assembly %s, info = \n%s\n" ccu.AssemblyName (showL (Layout.squashTo 192 (moduleInfoL g mval))); +#else + ignore g #endif { env with globalModuleInfos=env.globalModuleInfos.Add(ccu.AssemblyName,mval) } @@ -1204,6 +1206,8 @@ let AbstractAndRemapModulInfo msg g m (repackage,hidden) info = let mrpi = mkRepackageRemapping repackage #if DEBUG if verboseOptimizationInfo then dprintf "%s - %a - Optimization data prior to trim: \n%s\n" msg outputRange m (Layout.showL (Layout.squashTo 192 (moduleInfoL g info))); +#else + ignore (msg,m) #endif let info = info |> AbstractLazyModulInfoByHiding false hidden #if DEBUG