Changeset 27410 in project


Ignore:
Timestamp:
09/11/12 20:35:12 (8 years ago)
Author:
felix winkelmann
Message:

coops 1.92: bugfix by ckeen

Location:
release/4/coops
Files:
4 edited
1 copied

Legend:

Unmodified
Added
Removed
  • release/4/coops/tags/1.92/coops-primitive-objects.scm

    r22522 r27410  
    5353 (defprim <number-vector> number-vector? <sequence> <record>)
    5454  (defprim <u8vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    55   (defprim <s8vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    56   (defprim <u16vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    57   (defprim <s16vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    58   (defprim <u32vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    59   (defprim <s32vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    60   (defprim <f32vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    61   (defprim <f64vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
     55  (defprim <s8vector> (cut ##sys#structure? <> 's8vector) <number-vector>)
     56  (defprim <u16vector> (cut ##sys#structure? <> 'u16vector) <number-vector>)
     57  (defprim <s16vector> (cut ##sys#structure? <> 's16vector) <number-vector>)
     58  (defprim <u32vector> (cut ##sys#structure? <> 'u32vector) <number-vector>)
     59  (defprim <s32vector> (cut ##sys#structure? <> 's32vector) <number-vector>)
     60  (defprim <f32vector> (cut ##sys#structure? <> 'f32vector) <number-vector>)
     61  (defprim <f64vector> (cut ##sys#structure? <> 'f64vector) <number-vector>)
    6262 (defprim <string> string? <sequence>)
    6363 (defprim <char-set> (cut ##sys#structure? <> 'char-set) <sequence> <record>)
  • release/4/coops/tags/1.92/coops.setup

    r27260 r27410  
    1010 '("coops.so" "coops.import.so"
    1111   "coops-primitive-objects.so" "coops-primitive-objects.import.so")
    12  '((version 1.91)))
     12 '((version 1.92)))
  • release/4/coops/trunk/coops-primitive-objects.scm

    r22522 r27410  
    5353 (defprim <number-vector> number-vector? <sequence> <record>)
    5454  (defprim <u8vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    55   (defprim <s8vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    56   (defprim <u16vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    57   (defprim <s16vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    58   (defprim <u32vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    59   (defprim <s32vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    60   (defprim <f32vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
    61   (defprim <f64vector> (cut ##sys#structure? <> 'u8vector) <number-vector>)
     55  (defprim <s8vector> (cut ##sys#structure? <> 's8vector) <number-vector>)
     56  (defprim <u16vector> (cut ##sys#structure? <> 'u16vector) <number-vector>)
     57  (defprim <s16vector> (cut ##sys#structure? <> 's16vector) <number-vector>)
     58  (defprim <u32vector> (cut ##sys#structure? <> 'u32vector) <number-vector>)
     59  (defprim <s32vector> (cut ##sys#structure? <> 's32vector) <number-vector>)
     60  (defprim <f32vector> (cut ##sys#structure? <> 'f32vector) <number-vector>)
     61  (defprim <f64vector> (cut ##sys#structure? <> 'f64vector) <number-vector>)
    6262 (defprim <string> string? <sequence>)
    6363 (defprim <char-set> (cut ##sys#structure? <> 'char-set) <sequence> <record>)
  • release/4/coops/trunk/coops.setup

    r27260 r27410  
    1010 '("coops.so" "coops.import.so"
    1111   "coops-primitive-objects.so" "coops-primitive-objects.import.so")
    12  '((version 1.91)))
     12 '((version 1.92)))
Note: See TracChangeset for help on using the changeset viewer.