# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1208696687 14400
# Node ID 932b0cf518341bb527091f005648944104ef9845
# Parent  74f5e0c7de9e02c0c637b7efb1a9664a1ddab5c2
octave_stream::read: allow single data type specification but return double

diff --git a/src/ChangeLog b/src/ChangeLog
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2008-04-20  John W. Eaton  <jwe@octave.org>
+
+	* oct-stream.cc (octave_stream::read): Allow single data type
+	specification but return double.
+
 2008-04-18  John W. Eaton  <jwe@octave.org>
 
 	* lex.l, lex.h (process_comment): New arg, start_in_block.  Call
diff --git a/src/oct-stream.cc b/src/oct-stream.cc
--- a/src/oct-stream.cc
+++ b/src/oct-stream.cc
@@ -3270,6 +3270,10 @@
       FILL_TABLE_ROW (oct_data_conv::dt_uint32, uint32NDArray);
       FILL_TABLE_ROW (oct_data_conv::dt_int64, int64NDArray);
       FILL_TABLE_ROW (oct_data_conv::dt_uint64, uint64NDArray);
+      // FIXME -- the following line allows things like int8=>single
+      // to work, but they will actually return a double value.  We
+      // need a floatNDArray for this to work properly.
+      FILL_TABLE_ROW (oct_data_conv::dt_single, NDArray);
       FILL_TABLE_ROW (oct_data_conv::dt_double, NDArray);
       FILL_TABLE_ROW (oct_data_conv::dt_char, charNDArray);
       FILL_TABLE_ROW (oct_data_conv::dt_schar, charNDArray);