Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
f8131ed2
Commit
f8131ed2
authored
Jun 01, 1993
by
Richard M. Stallman
Browse files
[!FLOAT_CHECK_ERRNO] (IN_FLOAT): New definition.
(Flog): Fix argument of `log'.
parent
9f717104
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
2 additions
and
1 deletion
+2
-1
src/floatfns.c
src/floatfns.c
+2
-1
No files found.
src/floatfns.c
View file @
f8131ed2
...
...
@@ -154,6 +154,7 @@ static char *float_error_fn_name;
} \
} while (0)
#else
#define IN_FLOAT(d, name, num) (in_float = 1, (d), in_float = 0)
#define IN_FLOAT2(d, name, num, num2) (in_float = 1, (d), in_float = 0)
#endif
...
...
@@ -471,7 +472,7 @@ If second optional argument BASE is given, return log ARG using that base.")
if
(
b
==
10
.
0
)
IN_FLOAT2
(
d
=
log10
(
d
),
"log"
,
arg
,
base
);
else
IN_FLOAT2
(
d
=
log
(
arg
)
/
log
(
b
),
"log"
,
arg
,
base
);
IN_FLOAT2
(
d
=
log
(
d
)
/
log
(
b
),
"log"
,
arg
,
base
);
}
return
make_float
(
d
);
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment