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: |
934690e32050c43a2d51431f3dab4c5a |
| 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
Changes to generic.scm.
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
...
213
214
215
216
217
218
219
220
221
222
223
224
225
226
|
[imag (imag-part v)])
(unless (zero? real)
(write-tag/type 1 'sized port)
(write-sized write-real real port))
(unless (zero? imag)
(write-tag/type 2 'sized port)
(write-sized write-real imag port))))
(define (write-symbol v port)
(write-tag/type 1 'sized port)
(write-sized-string (symbol->string v) port)
(cond
[(not (##sys#interned-symbol? v))
(write-tag/type 2 'int* port)
(write-int* 2 port)]
[(keyword? v)
(write-tag/type 2 'int* port)
(write-int* 3 port)]))
(define (write-pair v port)
(write-tag/type 1 'sized port)
(write-sized write-value (car v) port)
(write-tag/type 2 'sized port)
(write-sized write-value (cdr v) port))
................................................................................
[(number? v)
(write-tag/type 5 'sized port)
(write-sized write-complex v port)]
[(string? v)
(write-tag/type 6 'sized port)
(write-sized-string v port)]
[(symbol? v)
(write-tag/type 7 'sized port)
(write-sized write-symbol v port)]
[(pair? v)
(write-tag/type 8 'sized port)
(write-sized write-pair v port)]
[(vector? v)
|
>
>
>
>
>
>
<
<
|
<
<
<
<
>
>
>
>
|
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
...
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
|
[imag (imag-part v)])
(unless (zero? real)
(write-tag/type 1 'sized port)
(write-sized write-real real port))
(unless (zero? imag)
(write-tag/type 2 'sized port)
(write-sized write-real imag port))))
(define (write-keyword v port)
(write-tag/type 1 'sized port)
(write-sized-string (symbol->string v) port)
(write-tag/type 2 'int* port)
(write-int* 3 port))
(define (write-symbol v port)
(write-tag/type 1 'sized port)
(write-sized-string (symbol->string v) port)
(write-tag/type 2 'int* port)
(write-int* (if (##sys#interned-symbol? v) 1 2) port))
(define (write-pair v port)
(write-tag/type 1 'sized port)
(write-sized write-value (car v) port)
(write-tag/type 2 'sized port)
(write-sized write-value (cdr v) port))
................................................................................
[(number? v)
(write-tag/type 5 'sized port)
(write-sized write-complex v port)]
[(string? v)
(write-tag/type 6 'sized port)
(write-sized-string v port)]
[(keyword? v)
(write-tag/type 7 'sized port)
(write-sized write-keyword v port)]
[(symbol? v)
(write-tag/type 7 'sized port)
(write-sized write-symbol v port)]
[(pair? v)
(write-tag/type 8 'sized port)
(write-sized write-pair v port)]
[(vector? v)
|
Changes to protobuf.egg.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
((category data io) (synopsis "Protocol buffer serialization") (author "Thomas Chust") (license "BSD") (version "1.2.0") (dependencies srfi-4 srfi-13 srfi-18 srfi-42 srfi-69 srfi-99) (test-dependencies test) |
| < |
1 2 3 4 5 6 7 8 9 10 11 12 13 |
((category data io)
(synopsis "Protocol buffer serialization")
(author "Thomas Chust")
(license "BSD")
(version "1.2.1")
(dependencies
srfi-13
srfi-18
srfi-42
srfi-69
srfi-99)
(test-dependencies
test)
|