You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
15 lines
409 B
Racket
15 lines
409 B
Racket
#lang debug racket/base
|
|
(require "compile.rkt" "render.rkt" "quad.rkt" racket/string)
|
|
|
|
(define drawing-insts (parameterize ([current-wrap-width 6])
|
|
(quad-compile-to-stack "Hello this is the earth")))
|
|
|
|
(displayln (string-replace drawing-insts "\n" " "))
|
|
|
|
(render-to-text drawing-insts)
|
|
|
|
(render-to-bitmap drawing-insts)
|
|
|
|
#;(render-to-html drawing-insts)
|
|
|
|
#;(render-to-pdf drawing-insts) |