From 706b68e7ef2d41918fc984fba46bc3c5cb13c0f1 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?St=C3=A9phane=20Adjemian=20=28Scylla=29?=
 <stephane.adjemian@ens.fr>
Date: Thu, 24 Jun 2010 18:11:08 +0200
Subject: [PATCH] Do not build plots of the posterior IRFs with Octave.

---
 matlab/PosteriorIRF.m | 22 ++++++++++++----------
 1 file changed, 12 insertions(+), 10 deletions(-)

diff --git a/matlab/PosteriorIRF.m b/matlab/PosteriorIRF.m
index b6fa44619..5a13d2460 100644
--- a/matlab/PosteriorIRF.m
+++ b/matlab/PosteriorIRF.m
@@ -407,17 +407,19 @@ end
 
 % The others file format are generated in parallel by PosteriorIRF_core2!
 
-                                % Comment for testing!
-if isnumeric(options_.parallel) % || (M_.exo_nbr*ceil(size(varlist,1)/MaxNumberOfPlotPerFigure))<8,% | isunix, % for the moment exclude unix platform from parallel implementation
-    [fout] = PosteriorIRF_core2(localVars,1,M_.exo_nbr,0);
-else
-    globalVars = struct('M_',M_, ...
-      'options_', options_);
-    
-   [fout] = masterParallel(options_.parallel, 1, M_.exo_nbr,NamFileInput,'PosteriorIRF_core2', localVars, globalVars, options_.parallel_info);
-    
-end
 
+                                % Comment for testing!
+if ~exist('OCTAVE_VERSION')
+    if isnumeric(options_.parallel) % || (M_.exo_nbr*ceil(size(varlist,1)/MaxNumberOfPlotPerFigure))<8,% | isunix, % for the moment exclude unix platform from parallel implementation
+        [fout] = PosteriorIRF_core2(localVars,1,M_.exo_nbr,0);
+    else
+        globalVars = struct('M_',M_, ...
+                            'options_', options_);
+        
+        [fout] = masterParallel(options_.parallel, 1, M_.exo_nbr,NamFileInput,'PosteriorIRF_core2', localVars, globalVars, options_.parallel_info);
+        
+    end
+end
 % END parallel code!