;## String tests ## print "Hello ^"World" ;<- with escaped char multiline-string: { bla bla "bla" {bla} } char-a: #"a" escaped-a: #"^(61)" new-line: #"^/" ;## Binaries ## print decompress 64#{eJzLSM3JyQcABiwCFQUAAAA=} ;2#{0000 00000} ;<- this one is invalid! 2#{} #{FF00} ;##Date + time ## 1-Feb-2009 1-Feb-2009/2:24:46+1:0 1:0 1:1:1 -0:1.1 ;## Tuple ## red: 255.0.0 red-with-alpha: 255.0.0.100 ;## url!, file! and email! ## aaa@bbb.cz http:// dns:// tcp://127.0.0.1 %/c/rebol/ %"c:\Program Files\" %/c/Program%20Files/ to-rebol-file "c:\Program Files\" suffix? %bla.swf ;## Money ## $1 -$1.2 USA$100 ;## Tag! ## ;## Pair! ## 10x200 ;## Issue! ## type? #ff0000 ;== issue! ;## some numbers ## to integer! (1 + (x / 4.5) * 1E-4) ;## some spec comments comment now comment 10 comment { bla bla } comment [ quit ] ;## other tests ## ---: 1 x/(1 + n)/y b/:1 ;## and... REBOL [ purpose: { reads css file and creates html from it so one can see how the styles looks like } ] style: %default out: rejoin [{ Pygments style: } style {.css 
}]
css: read/lines join style %.css
foreach line css [
    parse line [".syntax ." copy c to " " thru "/*" copy t to "*/" to end (
        append out rejoin ["" t "^/"])
    ]
]
write join style %.html join out "
" halt