diff --git a/tools/gccas/gccas.cpp b/tools/gccas/gccas.cpp
index 2cd408a..8388c9b 100644
--- a/tools/gccas/gccas.cpp
+++ b/tools/gccas/gccas.cpp
@@ -58,7 +58,8 @@
     addPass(PM, createFunctionInliningPass());   // Inline small functions
 
   addPass(PM, createInstructionCombiningPass()); // Cleanup code for raise
-  addPass(PM, createRaisePointerReferencesPass());// Recover type information
+  // FIXME: levelraise pass disabled until it can be rewritten at a later date.
+  //addPass(PM, createRaisePointerReferencesPass());// Recover type information
   addPass(PM, createTailDuplicationPass());      // Simplify cfg by copying code
   addPass(PM, createCFGSimplificationPass());    // Merge & remove BBs
   addPass(PM, createScalarReplAggregatesPass()); // Break up aggregate allocas