Merge lp:~zorba-coders/zorba/bug-978722_image into lp:zorba/image-module
- bug-978722_image
- Merge into image-module
Proposed by
Matthias Brantner
Status: | Merged | ||||
---|---|---|---|---|---|
Approved by: | Matthias Brantner | ||||
Approved revision: | 46 | ||||
Merged at revision: | 46 | ||||
Proposed branch: | lp:~zorba-coders/zorba/bug-978722_image | ||||
Merge into: | lp:zorba/image-module | ||||
Diff against target: |
865 lines (+92/-92) 13 files modified
test/Queries/image/animation.xq (+4/-4) test/Queries/image/basic.xq (+7/-7) test/Queries/image/manipulation_1.xq (+8/-8) test/Queries/image/manipulation_2.xq (+8/-8) test/Queries/image/manipulation_3.xq (+6/-6) test/Queries/image/manipulation_4.xq (+7/-7) test/Queries/image/manipulation_5.xq (+7/-7) test/Queries/image/paint_1.xq (+7/-7) test/Queries/image/paint_2.xq (+6/-6) test/Queries/image/paint_3.xq (+6/-6) test/Queries/image/paint_4.xq (+10/-10) test/Queries/image/paint_5.xq (+9/-9) test/Queries/image/paint_6.xq (+7/-7) |
||||
To merge this branch: | bzr merge lp:~zorba-coders/zorba/bug-978722_image | ||||
Related bugs: |
|
Reviewer | Review Type | Date Requested | Status |
---|---|---|---|
William Candillon | Approve | ||
Matthias Brantner | Approve | ||
Review via email: mp+101528@code.launchpad.net |
Commit message
fix for bug #978722 (change annotation prefix from "ann" to "an")
Description of the change
fix for bug #978722 (change annotation prefix from "ann" to "an")
To post a comment you must log in.
Revision history for this message
Matthias Brantner (matthias-brantner) : | # |
review:
Approve
Revision history for this message
Zorba Build Bot (zorba-buildbot) wrote : | # |
Revision history for this message
Zorba Build Bot (zorba-buildbot) wrote : | # |
Validation queue job bug-978722_image-
All tests succeeded!
Revision history for this message
Zorba Build Bot (zorba-buildbot) wrote : | # |
Voting does not meet specified criteria. Required: Approve > 1, Disapprove < 1, Needs Fixing < 1, Pending < 1. Got: 1 Approve, 1 Pending.
Revision history for this message
William Candillon (wcandillon) : | # |
review:
Approve
Revision history for this message
Zorba Build Bot (zorba-buildbot) wrote : | # |
Validation queue starting for merge proposal.
Log at: http://
Revision history for this message
Zorba Build Bot (zorba-buildbot) wrote : | # |
Validation queue job bug-978722_image-
All tests succeeded!
Preview Diff
[H/L] Next/Prev Comment, [J/K] Next/Prev File, [N/P] Next/Prev Hunk
1 | === modified file 'test/Queries/image/animation.xq' |
2 | --- test/Queries/image/animation.xq 2011-07-03 23:37:25 +0000 |
3 | +++ test/Queries/image/animation.xq 2012-04-11 10:11:20 +0000 |
4 | @@ -8,7 +8,7 @@ |
5 | import module namespace ani = 'http://www.zorba-xquery.com/modules/image/animation'; |
6 | import schema namespace image = 'http://www.zorba-xquery.com/modules/image/image'; |
7 | |
8 | -declare namespace ann = "http://www.zorba-xquery.com/annotations"; |
9 | +declare namespace an = "http://www.zorba-xquery.com/annotations"; |
10 | |
11 | declare variable $local:image-dir := fn:concat(file:dir-name(fn:static-base-uri()), "/images/"); |
12 | |
13 | @@ -33,7 +33,7 @@ |
14 | (:~ |
15 | : @return true if the ani:create-animated-gif function works. |
16 | :) |
17 | -declare %ann:nondeterministic function local:test-create-animated-gif() as xs:boolean { |
18 | +declare %an:nondeterministic function local:test-create-animated-gif() as xs:boolean { |
19 | let $gif1 := file:read-binary(concat($local:image-dir, "bird.gif")) |
20 | let $gif2 := file:read-binary(concat($local:image-dir, "bird2.gif")) |
21 | let $animatedGif := ani:create-animated-gif(($gif1, $gif2), xs:unsignedInt(10), xs:unsignedInt(0)) |
22 | @@ -44,7 +44,7 @@ |
23 | (:~ |
24 | : @return true if the ani:create-morphed-gif function works. |
25 | :) |
26 | -declare %ann:nondeterministic function local:test-create-morphed-gif() as xs:boolean { |
27 | +declare %an:nondeterministic function local:test-create-morphed-gif() as xs:boolean { |
28 | let $gif1 := file:read-binary(concat($local:image-dir, "bird.gif")) |
29 | let $gif2 := file:read-binary(concat($local:image-dir, "bird2.gif")) |
30 | let $animatedGif := ani:create-morphed-gif(($gif1, $gif2), xs:unsignedInt(10), xs:unsignedInt(0), xs:unsignedInt(2 )) |
31 | @@ -55,7 +55,7 @@ |
32 | |
33 | |
34 | |
35 | -declare %ann:nondeterministic %ann:sequential function local:main() as xs:string* { |
36 | +declare %an:nondeterministic %an:sequential function local:main() as xs:string* { |
37 | |
38 | let $a := local:test-create-animated-gif() |
39 | return |
40 | |
41 | === modified file 'test/Queries/image/basic.xq' |
42 | --- test/Queries/image/basic.xq 2011-08-04 04:09:00 +0000 |
43 | +++ test/Queries/image/basic.xq 2012-04-11 10:11:20 +0000 |
44 | @@ -6,7 +6,7 @@ |
45 | import module namespace basic = 'http://www.zorba-xquery.com/modules/image/basic'; |
46 | import module namespace file = 'http://expath.org/ns/file'; |
47 | |
48 | -declare namespace ann = "http://www.zorba-xquery.com/annotations"; |
49 | +declare namespace an = "http://www.zorba-xquery.com/annotations"; |
50 | |
51 | declare variable $local:image-dir := fn:concat(file:dir-name(fn:static-base-uri()), "/images/"); |
52 | |
53 | @@ -55,7 +55,7 @@ |
54 | (:~ |
55 | : @return true if the basic:create function works. |
56 | :) |
57 | -declare %ann:nondeterministic function local:test-create() as xs:boolean { |
58 | +declare %an:nondeterministic function local:test-create() as xs:boolean { |
59 | let $blank-gif := basic:create(xs:unsignedInt(10), xs:unsignedInt(20), "GIF") |
60 | let $blank-png := basic:create(xs:unsignedInt(10), xs:unsignedInt(20), "PNG") |
61 | let $blank-jpg := basic:create(xs:unsignedInt(10), xs:unsignedInt(20), "JPEG") |
62 | @@ -89,7 +89,7 @@ |
63 | (:~ |
64 | : @return true if the basic:compress function works. |
65 | :) |
66 | -declare %ann:nondeterministic function local:test-compress() as xs:boolean { |
67 | +declare %an:nondeterministic function local:test-compress() as xs:boolean { |
68 | let $uncompressed := file:read-binary(concat($local:image-dir, "uncompressed.jpg")) |
69 | let $compressed := basic:compress($uncompressed, xs:unsignedInt(20)) |
70 | let $compressed-ref := file:read-binary(concat($local:image-dir, "compressed.jpg")) |
71 | @@ -99,7 +99,7 @@ |
72 | (:~ |
73 | : @return true if the basic:equals function works. |
74 | :) |
75 | -declare %ann:nondeterministic function local:test-equals() as xs:boolean { |
76 | +declare %an:nondeterministic function local:test-equals() as xs:boolean { |
77 | (basic:equals($local:gif, $local:gif) and (not (basic:equals($local:gif, file:read-binary(concat($local:image-dir, "manipulation/gamma1Bird.gif")))))) |
78 | }; |
79 | |
80 | @@ -107,20 +107,20 @@ |
81 | (:~ |
82 | : @return true if the basic:exif function works. |
83 | :) |
84 | -declare %ann:nondeterministic function local:test-exif() as xs:boolean { |
85 | +declare %an:nondeterministic function local:test-exif() as xs:boolean { |
86 | let $exif := file:read-binary(concat($local:image-dir, "exif.jpg")) |
87 | return ((basic:exif($exif, "ExifImageWidth") eq "20") and fn:empty(basic:exif($exif, "supercalifragilisticexpialidocious"))) |
88 | }; |
89 | |
90 | |
91 | -declare %ann:nondeterministic function local:test-convert-svg() as xs:boolean { |
92 | +declare %an:nondeterministic function local:test-convert-svg() as xs:boolean { |
93 | let $svg-converted := basic:convert-svg(file:read-binary(concat($local:image-dir, "test.svg")), "JPEG") |
94 | let $to-compare := file:read-binary(concat($local:image-dir, "test.jpeg")) |
95 | return basic:equals($svg-converted, $to-compare) |
96 | }; |
97 | |
98 | |
99 | -declare %ann:nondeterministic %ann:sequential function local:main() as xs:string* { |
100 | +declare %an:nondeterministic %an:sequential function local:main() as xs:string* { |
101 | |
102 | let $a := local:test-width() |
103 | return |
104 | |
105 | === modified file 'test/Queries/image/manipulation_1.xq' |
106 | --- test/Queries/image/manipulation_1.xq 2011-07-03 23:37:25 +0000 |
107 | +++ test/Queries/image/manipulation_1.xq 2012-04-11 10:11:20 +0000 |
108 | @@ -8,7 +8,7 @@ |
109 | import module namespace man = 'http://www.zorba-xquery.com/modules/image/manipulation'; |
110 | import schema namespace image = 'http://www.zorba-xquery.com/modules/image/image'; |
111 | |
112 | -declare namespace ann = "http://www.zorba-xquery.com/annotations"; |
113 | +declare namespace an = "http://www.zorba-xquery.com/annotations"; |
114 | |
115 | declare variable $local:image-dir := fn:concat(file:dir-name(fn:static-base-uri()), "/images/"); |
116 | |
117 | @@ -40,7 +40,7 @@ |
118 | (:~ |
119 | : @return true if the man:resize function works. |
120 | :) |
121 | -declare %ann:nondeterministic function local:test-resize() as xs:boolean { |
122 | +declare %an:nondeterministic function local:test-resize() as xs:boolean { |
123 | let $resized := man:resize($local:gif, xs:unsignedInt(500), xs:unsignedInt(600)) |
124 | let $resized-ref as xs:base64Binary := file:read-binary(concat($local:image-dir, "manipulation/bigBird.gif")) |
125 | return basic:equals($resized, $resized-ref) |
126 | @@ -51,7 +51,7 @@ |
127 | (:~ |
128 | : @return true if the man:zoom function works. |
129 | :) |
130 | -declare %ann:nondeterministic function local:test-zoom() as xs:boolean { |
131 | +declare %an:nondeterministic function local:test-zoom() as xs:boolean { |
132 | let $zoomed := man:zoom($local:jpg, 2) |
133 | let $ref-zoomed := file:read-binary(concat($local:image-dir, "manipulation/zoomedBird.jpg")) |
134 | return basic:equals($zoomed, $ref-zoomed) |
135 | @@ -63,7 +63,7 @@ |
136 | (:~ |
137 | : @return true if the man:zoom-by-width function works. |
138 | :) |
139 | -declare %ann:nondeterministic function local:test-zoom-by-width() as xs:boolean { |
140 | +declare %an:nondeterministic function local:test-zoom-by-width() as xs:boolean { |
141 | let $zoomed := man:zoom-by-width($local:jpg, xs:unsignedInt(268)) |
142 | let $ref-zoomed := file:read-binary(concat($local:image-dir, "manipulation/zoomedBird.jpg")) |
143 | return basic:equals($zoomed, $ref-zoomed) |
144 | @@ -72,7 +72,7 @@ |
145 | (:~ |
146 | : @return true if the man:zoom-by-height function works. |
147 | :) |
148 | -declare %ann:nondeterministic function local:test-zoom-by-height() as xs:boolean { |
149 | +declare %an:nondeterministic function local:test-zoom-by-height() as xs:boolean { |
150 | let $zoomed := man:zoom-by-height($local:jpg, xs:unsignedInt(320)) |
151 | let $ref-zoomed := file:read-binary(concat($local:image-dir, "manipulation/zoomedBird.jpg")) |
152 | return basic:equals($zoomed, $ref-zoomed) |
153 | @@ -81,7 +81,7 @@ |
154 | (:~ |
155 | : @return true if the man:sub-image function works. |
156 | :) |
157 | -declare %ann:nondeterministic function local:test-sub-image() as xs:boolean { |
158 | +declare %an:nondeterministic function local:test-sub-image() as xs:boolean { |
159 | let $sub := man:sub-image($local:jpg, xs:unsignedInt(20), xs:unsignedInt(20), xs:unsignedInt(200), xs:unsignedInt(30)) |
160 | let $ref-sub := file:read-binary(concat($local:image-dir, "manipulation/subBird.jpg")) |
161 | return basic:equals($sub, $ref-sub) |
162 | @@ -90,7 +90,7 @@ |
163 | (:~ |
164 | : @return true if the man:overlay function works. |
165 | :) |
166 | -declare %ann:nondeterministic function local:test-overlay() { |
167 | +declare %an:nondeterministic function local:test-overlay() { |
168 | let $ref-overlay:= file:read-binary(concat($local:image-dir, "manipulation/overlayBird.jpg")) |
169 | let $ref-zoomed := file:read-binary(concat($local:image-dir, "manipulation/zoomedBird.jpg")) |
170 | return basic:equals(man:overlay($ref-zoomed, $local:png, xs:unsignedInt(50), xs:unsignedInt(50), |
171 | @@ -100,7 +100,7 @@ |
172 | |
173 | |
174 | |
175 | -declare %ann:nondeterministic %ann:sequential function local:main() as xs:string* { |
176 | +declare %an:nondeterministic %an:sequential function local:main() as xs:string* { |
177 | |
178 | let $a := local:test-resize() |
179 | return |
180 | |
181 | === modified file 'test/Queries/image/manipulation_2.xq' |
182 | --- test/Queries/image/manipulation_2.xq 2011-07-03 23:37:25 +0000 |
183 | +++ test/Queries/image/manipulation_2.xq 2012-04-11 10:11:20 +0000 |
184 | @@ -8,7 +8,7 @@ |
185 | import module namespace man = 'http://www.zorba-xquery.com/modules/image/manipulation'; |
186 | import schema namespace image = 'http://www.zorba-xquery.com/modules/image/image'; |
187 | |
188 | -declare namespace ann = "http://www.zorba-xquery.com/annotations"; |
189 | +declare namespace an = "http://www.zorba-xquery.com/annotations"; |
190 | |
191 | declare variable $local:image-dir := fn:concat(file:dir-name(fn:static-base-uri()), "/images/"); |
192 | |
193 | @@ -37,7 +37,7 @@ |
194 | (:~ |
195 | : @return true if the man:rotate function works. |
196 | :) |
197 | -declare %ann:nondeterministic function local:test-rotate() as xs:boolean { |
198 | +declare %an:nondeterministic function local:test-rotate() as xs:boolean { |
199 | let $rotated := man:rotate($local:jpg, xs:int(180)) |
200 | let $rotated-ref := file:read-binary(concat($local:image-dir, "manipulation/rotatedBird.jpg")) |
201 | return basic:equals($rotated, $rotated-ref) |
202 | @@ -48,7 +48,7 @@ |
203 | (:~ |
204 | : @return true if the man:rotate function works. |
205 | :) |
206 | -declare %ann:nondeterministic function local:test-erase() as xs:boolean { |
207 | +declare %an:nondeterministic function local:test-erase() as xs:boolean { |
208 | let $erased := man:erase($local:jpg) |
209 | let $erased-ref := file:read-binary(concat($local:image-dir, "manipulation/erased.jpg")) |
210 | return basic:equals($erased, $erased-ref) |
211 | @@ -57,7 +57,7 @@ |
212 | (:~ |
213 | : @return true if the man:flop function works. |
214 | :) |
215 | -declare %ann:nondeterministic function local:test-flop() as xs:boolean { |
216 | +declare %an:nondeterministic function local:test-flop() as xs:boolean { |
217 | let $flopped := man:flop($local:jpg) |
218 | let $flopped-ref := file:read-binary(concat($local:image-dir, "manipulation/floppedBird.jpg")) |
219 | return basic:equals($flopped, $flopped-ref) |
220 | @@ -67,7 +67,7 @@ |
221 | (:~ |
222 | : @return true if the man:flip function works. |
223 | :) |
224 | -declare %ann:nondeterministic function local:test-flip() as xs:boolean { |
225 | +declare %an:nondeterministic function local:test-flip() as xs:boolean { |
226 | let $flipped := man:flip($local:jpg) |
227 | let $flipped-ref := file:read-binary(concat($local:image-dir, "manipulation/flippedBird.jpg")) |
228 | return basic:equals($flipped, $flipped-ref) |
229 | @@ -76,7 +76,7 @@ |
230 | (:~ |
231 | : @return true if the man:trim function works. |
232 | :) |
233 | -declare %ann:nondeterministic function local:test-trim() as xs:boolean { |
234 | +declare %an:nondeterministic function local:test-trim() as xs:boolean { |
235 | let $trimmed := man:trim($local:jpg) |
236 | let $trimmed-ref := file:read-binary(concat($local:image-dir, "manipulation/trimmedBird.jpg")) |
237 | return basic:equals($trimmed, $trimmed-ref) |
238 | @@ -87,7 +87,7 @@ |
239 | (:~ |
240 | : @return true if the man:blur function works. |
241 | :) |
242 | -declare %ann:nondeterministic function local:test-blur() as xs:boolean { |
243 | +declare %an:nondeterministic function local:test-blur() as xs:boolean { |
244 | let $blurred := man:blur($local:jpg, xs:int(8), xs:int(-4)) |
245 | let $blurred-ref := file:read-binary(concat($local:image-dir, "manipulation/blurredBird.jpg")) |
246 | return basic:equals($blurred, $blurred-ref) |
247 | @@ -96,7 +96,7 @@ |
248 | |
249 | |
250 | |
251 | -declare %ann:nondeterministic %ann:sequential function local:main() as xs:string* { |
252 | +declare %an:nondeterministic %an:sequential function local:main() as xs:string* { |
253 | |
254 | let $a := local:test-rotate() |
255 | return |
256 | |
257 | === modified file 'test/Queries/image/manipulation_3.xq' |
258 | --- test/Queries/image/manipulation_3.xq 2011-07-03 23:37:25 +0000 |
259 | +++ test/Queries/image/manipulation_3.xq 2012-04-11 10:11:20 +0000 |
260 | @@ -8,7 +8,7 @@ |
261 | import module namespace man = 'http://www.zorba-xquery.com/modules/image/manipulation'; |
262 | import schema namespace image = 'http://www.zorba-xquery.com/modules/image/image'; |
263 | |
264 | -declare namespace ann = "http://www.zorba-xquery.com/annotations"; |
265 | +declare namespace an = "http://www.zorba-xquery.com/annotations"; |
266 | |
267 | declare variable $local:image-dir := fn:concat(file:dir-name(fn:static-base-uri()), "/images/"); |
268 | |
269 | @@ -40,7 +40,7 @@ |
270 | (:~ |
271 | : @return true if the man:despecle function works. |
272 | :) |
273 | -declare %ann:nondeterministic function local:test-despeckle() as xs:boolean { |
274 | +declare %an:nondeterministic function local:test-despeckle() as xs:boolean { |
275 | let $despeckled := man:despeckle($local:jpg) |
276 | let $despeckled-ref := file:read-binary(concat($local:image-dir, "manipulation/despeckledBird.jpg")) |
277 | return basic:equals($despeckled, $despeckled-ref) |
278 | @@ -50,7 +50,7 @@ |
279 | (:~ |
280 | : @return true if the man:despecle function works. |
281 | :) |
282 | -declare %ann:nondeterministic function local:test-enhance() as xs:boolean { |
283 | +declare %an:nondeterministic function local:test-enhance() as xs:boolean { |
284 | let $enhanced := man:enhance(man:enhance($local:jpg)) |
285 | let $enhanced-ref := file:read-binary(concat($local:image-dir, "manipulation/enhancedBird.jpg")) |
286 | return basic:equals($enhanced, $enhanced-ref) |
287 | @@ -61,7 +61,7 @@ |
288 | (:~ |
289 | : @return true if the man:charcoal function works. |
290 | :) |
291 | -declare %ann:nondeterministic function local:test-charcoal() as xs:boolean { |
292 | +declare %an:nondeterministic function local:test-charcoal() as xs:boolean { |
293 | let $charcoaled := man:charcoal($local:jpg, 0.5, 0.5) |
294 | let $charcoaled-ref := file:read-binary(concat($local:image-dir, "manipulation/charcoaledBird.jpg")) |
295 | return basic:equals($charcoaled, $charcoaled-ref) |
296 | @@ -71,14 +71,14 @@ |
297 | (:~ |
298 | : @return true if the man:solarize function works. |
299 | :) |
300 | -declare %ann:nondeterministic function local:test-solarize() as xs:boolean { |
301 | +declare %an:nondeterministic function local:test-solarize() as xs:boolean { |
302 | let $solarized := man:solarize($local:jpg, 0.3) |
303 | let $solarized-ref := file:read-binary(concat($local:image-dir, "manipulation/solarizedBird.jpg")) |
304 | return basic:equals($solarized, $solarized-ref) |
305 | }; |
306 | |
307 | |
308 | -declare %ann:nondeterministic %ann:sequential function local:main() as xs:string* { |
309 | +declare %an:nondeterministic %an:sequential function local:main() as xs:string* { |
310 | |
311 | let $a := local:test-despeckle() |
312 | return |
313 | |
314 | === modified file 'test/Queries/image/manipulation_4.xq' |
315 | --- test/Queries/image/manipulation_4.xq 2011-07-03 23:37:25 +0000 |
316 | +++ test/Queries/image/manipulation_4.xq 2012-04-11 10:11:20 +0000 |
317 | @@ -8,7 +8,7 @@ |
318 | import module namespace man = 'http://www.zorba-xquery.com/modules/image/manipulation'; |
319 | import schema namespace image = 'http://www.zorba-xquery.com/modules/image/image'; |
320 | |
321 | -declare namespace ann = "http://www.zorba-xquery.com/annotations"; |
322 | +declare namespace an = "http://www.zorba-xquery.com/annotations"; |
323 | |
324 | declare variable $local:image-dir := fn:concat(file:dir-name(fn:static-base-uri()), "/images/"); |
325 | |
326 | @@ -38,7 +38,7 @@ |
327 | (:~ |
328 | : @return true if the man:stereo function works. |
329 | :) |
330 | -declare %ann:nondeterministic function local:test-stereo() as xs:boolean { |
331 | +declare %an:nondeterministic function local:test-stereo() as xs:boolean { |
332 | let $right-image := man:zoom($local:jpg, 0.9) |
333 | let $stereod := man:stereo($local:jpg, $right-image) |
334 | let $stereod-ref := file:read-binary(concat($local:image-dir, "manipulation/stereodBird.jpg")) |
335 | @@ -48,7 +48,7 @@ |
336 | (:~ |
337 | : @return true if the man:transparent function works. |
338 | :) |
339 | -declare %ann:nondeterministic function local:test-transparent() as xs:boolean { |
340 | +declare %an:nondeterministic function local:test-transparent() as xs:boolean { |
341 | let $transparented := man:transparent($local:gif, "#000000") |
342 | let $transparented-ref := file:read-binary(concat($local:image-dir, "manipulation/transparentedBird.gif")) |
343 | return basic:equals($transparented, $transparented-ref) |
344 | @@ -57,7 +57,7 @@ |
345 | (:~ |
346 | : @return true if the man:swirl function works. |
347 | :) |
348 | -declare %ann:nondeterministic function local:test-swirl() as xs:boolean { |
349 | +declare %an:nondeterministic function local:test-swirl() as xs:boolean { |
350 | let $swirled := man:swirl($local:gif, -500) |
351 | let $swirled-ref := file:read-binary(concat($local:image-dir, "manipulation/swirledBird.gif")) |
352 | return basic:equals($swirled, $swirled-ref) |
353 | @@ -66,7 +66,7 @@ |
354 | (:~ |
355 | : @return true if the man:reduce-noise function works. |
356 | :) |
357 | -declare %ann:nondeterministic function local:test-reduce-noise() as xs:boolean { |
358 | +declare %an:nondeterministic function local:test-reduce-noise() as xs:boolean { |
359 | let $reduced := man:reduce-noise($local:gif, -0.4) |
360 | let $reduced-ref := file:read-binary(concat($local:image-dir, "manipulation/reducedBird.gif")) |
361 | return basic:equals($reduced, $reduced-ref) |
362 | @@ -76,14 +76,14 @@ |
363 | (:~ |
364 | : @return true if the man:contrast function works. |
365 | :) |
366 | -declare %ann:nondeterministic function local:test-contrast() as xs:boolean { |
367 | +declare %an:nondeterministic function local:test-contrast() as xs:boolean { |
368 | let $contrasted := man:contrast($local:gif, 0.8) |
369 | let $contrasted-ref := file:read-binary(concat($local:image-dir, "manipulation/contrastedBird.gif")) |
370 | return basic:equals($contrasted, $contrasted-ref) |
371 | }; |
372 | |
373 | |
374 | -declare %ann:nondeterministic %ann:sequential function local:main() as xs:string* { |
375 | +declare %an:nondeterministic %an:sequential function local:main() as xs:string* { |
376 | |
377 | let $a := local:test-stereo() |
378 | return |
379 | |
380 | === modified file 'test/Queries/image/manipulation_5.xq' |
381 | --- test/Queries/image/manipulation_5.xq 2011-07-03 23:37:25 +0000 |
382 | +++ test/Queries/image/manipulation_5.xq 2012-04-11 10:11:20 +0000 |
383 | @@ -8,7 +8,7 @@ |
384 | import module namespace man = 'http://www.zorba-xquery.com/modules/image/manipulation'; |
385 | import schema namespace image = 'http://www.zorba-xquery.com/modules/image/image'; |
386 | |
387 | -declare namespace ann = "http://www.zorba-xquery.com/annotations"; |
388 | +declare namespace an = "http://www.zorba-xquery.com/annotations"; |
389 | |
390 | declare variable $local:image-dir := fn:concat(file:dir-name(fn:static-base-uri()), "/images/"); |
391 | |
392 | @@ -40,7 +40,7 @@ |
393 | (:~ |
394 | : @return true if the man:gamma function works. |
395 | :) |
396 | -declare %ann:nondeterministic function local:test-gamma() as xs:boolean { |
397 | +declare %an:nondeterministic function local:test-gamma() as xs:boolean { |
398 | let $gamma1 := man:gamma($local:gif, 1.8) |
399 | let $gamma1-ref := file:read-binary(concat($local:image-dir, "manipulation/gamma1Bird.gif")) |
400 | return basic:equals($gamma1, $gamma1-ref) |
401 | @@ -49,7 +49,7 @@ |
402 | (:~ |
403 | : @return true if the man:gamma with seperate values for each color (rgb) function works. |
404 | :) |
405 | -declare %ann:nondeterministic function local:test-gamma-rgb() as xs:boolean { |
406 | +declare %an:nondeterministic function local:test-gamma-rgb() as xs:boolean { |
407 | let $gamma2 := man:gamma($local:gif, 1.8, 4, 1) |
408 | let $gamma2-ref := file:read-binary(concat($local:image-dir, "manipulation/gamma2Bird.gif")) |
409 | return basic:equals($gamma2, $gamma2-ref) |
410 | @@ -58,7 +58,7 @@ |
411 | (:~ |
412 | : @return true if the man:implode function works. |
413 | :) |
414 | -declare %ann:nondeterministic function local:test-implode() as xs:boolean { |
415 | +declare %an:nondeterministic function local:test-implode() as xs:boolean { |
416 | let $implode := man:implode($local:gif, 0.6) |
417 | let $implode-ref := file:read-binary(concat($local:image-dir, "manipulation/implodeBird.gif")) |
418 | return basic:equals($implode, $implode-ref) |
419 | @@ -67,7 +67,7 @@ |
420 | (:~ |
421 | : @return true if the man:oil-paint function works. |
422 | :) |
423 | -declare %ann:nondeterministic function local:test-oil-paint() as xs:boolean { |
424 | +declare %an:nondeterministic function local:test-oil-paint() as xs:boolean { |
425 | let $oil-paint := man:oil-paint($local:gif, 0.6) |
426 | let $oil-paint-ref := file:read-binary(concat($local:image-dir, "manipulation/oilPaintBird.gif")) |
427 | return basic:equals($oil-paint, $oil-paint-ref) |
428 | @@ -76,7 +76,7 @@ |
429 | (:~ |
430 | : @return true if the man:watermark function works. |
431 | :) |
432 | -declare %ann:nondeterministic function local:test-watermark() as xs:boolean { |
433 | +declare %an:nondeterministic function local:test-watermark() as xs:boolean { |
434 | let $watermark := man:watermark($local:gif, $local:jpg) |
435 | let $watermark-ref := file:read-binary(concat($local:image-dir, "manipulation/watermarked.gif")) |
436 | return basic:equals($watermark, $watermark-ref) |
437 | @@ -84,7 +84,7 @@ |
438 | }; |
439 | |
440 | |
441 | -declare %ann:nondeterministic %ann:sequential function local:main() as xs:string* { |
442 | +declare %an:nondeterministic %an:sequential function local:main() as xs:string* { |
443 | |
444 | let $a := local:test-gamma() |
445 | return |
446 | |
447 | === modified file 'test/Queries/image/paint_1.xq' |
448 | --- test/Queries/image/paint_1.xq 2011-08-07 00:38:36 +0000 |
449 | +++ test/Queries/image/paint_1.xq 2012-04-11 10:11:20 +0000 |
450 | @@ -8,7 +8,7 @@ |
451 | import module namespace paint = 'http://www.zorba-xquery.com/modules/image/paint'; |
452 | import schema namespace image = 'http://www.zorba-xquery.com/modules/image/image'; |
453 | |
454 | -declare namespace ann = "http://www.zorba-xquery.com/annotations"; |
455 | +declare namespace an = "http://www.zorba-xquery.com/annotations"; |
456 | |
457 | declare variable $local:image-dir := fn:concat(file:dir-name(fn:static-base-uri()), "/images/"); |
458 | |
459 | @@ -38,20 +38,20 @@ |
460 | (:~ |
461 | : @return true if the man:draw-line function works. |
462 | :) |
463 | -declare %ann:nondeterministic function local:test-draw-line() as xs:boolean { |
464 | +declare %an:nondeterministic function local:test-draw-line() as xs:boolean { |
465 | let $draw := paint:paint($local:gif, <image:line><image:start><image:x>-20</image:x><image:y>-20</image:y></image:start><image:end><image:x>80</image:x><image:y>80</image:y></image:end></image:line>) |
466 | let $draw-ref := file:read-binary(concat($local:image-dir,"paint/line.gif")) |
467 | return basic:equals($draw, $draw-ref) |
468 | }; |
469 | |
470 | -declare %ann:nondeterministic function local:test-draw-line-color-red() { |
471 | +declare %an:nondeterministic function local:test-draw-line-color-red() { |
472 | let $draw := paint:paint($local:gif, <image:line><image:strokeColor>#6F0000</image:strokeColor><image:start><image:x>0</image:x><image:y>0</image:y></image:start><image:end><image:x>80</image:x><image:y>80</image:y></image:end></image:line>) |
473 | let $draw-ref := file:read-binary(concat($local:image-dir,"paint/redLine.gif")) |
474 | return basic:equals($draw, $draw-ref) |
475 | |
476 | }; |
477 | |
478 | -declare %ann:nondeterministic function local:test-draw-line-color-green() { |
479 | +declare %an:nondeterministic function local:test-draw-line-color-green() { |
480 | let $draw := paint:paint($local:gif, <image:line><image:strokeColor>#006F00</image:strokeColor><image:start><image:x>0</image:x><image:y>0</image:y></image:start><image:end><image:x>80</image:x><image:y>80</image:y></image:end></image:line>) |
481 | |
482 | let $draw-ref := file:read-binary(concat($local:image-dir,"paint/greenLine.gif")) |
483 | @@ -59,14 +59,14 @@ |
484 | |
485 | }; |
486 | |
487 | -declare %ann:nondeterministic function local:test-draw-line-color-blue() { |
488 | +declare %an:nondeterministic function local:test-draw-line-color-blue() { |
489 | let $draw := paint:paint($local:gif, <image:line><image:strokeColor>#00006F</image:strokeColor><image:start><image:x>0</image:x><image:y>0</image:y></image:start><image:end><image:x>80</image:x><image:y>80</image:y></image:end></image:line>) |
490 | let $draw-ref := file:read-binary(concat($local:image-dir,"paint/blueLine.gif")) |
491 | return basic:equals($draw, $draw-ref) |
492 | |
493 | }; |
494 | |
495 | -declare %ann:nondeterministic function local:test-stroke-width() { |
496 | +declare %an:nondeterministic function local:test-stroke-width() { |
497 | let $draw := paint:paint($local:gif, (<image:line><image:strokeWidth>10</image:strokeWidth><image:strokeColor>#000000</image:strokeColor><image:start><image:x>0</image:x><image:y>0</image:y></image:start><image:end><image:x>80</image:x><image:y>80</image:y></image:end></image:line>,<image:line><image:strokeColor>#FF00FF</image:strokeColor><image:start><image:x>30</image:x><image:y>0</image:y></image:start><image:end><image:x>70</image:x><image:y>90</image:y></image:end></image:line>)) |
498 | let $draw-ref := file:read-binary(concat($local:image-dir,"paint/wideLine.gif")) |
499 | return basic:equals($draw, $draw-ref) |
500 | @@ -76,7 +76,7 @@ |
501 | |
502 | |
503 | |
504 | -declare %ann:nondeterministic %ann:sequential function local:main() as xs:string* { |
505 | +declare %an:nondeterministic %an:sequential function local:main() as xs:string* { |
506 | |
507 | let $a := local:test-draw-line() |
508 | return |
509 | |
510 | === modified file 'test/Queries/image/paint_2.xq' |
511 | --- test/Queries/image/paint_2.xq 2011-08-07 00:38:36 +0000 |
512 | +++ test/Queries/image/paint_2.xq 2012-04-11 10:11:20 +0000 |
513 | @@ -8,7 +8,7 @@ |
514 | import module namespace paint = 'http://www.zorba-xquery.com/modules/image/paint'; |
515 | import schema namespace img = 'http://www.zorba-xquery.com/modules/image/image'; |
516 | |
517 | -declare namespace ann = "http://www.zorba-xquery.com/annotations"; |
518 | +declare namespace an = "http://www.zorba-xquery.com/annotations"; |
519 | |
520 | declare variable $local:image-dir := fn:concat(file:dir-name(fn:static-base-uri()), "/images/"); |
521 | |
522 | @@ -35,14 +35,14 @@ |
523 | }; |
524 | |
525 | |
526 | -declare %ann:nondeterministic function local:test-draw-poly-line() as xs:boolean |
527 | +declare %an:nondeterministic function local:test-draw-poly-line() as xs:boolean |
528 | { |
529 | let $draw := paint:paint($local:gif, <img:polyLine><img:point><img:x>10</img:x><img:y>10</img:y></img:point><img:point><img:x>40</img:x><img:y>80</img:y></img:point><img:point><img:x>50</img:x><img:y>30</img:y></img:point><img:point><img:x>200</img:x><img:y>200</img:y></img:point></img:polyLine>) |
530 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/polyLine.gif")) |
531 | return basic:equals($draw, $draw-ref) |
532 | }; |
533 | |
534 | -declare %ann:nondeterministic function local:test-draw-poly-line-anti-aliased() as xs:boolean |
535 | +declare %an:nondeterministic function local:test-draw-poly-line-anti-aliased() as xs:boolean |
536 | { |
537 | let $draw := paint:paint($local:gif, <img:polyLine><img:antiAliasing>true</img:antiAliasing><img:point><img:x>10</img:x><img:y>10</img:y></img:point><img:point><img:x>40</img:x><img:y>80</img:y></img:point><img:point><img:x>50</img:x><img:y>30</img:y></img:point></img:polyLine>) |
538 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/polyLineAntiAliased.gif")) |
539 | @@ -53,7 +53,7 @@ |
540 | (:~ |
541 | : @return true if the man:draw-poly-line function works. |
542 | :) |
543 | -declare %ann:nondeterministic function local:test-draw-poly-line-red() as xs:boolean |
544 | +declare %an:nondeterministic function local:test-draw-poly-line-red() as xs:boolean |
545 | { |
546 | let $draw := paint:paint($local:gif, <img:polyLine><img:strokeColor>#FF0000</img:strokeColor><img:antiAliasing>true</img:antiAliasing><img:point><img:x>10</img:x><img:y>10</img:y></img:point><img:point><img:x>40</img:x><img:y>80</img:y></img:point><img:point><img:x>50</img:x><img:y>30</img:y></img:point></img:polyLine>) |
547 | |
548 | @@ -65,7 +65,7 @@ |
549 | (:~ |
550 | : @return true if the man:draw-poly-line function works. |
551 | :) |
552 | -declare %ann:nondeterministic function local:test-draw-poly-line-wide() as xs:boolean { |
553 | +declare %an:nondeterministic function local:test-draw-poly-line-wide() as xs:boolean { |
554 | let $draw := paint:paint($local:gif, <img:polyLine><img:strokeWidth>5</img:strokeWidth><img:antiAliasing>true</img:antiAliasing><img:point><img:x>10</img:x><img:y>10</img:y></img:point><img:point><img:x>40</img:x><img:y>80</img:y></img:point><img:point><img:x>50</img:x><img:y>30</img:y></img:point></img:polyLine>) |
555 | |
556 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/polyLineWide.gif")) |
557 | @@ -74,7 +74,7 @@ |
558 | |
559 | |
560 | |
561 | -declare %ann:nondeterministic %ann:sequential function local:main() as xs:string* { |
562 | +declare %an:nondeterministic %an:sequential function local:main() as xs:string* { |
563 | |
564 | |
565 | let $a := local:test-draw-poly-line() |
566 | |
567 | === modified file 'test/Queries/image/paint_3.xq' |
568 | --- test/Queries/image/paint_3.xq 2011-08-07 00:38:36 +0000 |
569 | +++ test/Queries/image/paint_3.xq 2012-04-11 10:11:20 +0000 |
570 | @@ -8,7 +8,7 @@ |
571 | import module namespace paint = 'http://www.zorba-xquery.com/modules/image/paint'; |
572 | import schema namespace img = 'http://www.zorba-xquery.com/modules/image/image'; |
573 | |
574 | -declare namespace ann = "http://www.zorba-xquery.com/annotations"; |
575 | +declare namespace an = "http://www.zorba-xquery.com/annotations"; |
576 | |
577 | declare variable $local:image-dir := fn:concat(file:dir-name(fn:static-base-uri()), "/images/"); |
578 | |
579 | @@ -38,7 +38,7 @@ |
580 | (:~ |
581 | : @return true if the man:draw-stroked-poly-line function works. |
582 | :) |
583 | -declare %ann:nondeterministic function local:test-draw-stroked-poly-line() as xs:boolean { |
584 | +declare %an:nondeterministic function local:test-draw-stroked-poly-line() as xs:boolean { |
585 | let $draw := paint:paint($local:gif, <img:strokedPolyLine><img:point><img:x>10</img:x><img:y>10</img:y></img:point><img:point><img:x>40</img:x><img:y>80</img:y></img:point><img:point><img:x>50</img:x><img:y>30</img:y></img:point><img:strokeLength>5</img:strokeLength><img:gapLength>2</img:gapLength></img:strokedPolyLine>) |
586 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/polyLineStroked.gif")) |
587 | return basic:equals($draw, $draw-ref) |
588 | @@ -48,7 +48,7 @@ |
589 | (:~ |
590 | : @return true if the man:draw-stroked-poly-line function works. |
591 | :) |
592 | -declare %ann:nondeterministic function local:test-draw-stroked-poly-line-blue() as xs:boolean { |
593 | +declare %an:nondeterministic function local:test-draw-stroked-poly-line-blue() as xs:boolean { |
594 | let $draw := paint:paint($local:gif, <img:strokedPolyLine><img:strokeColor>#0000FF</img:strokeColor><img:point><img:x>10</img:x><img:y>10</img:y></img:point><img:point><img:x>40</img:x><img:y>80</img:y></img:point><img:point><img:x>50</img:x><img:y>30</img:y></img:point><img:strokeLength>5</img:strokeLength><img:gapLength>2</img:gapLength></img:strokedPolyLine>) |
595 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/polyLineStrokedBlue.gif")) |
596 | return basic:equals($draw, $draw-ref) |
597 | @@ -57,7 +57,7 @@ |
598 | (:~ |
599 | : @return true if the man:draw-stroked-poly-line function works. |
600 | :) |
601 | -declare %ann:nondeterministic function local:test-draw-stroked-poly-line-wide() as xs:boolean { |
602 | +declare %an:nondeterministic function local:test-draw-stroked-poly-line-wide() as xs:boolean { |
603 | let $draw := paint:paint($local:gif, <img:strokedPolyLine><img:strokeWidth>4</img:strokeWidth><img:point><img:x>10</img:x><img:y>10</img:y></img:point><img:point><img:x>40</img:x><img:y>80</img:y></img:point><img:point><img:x>50</img:x><img:y>30</img:y></img:point><img:strokeLength>5</img:strokeLength><img:gapLength>2</img:gapLength></img:strokedPolyLine>) |
604 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/polyLineStrokedWide.gif")) |
605 | return basic:equals($draw, $draw-ref) |
606 | @@ -66,13 +66,13 @@ |
607 | (:~ |
608 | : @return true if the man:draw-stroked-poly-line function works. |
609 | :) |
610 | -declare %ann:nondeterministic function local:test-draw-stroked-poly-line-anti-aliased() as xs:boolean { |
611 | +declare %an:nondeterministic function local:test-draw-stroked-poly-line-anti-aliased() as xs:boolean { |
612 | let $draw := paint:paint($local:gif, <img:strokedPolyLine><img:antiAliasing>true</img:antiAliasing><img:point><img:x>10</img:x><img:y>10</img:y></img:point><img:point><img:x>40</img:x><img:y>80</img:y></img:point><img:point><img:x>50</img:x><img:y>30</img:y></img:point><img:strokeLength>5</img:strokeLength><img:gapLength>2</img:gapLength></img:strokedPolyLine>) |
613 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/polyLineStrokedAntiAliased.gif")) |
614 | return basic:equals($draw, $draw-ref) |
615 | }; |
616 | |
617 | -declare %ann:nondeterministic %ann:sequential function local:main() as xs:string* { |
618 | +declare %an:nondeterministic %an:sequential function local:main() as xs:string* { |
619 | |
620 | let $a := local:test-draw-stroked-poly-line() |
621 | return |
622 | |
623 | === modified file 'test/Queries/image/paint_4.xq' |
624 | --- test/Queries/image/paint_4.xq 2011-08-07 00:38:36 +0000 |
625 | +++ test/Queries/image/paint_4.xq 2012-04-11 10:11:20 +0000 |
626 | @@ -8,7 +8,7 @@ |
627 | import module namespace paint = 'http://www.zorba-xquery.com/modules/image/paint'; |
628 | import schema namespace image = 'http://www.zorba-xquery.com/modules/image/image'; |
629 | |
630 | -declare namespace ann = "http://www.zorba-xquery.com/annotations"; |
631 | +declare namespace an = "http://www.zorba-xquery.com/annotations"; |
632 | |
633 | declare variable $local:image-dir := fn:concat(file:dir-name(fn:static-base-uri()), "/images/"); |
634 | |
635 | @@ -38,7 +38,7 @@ |
636 | (:~ |
637 | : @return true if the man:draw-rectangle function works. |
638 | :) |
639 | -declare %ann:nondeterministic function local:test-draw-rectangle() as xs:boolean { |
640 | +declare %an:nondeterministic function local:test-draw-rectangle() as xs:boolean { |
641 | let $draw := paint:paint($local:gif, <image:rectangle><image:upperLeft><image:x>20</image:x><image:y>20</image:y></image:upperLeft><image:lowerRight><image:x>50</image:x><image:y>50</image:y></image:lowerRight></image:rectangle>) |
642 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/rectangle.gif")) |
643 | return basic:equals($draw, $draw-ref) |
644 | @@ -47,7 +47,7 @@ |
645 | (:~ |
646 | : @return true if the man:draw-rectangle function works. |
647 | :) |
648 | -declare %ann:nondeterministic function local:test-draw-rectangle-green() as xs:boolean { |
649 | +declare %an:nondeterministic function local:test-draw-rectangle-green() as xs:boolean { |
650 | let $draw := paint:paint($local:gif, <image:rectangle><image:strokeColor>#00AF00</image:strokeColor><image:upperLeft><image:x>20</image:x><image:y>20</image:y></image:upperLeft><image:lowerRight><image:x>50</image:x><image:y>50</image:y></image:lowerRight></image:rectangle>) |
651 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/rectangleGreen.gif")) |
652 | return basic:equals($draw, $draw-ref) |
653 | @@ -57,7 +57,7 @@ |
654 | (:~ |
655 | : @return true if the man:draw-rectangle function works. |
656 | :) |
657 | -declare %ann:nondeterministic function local:test-draw-rectangle-green-red() as xs:boolean { |
658 | +declare %an:nondeterministic function local:test-draw-rectangle-green-red() as xs:boolean { |
659 | let $draw := paint:paint($local:gif, <image:rectangle><image:strokeColor>#00AF00</image:strokeColor><image:fillColor>#A10000</image:fillColor><image:upperLeft><image:x>20</image:x><image:y>20</image:y></image:upperLeft><image:lowerRight><image:x>50</image:x><image:y>50</image:y></image:lowerRight></image:rectangle>) |
660 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/rectangleGreenRed.gif")) |
661 | return basic:equals($draw, $draw-ref) |
662 | @@ -67,7 +67,7 @@ |
663 | (:~ |
664 | : @return true if the man:draw-rectangle function works. |
665 | :) |
666 | -declare %ann:nondeterministic function local:test-draw-rectangle-anti-aliased() as xs:boolean { |
667 | +declare %an:nondeterministic function local:test-draw-rectangle-anti-aliased() as xs:boolean { |
668 | let $draw := paint:paint($local:gif, <image:rectangle><image:strokeWidth>5</image:strokeWidth><image:strokeColor>#00AF00</image:strokeColor><image:fillColor>#A10000</image:fillColor><image:antiAliasing>true</image:antiAliasing><image:upperLeft><image:x>20</image:x><image:y>20</image:y></image:upperLeft><image:lowerRight><image:x>50</image:x><image:y>50</image:y></image:lowerRight></image:rectangle>) |
669 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/rectangleAntiAliased.gif")) |
670 | return basic:equals($draw, $draw-ref) |
671 | @@ -76,7 +76,7 @@ |
672 | (:~ |
673 | : @return true if the man:draw-rounded-rectangle function works. |
674 | :) |
675 | -declare %ann:nondeterministic function local:test-draw-rounded-rectangle() as xs:boolean { |
676 | +declare %an:nondeterministic function local:test-draw-rounded-rectangle() as xs:boolean { |
677 | let $draw := paint:paint($local:gif, <image:roundedRectangle><image:upperLeft><image:x>20</image:x><image:y>20</image:y></image:upperLeft><image:lowerRight><image:x>50</image:x><image:y>50</image:y></image:lowerRight><image:cornerWidth>10</image:cornerWidth><image:cornerHeight>10</image:cornerHeight></image:roundedRectangle>) |
678 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/rectangleRounded.gif")) |
679 | return basic:equals($draw, $draw-ref) |
680 | @@ -85,7 +85,7 @@ |
681 | (:~ |
682 | : @return true if the man:draw-rounded-rectangle function works. |
683 | :) |
684 | -declare %ann:nondeterministic function local:test-draw-rounded-rectangle-blue() as xs:boolean { |
685 | +declare %an:nondeterministic function local:test-draw-rounded-rectangle-blue() as xs:boolean { |
686 | let $draw := paint:paint($local:gif, <image:roundedRectangle><image:strokeColor>#0000FF</image:strokeColor><image:upperLeft><image:x>20</image:x><image:y>20</image:y></image:upperLeft><image:lowerRight><image:x>50</image:x><image:y>50</image:y></image:lowerRight><image:cornerWidth>10</image:cornerWidth><image:cornerHeight>10</image:cornerHeight></image:roundedRectangle>) |
687 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/rectangleRoundedBlue.gif")) |
688 | return basic:equals($draw, $draw-ref) |
689 | @@ -95,7 +95,7 @@ |
690 | (:~ |
691 | : @return true if the man:draw-rounded-rectangle function works. |
692 | :) |
693 | -declare %ann:nondeterministic function local:test-draw-rounded-rectangle-blue-green() as xs:boolean { |
694 | +declare %an:nondeterministic function local:test-draw-rounded-rectangle-blue-green() as xs:boolean { |
695 | let $draw := paint:paint($local:gif, <image:roundedRectangle><image:strokeColor>#0000FF</image:strokeColor><image:fillColor>#00FF00</image:fillColor><image:upperLeft><image:x>20</image:x><image:y>20</image:y></image:upperLeft><image:lowerRight><image:x>50</image:x><image:y>50</image:y></image:lowerRight><image:cornerWidth>10</image:cornerWidth><image:cornerHeight>10</image:cornerHeight></image:roundedRectangle>) |
696 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/rectangleRoundedBlueGreen.gif")) |
697 | return basic:equals($draw, $draw-ref) |
698 | @@ -105,14 +105,14 @@ |
699 | (:~ |
700 | : @return true if the man:draw-rounded-rectangle function works. |
701 | :) |
702 | -declare %ann:nondeterministic function local:test-draw-rounded-rectangle-anti-aliased() as xs:boolean { |
703 | +declare %an:nondeterministic function local:test-draw-rounded-rectangle-anti-aliased() as xs:boolean { |
704 | let $draw := paint:paint($local:gif, <image:roundedRectangle><image:strokeColor>#0000FF</image:strokeColor><image:fillColor>#00FF00</image:fillColor><image:antiAliasing>true</image:antiAliasing><image:upperLeft><image:x>20</image:x><image:y>20</image:y></image:upperLeft><image:lowerRight><image:x>50</image:x><image:y>50</image:y></image:lowerRight><image:cornerWidth>10</image:cornerWidth><image:cornerHeight>10</image:cornerHeight></image:roundedRectangle>) |
705 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/rectangleRoundedAntiAliased.gif")) |
706 | return basic:equals($draw, $draw-ref) |
707 | }; |
708 | |
709 | |
710 | -declare %ann:nondeterministic %ann:sequential function local:main() as xs:string* { |
711 | +declare %an:nondeterministic %an:sequential function local:main() as xs:string* { |
712 | |
713 | let $a := local:test-draw-rectangle() |
714 | return |
715 | |
716 | === modified file 'test/Queries/image/paint_5.xq' |
717 | --- test/Queries/image/paint_5.xq 2011-08-07 00:38:36 +0000 |
718 | +++ test/Queries/image/paint_5.xq 2012-04-11 10:11:20 +0000 |
719 | @@ -8,7 +8,7 @@ |
720 | import module namespace paint = 'http://www.zorba-xquery.com/modules/image/paint'; |
721 | import schema namespace image = 'http://www.zorba-xquery.com/modules/image/image'; |
722 | |
723 | -declare namespace ann = "http://www.zorba-xquery.com/annotations"; |
724 | +declare namespace an = "http://www.zorba-xquery.com/annotations"; |
725 | |
726 | declare variable $local:image-dir := fn:concat(file:dir-name(fn:static-base-uri()), "/images/"); |
727 | |
728 | @@ -39,7 +39,7 @@ |
729 | (:~ |
730 | : @return true if the man:draw-circle function works. |
731 | :) |
732 | -declare %ann:nondeterministic function local:test-draw-circle() as xs:boolean { |
733 | +declare %an:nondeterministic function local:test-draw-circle() as xs:boolean { |
734 | let $draw := paint:paint($local:jpg, <image:circle><image:origin><image:x>20</image:x><image:y>20</image:y></image:origin><image:perimeter>5</image:perimeter></image:circle>) |
735 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/circle.jpg")) |
736 | return basic:equals($draw, $draw-ref) |
737 | @@ -49,7 +49,7 @@ |
738 | (:~ |
739 | : @return true if the man:draw-ellipse function works. |
740 | :) |
741 | -declare %ann:nondeterministic function local:test-draw-ellipse() as xs:boolean { |
742 | +declare %an:nondeterministic function local:test-draw-ellipse() as xs:boolean { |
743 | let $draw := paint:paint($local:jpg, <image:ellipse><image:origin><image:x>50</image:x><image:y>50</image:y></image:origin><image:perimeterX>30</image:perimeterX><image:perimeterY>20</image:perimeterY></image:ellipse>) |
744 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/ellipse.jpg")) |
745 | return basic:equals($draw, $draw-ref) |
746 | @@ -58,7 +58,7 @@ |
747 | (:~ |
748 | : @return true if the man:draw-arc function works. |
749 | :) |
750 | -declare %ann:nondeterministic function local:test-draw-arc() as xs:boolean { |
751 | +declare %an:nondeterministic function local:test-draw-arc() as xs:boolean { |
752 | let $draw := paint:paint($local:jpg, <image:arc><image:origin><image:x>50</image:x><image:y>50</image:y></image:origin><image:perimeterX>10</image:perimeterX><image:perimeterY>20</image:perimeterY><image:startDegrees>180</image:startDegrees><image:endDegrees>270</image:endDegrees></image:arc>) |
753 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/arc.jpg")) |
754 | return basic:equals($draw, $draw-ref) |
755 | @@ -67,7 +67,7 @@ |
756 | (:~ |
757 | : @return true if the man:draw-arc function works. |
758 | :) |
759 | -declare %ann:nondeterministic function local:test-draw-red-arc() as xs:boolean { |
760 | +declare %an:nondeterministic function local:test-draw-red-arc() as xs:boolean { |
761 | let $draw := paint:paint($local:jpg, <image:arc><image:strokeColor>#FF0000</image:strokeColor><image:origin><image:x>50</image:x><image:y>50</image:y></image:origin><image:perimeterX>10</image:perimeterX><image:perimeterY>20</image:perimeterY><image:startDegrees>180</image:startDegrees><image:endDegrees>270</image:endDegrees></image:arc>) |
762 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/arcRed.jpg")) |
763 | return basic:equals($draw, $draw-ref) |
764 | @@ -76,7 +76,7 @@ |
765 | (:~ |
766 | : @return true if the man:draw-arc function works. |
767 | :) |
768 | -declare %ann:nondeterministic function local:test-draw-red-green-arc() as xs:boolean { |
769 | +declare %an:nondeterministic function local:test-draw-red-green-arc() as xs:boolean { |
770 | let $draw := paint:paint($local:jpg, <image:arc><image:strokeColor>#FF0000</image:strokeColor><image:fillColor>#00AF00</image:fillColor><image:origin><image:x>50</image:x><image:y>50</image:y></image:origin><image:perimeterX>10</image:perimeterX><image:perimeterY>20</image:perimeterY><image:startDegrees>180</image:startDegrees><image:endDegrees>270</image:endDegrees></image:arc>) |
771 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/arcRedGreen.jpg")) |
772 | return basic:equals($draw, $draw-ref) |
773 | @@ -85,7 +85,7 @@ |
774 | (:~ |
775 | : @return true if the man:draw-arc function works. |
776 | :) |
777 | -declare %ann:nondeterministic function local:test-draw-wide-arc() as xs:boolean { |
778 | +declare %an:nondeterministic function local:test-draw-wide-arc() as xs:boolean { |
779 | let $draw := paint:paint($local:jpg, <image:arc><image:strokeWidth>5</image:strokeWidth><image:strokeColor>#FF0000</image:strokeColor><image:fillColor>#00AF00</image:fillColor><image:origin><image:x>50</image:x><image:y>50</image:y></image:origin><image:perimeterX>10</image:perimeterX><image:perimeterY>20</image:perimeterY><image:startDegrees>180</image:startDegrees><image:endDegrees>270</image:endDegrees></image:arc>) |
780 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/arcWide.jpg")) |
781 | return basic:equals($draw, $draw-ref) |
782 | @@ -96,7 +96,7 @@ |
783 | (:~ |
784 | : @return true if the man:draw-arc function works. |
785 | :) |
786 | -declare %ann:nondeterministic function local:test-draw-anti-aliased-arc() as xs:boolean { |
787 | +declare %an:nondeterministic function local:test-draw-anti-aliased-arc() as xs:boolean { |
788 | let $draw := paint:paint($local:jpg, <image:arc><image:strokeWidth>5</image:strokeWidth><image:strokeColor>#FF0000</image:strokeColor><image:fillColor>#00AF00</image:fillColor><image:antiAliasing>true</image:antiAliasing><image:origin><image:x>50</image:x><image:y>50</image:y></image:origin><image:perimeterX>10</image:perimeterX><image:perimeterY>20</image:perimeterY><image:startDegrees>180</image:startDegrees><image:endDegrees>270</image:endDegrees></image:arc>) |
789 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/arcAntiAliased.jpg")) |
790 | return basic:equals($draw, $draw-ref) |
791 | @@ -106,7 +106,7 @@ |
792 | |
793 | |
794 | |
795 | -declare %ann:nondeterministic %ann:sequential function local:main() as xs:string* { |
796 | +declare %an:nondeterministic %an:sequential function local:main() as xs:string* { |
797 | |
798 | let $a := local:test-draw-circle() |
799 | return |
800 | |
801 | === modified file 'test/Queries/image/paint_6.xq' |
802 | --- test/Queries/image/paint_6.xq 2011-08-07 00:38:36 +0000 |
803 | +++ test/Queries/image/paint_6.xq 2012-04-11 10:11:20 +0000 |
804 | @@ -8,7 +8,7 @@ |
805 | import module namespace paint = 'http://www.zorba-xquery.com/modules/image/paint'; |
806 | import schema namespace image = 'http://www.zorba-xquery.com/modules/image/image'; |
807 | |
808 | -declare namespace ann = "http://www.zorba-xquery.com/annotations"; |
809 | +declare namespace an = "http://www.zorba-xquery.com/annotations"; |
810 | |
811 | declare variable $local:image-dir := fn:concat(file:dir-name(fn:static-base-uri()), "/images/"); |
812 | declare variable $local:jpg as xs:base64Binary := basic:create(xs:unsignedInt(100), xs:unsignedInt(100), image:imageFormat("JPEG")); |
813 | @@ -36,7 +36,7 @@ |
814 | (:~ |
815 | : @return true if the man:draw-polygon function works. |
816 | :) |
817 | -declare %ann:nondeterministic function local:test-draw-polygon() as xs:boolean { |
818 | +declare %an:nondeterministic function local:test-draw-polygon() as xs:boolean { |
819 | let $draw := paint:paint($local:jpg, <image:polygon><image:point><image:x>10</image:x><image:y>10</image:y></image:point><image:point><image:x>40</image:x><image:y>80</image:y></image:point><image:point><image:x>50</image:x><image:y>30</image:y></image:point></image:polygon>) |
820 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/polygon.jpg")) |
821 | return basic:equals($draw, $draw-ref) |
822 | @@ -45,7 +45,7 @@ |
823 | (:~ |
824 | : @return true if the man:draw-polygon function works. |
825 | :) |
826 | -declare %ann:nondeterministic function local:test-draw-polygon-red() as xs:boolean { |
827 | +declare %an:nondeterministic function local:test-draw-polygon-red() as xs:boolean { |
828 | let $draw := paint:paint($local:jpg, <image:polygon><image:strokeColor>#FF0000</image:strokeColor><image:point><image:x>10</image:x><image:y>10</image:y></image:point><image:point><image:x>40</image:x><image:y>80</image:y></image:point><image:point><image:x>50</image:x><image:y>30</image:y></image:point></image:polygon>) |
829 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/polygonRed.jpg")) |
830 | return basic:equals($draw, $draw-ref) |
831 | @@ -54,7 +54,7 @@ |
832 | (:~ |
833 | : @return true if the man:draw-polygon function works. |
834 | :) |
835 | -declare %ann:nondeterministic function local:test-draw-polygon-red-green() as xs:boolean { |
836 | +declare %an:nondeterministic function local:test-draw-polygon-red-green() as xs:boolean { |
837 | let $draw := paint:paint($local:jpg, <image:polygon><image:strokeColor>#FF0000</image:strokeColor><image:fillColor>#00FF00</image:fillColor><image:point><image:x>10</image:x><image:y>10</image:y></image:point><image:point><image:x>40</image:x><image:y>80</image:y></image:point><image:point><image:x>50</image:x><image:y>30</image:y></image:point></image:polygon>) |
838 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/polygonRedGreen.jpg")) |
839 | return basic:equals($draw, $draw-ref) |
840 | @@ -63,7 +63,7 @@ |
841 | (:~ |
842 | : @return true if the man:draw-polygon function works. |
843 | :) |
844 | -declare %ann:nondeterministic function local:test-draw-polygon-wide() as xs:boolean { |
845 | +declare %an:nondeterministic function local:test-draw-polygon-wide() as xs:boolean { |
846 | let $draw := paint:paint($local:jpg, <image:polygon><image:strokeWidth>3</image:strokeWidth><image:strokeColor>#FF0000</image:strokeColor><image:fillColor>#00FF00</image:fillColor><image:point><image:x>10</image:x><image:y>10</image:y></image:point><image:point><image:x>40</image:x><image:y>80</image:y></image:point><image:point><image:x>50</image:x><image:y>30</image:y></image:point></image:polygon>) |
847 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/polygonWide.jpg")) |
848 | return basic:equals($draw, $draw-ref) |
849 | @@ -73,14 +73,14 @@ |
850 | (:~ |
851 | : @return true if the man:draw-polygon function works. |
852 | :) |
853 | -declare %ann:nondeterministic function local:test-draw-polygon-anti-aliased() as xs:boolean { |
854 | +declare %an:nondeterministic function local:test-draw-polygon-anti-aliased() as xs:boolean { |
855 | let $draw := paint:paint($local:jpg, <image:polygon><image:strokeWidth>3</image:strokeWidth><image:strokeColor>#FF0000</image:strokeColor><image:fillColor>#00FF00</image:fillColor><image:antiAliasing>true</image:antiAliasing><image:point><image:x>10</image:x><image:y>10</image:y></image:point><image:point><image:x>40</image:x><image:y>80</image:y></image:point><image:point><image:x>50</image:x><image:y>30</image:y></image:point></image:polygon>) |
856 | let $draw-ref := file:read-binary(concat($local:image-dir, "paint/polygonAntiAliased.jpg")) |
857 | return basic:equals($draw, $draw-ref) |
858 | }; |
859 | |
860 | |
861 | -declare %ann:nondeterministic %ann:sequential function local:main() as xs:string* { |
862 | +declare %an:nondeterministic %an:sequential function local:main() as xs:string* { |
863 | |
864 | let $a := local:test-draw-polygon() |
865 | return |
Validation queue starting for merge proposal. zorbatest. lambda. nu:8080/ remotequeue/ bug-978722_ image-2012- 04-11T11- 53-19.907Z/ log.html
Log at: http://