diff src/data.c @ 211:78478c60bfcd r20-4b4

Import from CVS: tag r20-4b4
author cvs
date Mon, 13 Aug 2007 10:05:51 +0200
parents 41ff10fd062f
children 52952cbfc5b5
line wrap: on
line diff
--- a/src/data.c	Mon Aug 13 10:05:01 2007 +0200
+++ b/src/data.c	Mon Aug 13 10:05:51 2007 +0200
@@ -592,7 +592,7 @@
   if (VECTORP  (object)) return Qvector;
 
   assert (LRECORDP (object));
-  return intern (XRECORD_LHEADER (object)->implementation->name);
+  return intern (XRECORD_LHEADER_IMPLEMENTATION (object)->name);
 }