File: test_sysconf.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 (34 lines) | stat: -rw-r--r-- 692 bytes parent folder | download | duplicates (5)
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
() = evalfile ("./test.sl");
require ("sysconf");

define slsh_main ()
{
   variable names = sysconf_names (), name, val;

   foreach name (names)
     {
	val = sysconf (name);
     }
   if (7 != sysconf ("FOOBAR_BAZ", 7))
     failed ("sysconf FOOBAR_BAZ with default");

   names = pathconf_names ();

   variable fd = fileno (stdin);
   foreach name (names)
     {
	val = pathconf (stdin, name);
	val = pathconf (fd, name);
	val = pathconf ("/", name);
	%vmessage ("%S=%S", name, val);
     }

   names = confstr_names ();
   foreach name (names)
     {
	val = confstr (name);
     }
   if ("xxyyzz" != confstr ("FOOBAR_BAZ", "xxyyzz"))
     failed ("confstr FOOBAR_BAZ with default");
}