diff --git a/CHANGES.current b/CHANGES.current
index f6dc3dd5b..2b8958681 100644
--- a/CHANGES.current
+++ b/CHANGES.current
@@ -1,6 +1,11 @@
 Version 1.3.36 (in progress)
 =============================
 
+04/24/2008: olly
+	    Rename BSIZE in Examples/test-suite/arrays_scope.i to BBSIZE to avoid
+	    a clash with BSIZE defined by headers on AIX with Perl (reported in
+	    SF#1928048).
+
 04/20/2008: wsfulton
             Add the ability to wrap all protected members when using directors.
             Previously only the virtual methods were available to the target language.
diff --git a/Examples/test-suite/arrays_scope.i b/Examples/test-suite/arrays_scope.i
index 3d27be0b7..efde11e59 100644
--- a/Examples/test-suite/arrays_scope.i
+++ b/Examples/test-suite/arrays_scope.i
@@ -4,14 +4,14 @@
 
 enum { ASIZE = 256 };
 namespace foo {
-   enum { BSIZE = 512 };
+   enum { BBSIZE = 512 };
    class Bar {
    public:
       enum { CCSIZE = 768 };
       int  adata[ASIZE];
-      int  bdata[BSIZE];
+      int  bdata[BBSIZE];
       int  cdata[CCSIZE];
-      void blah(int x[ASIZE], int y[BSIZE], int z[CCSIZE]) { };
+      void blah(int x[ASIZE], int y[BBSIZE], int z[CCSIZE]) { };
    };
 }