diff --git a/packages/performance/extrae/extrae-3.0.1 b/packages/performance/extrae/extrae-3.0.1
index 42a4ad1..1eb2768 100644
--- a/packages/performance/extrae/extrae-3.0.1
+++ b/packages/performance/extrae/extrae-3.0.1
@@ -41,6 +41,10 @@ fi
 
 BUILDDIR="${SRCDIR}"
 
+src_prepare () {
+        patch -p0 < $SCLASS_DIR/$SCLASSFILE-0000.patch
+}
+
 src_install() {
     mkdir -p $PREFIX
     make install  || sit_fail "Installation failed"
diff --git a/packages/performance/extrae/extrae-3.0.1-0000.patch b/packages/performance/extrae/extrae-3.0.1-0000.patch
new file mode 100644
index 0000000..4988d1b
--- /dev/null
+++ b/packages/performance/extrae/extrae-3.0.1-0000.patch
@@ -0,0 +1,22 @@
+--- src/tracer/wrappers/OMP/ibm-xlsmp-1.6.c	2015-03-10 13:25:54.421395005 +0100
++++ src/tracer/wrappers/OMP/ibm-xlsmp-1.6.c	2015-03-10 13:26:07.747914752 +0100
+@@ -67,7 +67,7 @@
+ */
+ 
+ /* FIXME: Should we discover this dinamically? */ 
+-#define MAX_THD 32
++#define MAX_THD 128
+ 
+ typedef unsigned long long ull;
+ typedef long long ll;
+--- src/tracer/wrappers/OMP/gnu-libgomp-4.2.c	2015-03-10 13:19:14.373690864 +0100
++++ src/tracer/wrappers/OMP/gnu-libgomp-4.2.c	2015-03-10 13:25:44.026541312 +0100
+@@ -78,7 +78,7 @@
+ */
+ 
+ /* FIXME: Should we discover this dinamically? */ 
+-#define MAX_THD 32
++#define MAX_THD 128
+ 
+ 
+ /* Pointer to the user function called by a PARALLEL DO REGION */