--- a/src/ov-scalar.h
+++ b/src/ov-scalar.h
@@ -98,7 +98,14 @@
     { return NDArray (dim_vector (1, 1), scalar); }
 
   octave_value resize (const dim_vector& dv) const
-    { NDArray retval (dv); if (dv.numel()) retval(0) = scalar; return retval; }
+    {
+      NDArray retval (dv);
+
+      if (dv.numel ())
+	retval(0) = scalar;
+
+      return retval;
+    }
 
   Complex complex_value (bool = false) const { return scalar; }
 
@@ -134,6 +141,14 @@
   bool load_hdf5 (hid_t loc_id, const char *name, bool have_h5giterate_bug);
 #endif
 
+  int write (octave_stream& os, int block_size,
+	     oct_data_conv::data_type output_type, int skip,
+	     oct_mach_info::float_format flt_fmt) const
+    {
+      return os.write (array_value (), block_size, output_type,
+		       skip, flt_fmt);
+    }
+
 private:
 
   DECLARE_OCTAVE_ALLOCATOR