core: Add the shuffler words but without primitives.

[factor.git] / extra / openal / alut / other / other.factor

diff --git a/extra/openal/alut/other/other.factor b/extra/openal/alut/other/other.factor
index c2d7d1f23cd17694375d6928c42218471607a069..874dce17b97876ad8ad559d3334da05d9dde2e05 100755 (executable)
--- a/extra/openal/alut/other/other.factor
+++ b/extra/openal/alut/other/other.factor
@@ -13,5 +13,5 @@ M: object load-wav-file ( filename -- format data size frequency )
     f void* <ref>
     0 int <ref>
     0 int <ref>
-    [ 0 char <ref> alutLoadWAVFile ] 4 nkeep
+    [ 0 char <ref> alutLoadWAVFile ] 4keep
     { [ int deref ] [ void* deref ] [ int deref ] [ int deref ] } spread ;