*** include/systemc/datatypes/bit/sc_bv_base.h  Wed Mar 27 08:52:28 2002
--- include/systemc/datatypes/bit/sc_bv_base.h  Sun Nov  3 11:48:51 2002
***************
*** 232,237 ****
--- 232,239 ----
   
      void clean_tail();
   
+     // For SystemPerl, allow raw data pointer access
+     unsigned long* get_datap() const { return m_data; }
   
      // other methods