add codepict sample
parent
4a195ef050
commit
5b8d5ec2cb
@ -0,0 +1,12 @@
|
||||
#lang at-exp racket
|
||||
(require pict/code)
|
||||
(codeblock-pict
|
||||
#:keep-lang-line? #f
|
||||
@string-append|{
|
||||
#lang br/demo/jsonic
|
||||
{
|
||||
"string": @$(string-append "foo" "bar")$@,
|
||||
"array": @$(range 5)$@,
|
||||
"object": @$(hash "k1" "valstring" (format "~a" 42) (hash "k1" (range 10) "k2" 42))$@
|
||||
// "bar" :
|
||||
}|)
|
Loading…
Reference in New Issue