lib/sod.h, src/class-output.lisp: Rename `SOD__CAR' to `SOD_CAR'.

[sod] / lib / sod.h

diff --git a/lib/sod.h b/lib/sod.h
index 8270895..af34d5d 100644 (file)
--- a/lib/sod.h
+++ b/lib/sod.h
@@ -124,7 +124,7 @@ struct sod_chain {
   ((struct cls##__ilayout *)                                           \
    ((char *)(obj) - offsetof(struct cls##__ilayout, chead)))
 
-/* --- @SOD__CAR@ --- *
+/* --- @SOD_CAR@ --- *
  *
  * Arguments:  @...@ = a nonempty list of arguments
  *
@@ -132,7 +132,7 @@ struct sod_chain {
  */
 
 #if __STDC_VERSION__ >= 199901
-#  define SOD__CAR(...) SOD__CARx(__VA_LIST__, _)
+#  define SOD_CAR(...) SOD__CARx(__VA_LIST__, _)
 #  define SOD__CARx(a, ...) a
 #endif