Skip to content

Instantly share code, notes, and snippets.

@earl
Created October 20, 2010 22:59
Show Gist options
  • Save earl/c3ef82f0b05dc1aea045 to your computer and use it in GitHub Desktop.
Save earl/c3ef82f0b05dc1aea045 to your computer and use it in GitHub Desktop.
0000000: 0a3b 3b20 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d .;; ============
0000010: 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d ================
0000020: 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d ================
0000030: 3d3d 3d3d 3d3d 3d3d 3d0d 0a3b 3b20 5363 =========..;; Sc
0000040: 7269 7074 3a20 7465 7374 2d66 7261 6d65 ript: test-frame
0000050: 776f 726b 2e72 0d0a 3b3b 2064 6f77 6e6c work.r..;; downl
0000060: 6f61 6465 6420 6672 6f6d 3a20 7777 772e oaded from: www.
0000070: 5245 424f 4c2e 6f72 670d 0a3b 3b20 6f6e REBOL.org..;; on
0000080: 3a20 3230 2d4f 6374 2d32 3031 300d 0a3b : 20-Oct-2010..;
0000090: 3b20 6174 3a20 3136 3a35 363a 3535 2055 ; at: 16:56:55 U
00000a0: 5443 0d0a 3b3b 206f 776e 6572 3a20 6c61 TC..;; owner: la
00000b0: 6469 736c 6176 205b 7363 7269 7074 206c dislav [script l
00000c0: 6962 7261 7279 206d 656d 6265 7220 7768 ibrary member wh
00000d0: 6f20 6361 6e20 7570 6461 7465 0d0a 3b3b o can update..;;
00000e0: 2074 6869 7320 7363 7269 7074 5d0d 0a3b this script]..;
00000f0: 3b20 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d ; ==============
0000100: 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d ================
0000110: 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d 3d3d ================
0000120: 3d3d 3d3d 3d3d 3d0d 0a52 6562 6f6c 205b =======..Rebol [
0000130: 0d0a 0954 6974 6c65 3a20 2254 6573 742d ...Title: "Test-
0000140: 6672 616d 6577 6f72 6b22 0d0a 0946 696c framework"...Fil
0000150: 653a 2025 7465 7374 2d66 7261 6d65 776f e: %test-framewo
0000160: 726b 2e72 0d0a 0941 7574 686f 723a 2022 rk.r...Author: "
0000170: 4c61 6469 736c 6176 204d 6563 6972 220d Ladislav Mecir".
0000180: 0a09 4461 7465 3a20 3230 2d4f 6374 2d32 ..Date: 20-Oct-2
0000190: 3031 302f 3230 3a30 372b 323a 3030 0d0a 010/20:07+2:00..
00001a0: 0950 7572 706f 7365 3a20 2254 6573 7420 .Purpose: "Test
00001b0: 6672 616d 6577 6f72 6b22 0d0a 5d0d 0a0d framework"..]...
00001c0: 0a6d 616b 6520 6f62 6a65 6374 2120 636f .make object! co
00001d0: 6d70 6f73 6520 5b0d 0a09 2875 6e6c 6573 mpose [...(unles
00001e0: 7320 7661 6c75 653f 2027 7472 616e 7363 s value? 'transc
00001f0: 6f64 6520 5b5b 7472 616e 7363 6f64 653a ode [[transcode:
0000200: 203a 6c6f 6164 5d5d 290d 0a0d 0a09 6c6f :load]]).....lo
0000210: 672d 6669 6c65 3a20 6e6f 6e65 0d0a 090d g-file: none....
0000220: 0a09 6c6f 673a 2066 756e 6320 5b72 6570 ..log: func [rep
0000230: 6f72 7420 5b62 6c6f 636b 215d 5d20 5b0d ort [block!]] [.
0000240: 0a09 0977 7269 7465 2f61 7070 656e 6420 ...write/append
; ...
0001650: 6720 5b0d 0a09 0909 225e 286c 696e 6529 g [....."^(line)
0001660: 546f 7461 6c3a 2022 2073 7563 6365 6564 Total: " succeed
0001670: 6564 202b 2066 6169 6c65 640d 0a09 0909 ed + failed.....
0001680: 2220 5375 6363 6565 6465 643a 2022 2073 " Succeeded: " s
0001690: 7563 6365 6564 6564 0d0a 0909 0922 2046 ucceeded....." F
00016a0: 6169 6c65 643a 2022 2066 6169 6c65 640d ailed: " failed.
00016b0: 0a09 095d 0d0a 0909 235b 756e 7365 7421 ...]....#[unset!
00016c0: 5d0d 0a09 5d0d 0a5d 0d0a 0a ]...]..]...
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment