anchor.diff:      | SigSimple(TDSREnum ecs) ->
           typeName +> sepEq 
           +> indent +> sepNln
  -        +> col sepNln ecs (genEnumCase astContext true)
  +        +> col sepNln ecs (genEnumCase { astContext with HasVerticalBar = true })
           +> colPre sepNln sepNln ms (genMemberSig astContext)
           // Add newline after un-indent to be spacing-correct
           +> unindent
  
positive.code:       IsCStylePattern: bool
        /// Range operators are naked in 'for..in..do' constructs
        IsNakedRange: bool
      }
      static member Default =
          { IsFirstChild = false; IsInterface = false 
            IsCStylePattern = false; IsNakedRange = false }
  
  let rec addSpaceBeforeParensInFunCall functionOrMethod arg = 
      match functionOrMethod, arg with
  
negative.code:         let param = opt sepNone (Option.map fst eio) (genExpr astContext)
          sepOpenS +> 
          atCurrentColumn (!- "new " +> genType astContext false t +> param -- " with" 
              +> indent +> sepNln +> genMemberBindingList { astContext with IsInterface = true } bd +> unindent
              +> colPre sepNln sepNln ims (genInterfaceImpl astContext)) +> sepCloseS
  
      | While(e1, e2) -> 
  