~ubuntu-branches/ubuntu/edgy/ess/edgy

« back to all changes in this revision

Viewing changes to lisp/ess-web.nw

  • Committer: Bazaar Package Importer
  • Author(s): Camm Maguire
  • Date: 2005-03-22 13:48:07 UTC
  • mfrom: (1.2.1 upstream) (2.1.2 hoary)
  • Revision ID: james.westby@ubuntu.com-20050322134807-9mpmbb799jugf248
Tags: 5.2.6-1
* New upstream release
* chmod -R u+w on orig source

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
\section{ess-web: Interface from ESS to Noweb}
2
 
\label{sec:ess:noweb}
3
 
 
4
 
 
5
 
<<ess-web.el>>=
6
 
(require 'noweb-mode)
7
 
<<chunk extraction methods>>
8
 
<<noweb/ess interface methods>>
9
 
(provide 'ess-web)
10
 
@ %def ess-web.el
11
 
 
12
 
<<chunk extraction methods>>=
13
 
<<extract chunk method>>
14
 
<<locate chunk-at-point>>
15
 
@
16
 
 
17
 
<<extract chunk method>>=
18
 
(defun ess-noweb-extract-chunk (chunk-name)
19
 
 <<if [[chunk-name]] not valid then exit>>
20
 
 <<extract [[chunk-name]] into [[temp-buf]]>>
21
 
 <<dump [[temp-buf]] into a relevant process>>
22
 
 <<return status results>>
23
 
 )
24
 
@ %def ess-noweb-extract-chunk
25
 
 
26
 
 
27
 
<<extract chunk at point>>=
28
 
(defun ess-noweb-extract-chunk-at-point ()
29
 
 (interactive)
30
 
 <<determine [[chunk-name]] at point>>
31
 
 (ess-noweb-extract-chunk chunk-name)
32
 
)
33
 
@ %def ess-noweb-extract-chunk-at-point
34
 
 
35
 
Consider binding the above to [[C-c C-C]] (for [[dump-chunk]]).
36
 
 
37
 
 
38
 
%%% Local Variables: ***
39
 
%%% noweb-code-mode: emacs-lisp-mode ***
40
 
%%% End: ***