blob: 2996cc849fb628d4f37b300e6b926031354e4d2c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
(frame :width 100.
(prog (source :language bigloo :file "prgm.skb" :definition 'fib)))
(p [The Fibonacci function is defined line ,(ref :line "fib").])
;!start
(frame :width 100.
(prog :line 21 :mark #f
(source :language skribe :file "prgm.skb" :start 20 :stop 27)))
;!stop
(p [Here is the source of the frame above:])
(frame :width 100.
(prog :line 30 :mark #f
(source :language skribe :file "src/prgm2.skb"
:start ";!start"
:stop ";!stop")))
|
