From 45a37bdae46f0c3d68b250bb0ba37aad9da7e14a Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Thu, 2 Oct 1997 20:42:15 -0700
Subject: [PATCH] bugfix
Rev: src/testsuite.in:1.57
---
src/testsuite.in | 18 ++++++++++--------
1 file changed, 10 insertions(+), 8 deletions(-)
diff --git a/src/testsuite.in b/src/testsuite.in
index 4c55135a4d..5f66f92a71 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,4 +1,4 @@
-test_true([["$Id: testsuite.in,v 1.56 1997/10/03 02:25:37 hubbe Exp $"]])
+test_true([["$Id: testsuite.in,v 1.57 1997/10/03 03:42:15 hubbe Exp $"]])
test_eq(1e1,10.0)
test_eq(1E1,10.0)
test_eq(1e+1,10.0)
@@ -960,13 +960,15 @@ test_any(int e;string t=""; for(e=0;e<10;e++) switch(e) { default: t+=e; case 4.
test_any([[float e,q; q=0.0; for(e=0.1;e<10.0;e+=1.0) switch(e) { default: q+=e; case 4.0..8.0: } return q]],0.1+1.1+2.1+3.1+8.1+9.1)
// testing preprocessor
-test_any(int e; object o=clone(Stdio.File); if(!o->open("conftest.h","wct")) return -1; e=o->write("return 17;\n"); if(!o->close()) return -1; return e,11)
-test_any([[
-#include "conftest.h"
-]],17)
-dnltest_any([[
-dnl#include <conftest.h>
-dnl]],17)
+test_program([[
+#include <simulate.h>
+mixed a() { return explode ; }
+]])
+test_program([[
+#include "lib/include/simulate.h"
+mixed a() { return implode; }
+]])
+
test_true(intp(__LINE__))
test_true(stringp(__FILE__))
test_true(stringp(__DATE__))
--
GitLab