File: serializable2.bsh

package info (click to toggle)
bsh 2.0b4-15
  • links: PTS, VCS
  • area: main
  • in suites: jessie-kfreebsd
  • size: 4,212 kB
  • sloc: java: 23,430; xml: 4,500; sh: 139; makefile: 30
file content (37 lines) | stat: -rw-r--r-- 425 bytes parent folder | download | duplicates (11) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
 
#!/bin/java bsh.Interpreter

source("TestHarness.bsh");

booga=37;

foo( arg ) {
	goo=booga;
	run() {
		print("hello");
		return 42;
	}
	getBooga() {
		return booga;
	}
	getArg() {
		return arg;
	}
	return this;
}

f=foo( 5 );
save(f, "f.ser");

booga=12;

print("here1");
f2=load("f.ser");

assert( f2.run() == 42 );
assert( f2.getBooga() == 12 );
assert( f2.goo==37);
assert( f2.getArg() == 5 );

rm("f.ser");

complete();