pike.git/
src/
testsuite.in
Branch:
Tag:
Non-build tags
All tags
No tags
2000-03-09
2000-03-09 15:55:32 by Henrik Grubbström (Grubba) <grubba@grubba.org>
da26fe234047b930a2f03c3fe4b805394e90fce6 (
10
lines) (+
9
/-
1
)
[
Show
|
Annotate
]
Branch:
7.9
Added a few tests of this_program.
Rev: src/testsuite.in:1.283
1:
dnl -*- Pike -*-
-
test_true([["$Id: testsuite.in,v 1.
282
2000/03/
07
21
:
22
:
54
hubbe
Exp $"]]);
+
test_true([["$Id: testsuite.in,v 1.
283
2000/03/
09
15
:
55
:
32
grubba
Exp $"]]);
cond([[all_constants()->_verify_internals]], [[
217:
} ]])
+
dnl
+
dnl this_program
+
dnl
+
test_true(this_program)
+
test_any([[int this_program; return this_program;]], 0)
+
test_true(class A { int a() { return this_program == A; }}; return A()->a();)
+
dnl test_compile_error(0()) test_compile_error(1()) test_compile_error(""())