1 % function [ ret ] = isoctave ()
2 % equal to 1 when executed from octave, to 0 when executed from non-octave
4 % Author: P. Cloetens <cloetens@esrf.fr>
6 % 2006-06-04 P. Cloetens <cloetens@esrf.fr>
9 function [ ret ] = isoctave ()
10 if exist('OCTAVE_VERSION','builtin')