diff options
| author | Ludovic Courtès | 2008-02-03 21:39:42 +0100 |
|---|---|---|
| committer | Ludovic Courtès | 2008-02-03 21:39:42 +0100 |
| commit | 71529195046227ccbecfd84d9492cc3a1f91f310 (patch) | |
| tree | 4299ef3eed651ad7135d19c025ffe6d50adbd891 /doc/user/src/prgm2.skb | |
| parent | d13911b6c6bac9fb3ad20d6cb39e2002759f8496 (diff) | |
| download | skribilo-71529195046227ccbecfd84d9492cc3a1f91f310.tar.gz skribilo-71529195046227ccbecfd84d9492cc3a1f91f310.tar.lz skribilo-71529195046227ccbecfd84d9492cc3a1f91f310.zip | |
doc: Improve chapter on computer program highlighting.
Diffstat (limited to 'doc/user/src/prgm2.skb')
| -rw-r--r-- | doc/user/src/prgm2.skb | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/doc/user/src/prgm2.skb b/doc/user/src/prgm2.skb index 2996cc8..8ba1bc3 100644 --- a/doc/user/src/prgm2.skb +++ b/doc/user/src/prgm2.skb @@ -1,7 +1,11 @@ +(use-modules (skribilo source lisp)) + +(linebreak) (frame :width 100. - (prog (source :language bigloo :file "prgm.skb" :definition 'fib))) + (prog (source :language scheme :file "prgm.skb" :definition 'fib))) -(p [The Fibonacci function is defined line ,(ref :line "fib").]) +(p [The Fibonacci function is defined on line ,(ref :line "fib").]) +(linebreak) ;!start (frame :width 100. @@ -10,9 +14,10 @@ ;!stop (p [Here is the source of the frame above:]) +(linebreak) (frame :width 100. (prog :line 30 :mark #f (source :language skribe :file "src/prgm2.skb" - :start ";!start" - :stop ";!stop"))) + :start (string-append ";" "!start") ;; trick! + :stop (string-append ";" "!stop")))) |