protobuf

Check-in [934690e320]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:CHICKEN 5.0.2 compatibility patch (thanks to Peter Bex for spotting this)
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.2.1 | chicken-5
Files: files | file ages | folders
SHA3-256: 934690e32050c43a2d51431f3dab4c5a781b8a04acaf768123b08ea8f9c03e30
User & Date: murphy 2019-05-05 11:21:48
Context
2019-05-05
11:26
Updated release information file check-in: d7c35dde69 user: murphy tags: chicken-5
11:21
CHICKEN 5.0.2 compatibility patch (thanks to Peter Bex for spotting this) check-in: 934690e320 user: murphy tags: v1.2.1, chicken-5
2018-08-27
22:59
Support for nested generators in SRFI-4 comprehensions check-in: 416afe4af3 user: murphy tags: chicken-5
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Changes to generic.scm.

   101    101             [imag (imag-part v)])
   102    102         (unless (zero? real)
   103    103           (write-tag/type 1 'sized port)
   104    104           (write-sized write-real real port))
   105    105         (unless (zero? imag)
   106    106           (write-tag/type 2 'sized port)
   107    107           (write-sized write-real imag port))))
          108  +
          109  +  (define (write-keyword v port)
          110  +    (write-tag/type 1 'sized port)
          111  +    (write-sized-string (symbol->string v) port)
          112  +    (write-tag/type 2 'int* port)
          113  +    (write-int* 3 port))
   108    114   
   109    115     (define (write-symbol v port)
   110    116       (write-tag/type 1 'sized port)
   111    117       (write-sized-string (symbol->string v) port)
   112         -    (cond
   113         -     [(not (##sys#interned-symbol? v))
   114         -      (write-tag/type 2 'int* port)
   115         -      (write-int* 2 port)]
   116         -     [(keyword? v)
   117         -      (write-tag/type 2 'int* port)
   118         -      (write-int* 3 port)]))
          118  +    (write-tag/type 2 'int* port)
          119  +    (write-int* (if (##sys#interned-symbol? v) 1 2) port))
   119    120   
   120    121     (define (write-pair v port)
   121    122       (write-tag/type 1 'sized port)
   122    123       (write-sized write-value (car v) port)
   123    124       (write-tag/type 2 'sized port)
   124    125       (write-sized write-value (cdr v) port))
   125    126   
................................................................................
   213    214   
   214    215        [(number? v)
   215    216         (write-tag/type 5 'sized port)
   216    217         (write-sized write-complex v port)]
   217    218        [(string? v)
   218    219         (write-tag/type 6 'sized port)
   219    220         (write-sized-string v port)]
          221  +     [(keyword? v)
          222  +      (write-tag/type 7 'sized port)
          223  +      (write-sized write-keyword v port)]
   220    224        [(symbol? v)
   221    225         (write-tag/type 7 'sized port)
   222    226         (write-sized write-symbol v port)]
   223    227        [(pair? v)
   224    228         (write-tag/type 8 'sized port)
   225    229         (write-sized write-pair v port)]
   226    230        [(vector? v)

Changes to protobuf.egg.

     1      1   ((category data io)
     2      2    (synopsis "Protocol buffer serialization")
     3      3    (author "Thomas Chust")
     4      4    (license "BSD")
     5         - (version "1.2.0")
            5  + (version "1.2.1")
     6      6    (dependencies
     7         -   srfi-4
     8      7      srfi-13
     9      8      srfi-18
    10      9      srfi-42
    11     10      srfi-69
    12     11      srfi-99)
    13     12    (test-dependencies
    14     13      test)