From e366d25a857faa9617122e20b1f362ff79b08699 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Thu, 12 Mar 2009 08:15:39 +0000 Subject: [PATCH] better example for splice svn: r14068 --- collects/tests/scribble/text/i11.ss | 10 ++++++++-- collects/tests/scribble/text/o11.txt | 7 +++++-- 2 files changed, 13 insertions(+), 4 deletions(-) diff --git a/collects/tests/scribble/text/i11.ss b/collects/tests/scribble/text/i11.ss index f3788aa5fd..558c6a224e 100644 --- a/collects/tests/scribble/text/i11.ss +++ b/collects/tests/scribble/text/i11.ss @@ -1,7 +1,13 @@ #!/bin/env mzscheme #lang scribble/text +@(define (block x) + @splice{{ + blah(@x); + }}) + start - @splice{x y - z} + @splice{foo(); + loop:} + @list{if (something) @block{stuff}} end diff --git a/collects/tests/scribble/text/o11.txt b/collects/tests/scribble/text/o11.txt index 1a91ed7b09..46bef0f064 100644 --- a/collects/tests/scribble/text/o11.txt +++ b/collects/tests/scribble/text/o11.txt @@ -1,4 +1,7 @@ start - x y -z + foo(); +loop: + if (something) { + blah(stuff); + } end