added schemeerror and used it
svn: r8223 original commit: 7f3a5c13c2218af5b87e2d27700f1cd863bc320a
This commit is contained in:
parent
02d7f7f54a
commit
fed85187e3
|
@ -227,6 +227,7 @@
|
|||
schemeblockelem
|
||||
schemeinput
|
||||
schememod
|
||||
schemeerror
|
||||
scheme SCHEME scheme/form schemeresult schemeid schememodname
|
||||
defmodule defmodule* defmodulelang defmodulelang*
|
||||
defmodule*/no-declare defmodulelang*/no-declare
|
||||
|
@ -305,6 +306,9 @@
|
|||
(define (link url . str)
|
||||
(make-element (make-target-url url) (decode-content str)))
|
||||
|
||||
(define (schemeerror . str)
|
||||
(make-element "schemeerror" (decode-content str)))
|
||||
|
||||
(provide t)
|
||||
(define (t . str)
|
||||
(decode-paragraph str))
|
||||
|
|
Loading…
Reference in New Issue
Block a user