bit-bash-copy gone

Nikodemus Siivola <[email protected]> Sat, 2 Apr 2005 12:28:38 +0300 (EEST)
Newsgroups gmane.lisp.clx.devel
Message-ID <[email protected]>
The following patch replaces bit-bash-copy in CLX for SBCL with 
ub8-bash-copy, as the former is no longer among us. Not that I'm convinced 
that it's the right thing: now that REPLACE is supposed to be fast in SBCL
that might be an option...

Cheers,

  -- Nikodemus              Schemer: "Buddha is small, clean, and serious."
                   Lispnik: "Buddha is big, has hairy armpits, and laughs."

Index: dependent.lisp
===================================================================
RCS file: /cvs/clx/dependent.lisp,v
retrieving revision 1.19
diff -u -r1.19 dependent.lisp
--- dependent.lisp      11 Jun 2004 12:18:17 -0000      1.19
+++ dependent.lisp      2 Apr 2005 09:18:33 -0000
@@ -3545,7 +3545,7 @@
            (count height (1- count)))
           ((zerop count))
         (declare (type array-index src-idx dest-idx count))
-       (sb-kernel:bit-bash-copy sdata src-idx ddata dest-idx width)))))
+       (sb-kernel:ub8-bash-copy sdata src-idx ddata dest-idx width)))))

  #+(or CMU sbcl)
  (defun fast-read-pixarray-using-bitblt


_______________________________________________
Portable-clx mailing list
[email protected]
http://lists.metacircles.com/cgi-bin/mailman/listinfo/portable-clx
cvs -d :ext:cvs.telent.net:/usr/local/src/cvs co clx  # over ssh
cvs -d :pserver:[email protected]:/cvs co clx  # anonymous