fly/fgdata
1
0
Fork 0
Code Activity

new isnan() that doesn't create a NaN itself

Browse source
This commit is contained in:
mfranz 2009-03-21 18:17:59 +00:00
parent 54691b8309
commit 53e733d425
1 changed files with 6 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
Nasal/debug.nas
View file

@ -251,8 +251,7 @@ var backtrace = func(desc = nil) {
var d = desc == nil ? "" : " '" ~ desc ~ "'"; var d = desc == nil ? "" : " '" ~ desc ~ "'";
print("\n" ~ _title("\n### backtrace" ~ d ~ " ###")); print("\n" ~ _title("\n### backtrace" ~ d ~ " ###"));
for (var i = 1; 1; i += 1) { for (var i = 1; 1; i += 1) {
v = caller(i); if ((var v = caller(i)) == nil)
if (v == nil)
return; return;
print(_section(sprintf("#%-2d called from %s, line %s:", i - 1, v[2], v[3]))); print(_section(sprintf("#%-2d called from %s, line %s:", i - 1, v[2], v[3])));
dump(v[0]); dump(v[0]);
@ -288,7 +287,7 @@ var proptrace = func(root = "/", frames = 2) {
# Executes function fn "repeat" times and prints execution time in seconds. Examples: # Executes function fn "repeat" times and prints execution time in seconds. Examples:
# #
# var test = func { getprop("/sim/aircraft"); } # var test = func { getprop("/sim/aircraft"); }
# debug.benchmark("test()/2", test, 1000); # debug.benchmark("test()/1", test, 1000);
# debug.benchmark("test()/2", func setprop("/sim/aircraft", ""), 1000); # debug.benchmark("test()/2", func setprop("/sim/aircraft", ""), 1000);
# #
var benchmark = func(label, fn, repeat = 1) { var benchmark = func(label, fn, repeat = 1) {
@ -332,8 +331,10 @@ var warn = func(msg, level = 0) {
} }
# var isnan = (func { var nan = 1 / 0; func(d) num(d) == nil ? nil : d == nan; })(); var isnan = func(v) {
call(func math.sin(v), nil, var err = []);
return !!size(err);
}
# --prop:debug=1 enables debug mode with additional warnings # --prop:debug=1 enables debug mode with additional warnings