Make sure DEbugger.Break is not called in release builds1.0.338

2 files changed, 5 insertions, 1 deletions

diff --git a/IronScheme/IronScheme/Runtime/Control.cs b/IronScheme/IronScheme/Runtime/Control.cs
index df873491..c2ce6ef5 100644
--- a/IronScheme/IronScheme/Runtime/Control.cs
+++ b/IronScheme/IronScheme/Runtime/Control.cs
@@ -35,8 +35,10 @@ namespace IronScheme.Runtime
       if (args.Length > 1)

       {

         Expression arg = Ast.ConvertHelper(args[args.Length - 1], typeof(object));

-        

+

+#if DEBUG

         if (arg.IsConstant(null)) Debugger.Break();

+#endif

 

         for (int i = args.Length - 2; i > 0; i--)

         {

diff --git a/IronScheme/Microsoft.Scripting/Ast/CodeBlock.cs b/IronScheme/Microsoft.Scripting/Ast/CodeBlock.cs
index 90cc7be1..8b956248 100644
--- a/IronScheme/Microsoft.Scripting/Ast/CodeBlock.cs
+++ b/IronScheme/Microsoft.Scripting/Ast/CodeBlock.cs
@@ -507,7 +507,9 @@ namespace Microsoft.Scripting.Ast {
             foreach (VariableReference r in References) {
               if (r.Variable.Block == null)
               {
+#if DEBUG
                 Debugger.Break();
+#endif
               }
                 r.CreateSlot(cg);
                 Debug.Assert(r.Slot != null);