diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/ortho/llvm/ortho_code_main.adb | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/src/ortho/llvm/ortho_code_main.adb b/src/ortho/llvm/ortho_code_main.adb index b84dfbbd2..5558a8bbe 100644 --- a/src/ortho/llvm/ortho_code_main.adb +++ b/src/ortho/llvm/ortho_code_main.adb @@ -287,11 +287,13 @@ begin end if; -- Verify module. - if LLVM.Analysis.VerifyModule - (Module, LLVM.Analysis.PrintMessageAction, Msg'Access) /= 0 - then - DisposeMessage (Msg); - raise Program_Error; + if False then + if LLVM.Analysis.VerifyModule + (Module, LLVM.Analysis.PrintMessageAction, Msg'Access) /= 0 + then + DisposeMessage (Msg); + raise Program_Error; + end if; end if; if Optimization > CodeGenLevelNone then |