File: test_require.sl

package info (click to toggle)
slang2 2.3.3-5
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 11,488 kB
  • sloc: ansic: 101,756; sh: 3,435; makefile: 1,046; pascal: 440
file content (20 lines) | stat: -rw-r--r-- 275 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
() = evalfile ("./common.sl");

require ("./common.sl", "r");
require ("common", "s", "./common.sl");

define slsh_main ()
{
   try
     {
	r->start_test ("require");
	s->end_test ();
	exit (0);
     }
   catch AnyError:
     {
	failed ("require");
     }
   end_test ();
}