X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=package-data-list.lisp-expr;h=7782f153421397baba072102488f6026c17150b2;hb=57bf8a7e65a81a8cff946a65e7e33e3f9b948ac6;hp=6cfd99f64c40f2ec5763aec17faec81bfeb1b997;hpb=c40c56eedec692acb930ec0e358a933ab33a3560;p=sbcl.git

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index 6cfd99f..7782f15 100644
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -1304,7 +1304,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "%RAW-SET-COMPLEX-DOUBLE" "%RAW-SET-COMPLEX-LONG"
                "%RAW-SET-COMPLEX-SINGLE" "%RAW-SET-DOUBLE"
                "%RAW-SET-LONG" "%RAW-SET-SINGLE" "%SCALB" "%SCALBN"
-               #!+(or x86 x86-64)
+               #!+(or x86 x86-64 ppc)
                "%RAW-INSTANCE-ATOMIC-INCF/WORD"
                "%RAW-INSTANCE-REF/WORD" "%RAW-INSTANCE-SET/WORD"
                "%RAW-INSTANCE-REF/SINGLE" "%RAW-INSTANCE-SET/SINGLE"
@@ -1928,6 +1928,8 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "THREAD-ALIVE-P"
                "THREAD-NAME"
                "THREAD-YIELD"
+               ;; Memory barrier
+               "BARRIER"
                ;; Mutexes
                "GET-MUTEX"
                "GRAB-MUTEX"
@@ -2470,6 +2472,8 @@ structure representations"
                "*PRIMITIVE-OBJECTS*"
                "+HIGHEST-NORMAL-GENERATION+"
                "+PSEUDO-STATIC-GENERATION+"
+               "%COMPILER-BARRIER" "%DATA-DEPENDENCY-BARRIER"
+               "%MEMORY-BARRIER" "%READ-BARRIER" "%WRITE-BARRIER"
                "AFTER-BREAKPOINT-TRAP"
                "ANY-REG-SC-NUMBER" "ARRAY-DATA-SLOT" "ARRAY-DIMENSIONS-OFFSET"
                "ARRAY-DISPLACED-P-SLOT" "ARRAY-DISPLACEMENT-SLOT"