diff --git a/llvm/tools/gccas/gccas.cpp b/llvm/tools/gccas/gccas.cpp
index 0a50d9f..2cd408a 100644
--- a/llvm/tools/gccas/gccas.cpp
+++ b/llvm/tools/gccas/gccas.cpp
@@ -31,6 +31,9 @@
 
   cl::opt<bool>   
   Verify("verify", cl::desc("Verify each pass result"));
+
+  cl::opt<bool>
+  DisableInline("disable-inlining", cl::desc("Do not run the inliner pass"));
 }
 
 
@@ -50,7 +53,9 @@
   addPass(PM, createRaiseAllocationsPass());     // call %malloc -> malloc inst
   addPass(PM, createGlobalDCEPass());            // Remove unused globals
   addPass(PM, createPruneEHPass());              // Remove dead EH info
-  addPass(PM, createFunctionInliningPass());     // Inline small functions
+
+  if (!DisableInline)
+    addPass(PM, createFunctionInliningPass());   // Inline small functions
 
   addPass(PM, createInstructionCombiningPass()); // Cleanup code for raise
   addPass(PM, createRaisePointerReferencesPass());// Recover type information