Comment 3 for bug 369255

Revision history for this message
Derick Eddington (derick-eddington) wrote : Re: [Bug 369255] Re: [request] efficient way to copy from bytevectors to malloc()ed memory

A couple typos:

=== modified file 'scheme/ikarus.pointers.ss'
--- scheme/ikarus.pointers.ss 2009-04-30 09:35:49 +0000
+++ scheme/ikarus.pointers.ss 2009-05-01 05:02:52 +0000
@@ -127,7 +127,7 @@
     (unless (and (fixnum? src-offset) (fx>=? src-offset 0))
       (die who "not a positive fixnum" src-offset))
     (unless (and (fixnum? count) (fx>=? count 0))
- (die who "not a postive fixnum" count))
+ (die who "not a positive fixnum" count))
     (cond ((and (pointer? dst) (bytevector? src))
            (unless (fx<=? (fx+ src-offset count) (bytevector-length src))
              (die who "source bytevector length exceeded"
@@ -142,7 +142,7 @@
                          dst dst-offset (pointer+ src src-offset) count))
           (else
            (die who "destination and source not a bytevector/pointer pair"
- dst dst))))
+ dst src))))

   ;;; getters and setters