1/* l4.c -- trivial test library
2   Copyright (C) 1998-1999 Thomas Tanner <tanner@ffii.org>
3   This file is part of GNU Libtool.
4
5This program is free software; you can redistribute it and/or modify
6it under the terms of the GNU General Public License as published by
7the Free Software Foundation; either version 2 of the License, or
8(at your option) any later version.
9
10This program is distributed in the hope that it will be useful,
11but WITHOUT ANY WARRANTY; without even the implied warranty of
12MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13GNU General Public License for more details.
14
15You should have received a copy of the GNU General Public License
16along with this program; if not, write to the Free Software
17Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301
18USA. */
19
20#include "l4/l4.h"
21
22#include "l3/l3.h"
23#include <stdio.h>
24
25#ifdef HAVE_MATH_H
26#include <math.h>
27#endif
28
29int	var_l4 = 0;
30
31int
32func_l4(indent)
33    int indent;
34{
35  int i;
36
37  for (i = 0; i < indent; i++)
38    putchar(' ');
39  printf("l4 (%i)\n", var_l4);
40  func_l3(indent+1);
41  for (i = 0; i <= indent; i++)
42    putchar(' ');
43  printf("libm [sin(1.5) = %f]\n", sin(1.5));
44  var_l4 += var_l3;
45  return 0;
46}
47