relisp 1.0.1 → 1.1.0

Sign up to get free protection for your applications and to get access to all the features.
@@ -1,26 +0,0 @@
1
- $:.unshift File.join(File.dirname(__FILE__), "../../lib")
2
-
3
- require 'relisp'
4
-
5
- slave = Relisp::RubySlave.new
6
-
7
- def sample_ruby_method1
8
- elisp_eval("(+ 1 5)")
9
- end
10
-
11
- def sample_ruby_method2
12
- elisp_eval('(ruby-eval "(1 + 5)")')
13
- end
14
-
15
- def sample_ruby_method3
16
- Relisp::Buffer.new("ruby-created-buffer")
17
- end
18
-
19
- def sample_ruby_method4
20
- frame= Relisp::Frame.new({:width => 80, :height => 20, :name => "ruby frame"})
21
- frame.height
22
- frame.height=60
23
- frame.height
24
- end
25
-
26
- slave.start
@@ -1,27 +0,0 @@
1
- #!/usr/bin/env ruby
2
-
3
- $:.unshift File.join(File.dirname(__FILE__), "../../lib")
4
-
5
- require 'relisp'
6
-
7
- emacs = Relisp::ElispSlave.new
8
-
9
- # basic functionality
10
- puts emacs.elisp_eval("(+ 1 2)")
11
- puts (emacs.elisp_eval '(concat "two " "words")')
12
- puts emacs.concat("two", " words")
13
- puts emacs.*(5,2)
14
- puts emacs.create_file_buffer("blah.txt")
15
-
16
- # variable persistence between calls
17
- emacs.elisp_eval( "(setq new-var 23)")
18
- puts emacs.elisp_eval( "(+ 1 new-var)")
19
-
20
- # recursive calls
21
- puts emacs.elisp_eval( '(ruby-eval "1 + 3")')
22
-
23
- # wrappers around elisp editing data types
24
- buffer = Relisp::Buffer.new("ruby-created-buffer")
25
- puts buffer
26
- puts buffer.name
27
-