This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- disable referential integrity | |
EXEC sp_MSForEachTable 'ALTER TABLE ? NOCHECK CONSTRAINT ALL' | |
GO | |
EXEC sp_MSForEachTable 'TRUNCATE TABLE ?' | |
GO | |
-- enable referential integrity again | |
EXEC sp_MSForEachTable 'ALTER TABLE ? CHECK CONSTRAINT ALL' | |
GO |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
open Microsoft.FSharp.Compiler.CodeDom | |
open System.Reflection | |
open System.CodeDom.Compiler | |
type EvalResult<'a> = | |
| CompileError of CompilerError seq | |
| RuntimeError of exn | |
| Success of 'a | |
let eval args expr = |