URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [gdb-5.0/] [gdb/] [testsuite/] [gdb.base/] [bitops.exp] - Blame information for rev 1765

Details | Compare with Previous | View Log


# Copyright (C) 1998 Free Software Foundation, Inc.
 
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 
# Please email any bugs, comments, and/or additions to this file to:
# bug-gdb@prep.ai.mit.edu
 
# This file was written by Elena Zannoni (ezannoni@cygnus.com)
 
# This file is part of the gdb testsuite
#
# tests expressions with bitwise operators, and some
# logical operators
# Does not use a target program
#
 
 
if $tracelevel then {
        strace $tracelevel
        }
 
#
# test running programs
#
set prms_id 0
set bug_id 0
 
 
gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
 
 
send_gdb "print !1\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of !1"
      }
    -re ".*$gdb_prompt $" { fail "print value of !1" }
    timeout           { fail "(timeout) print value of !1" }
  }
 
 
send_gdb "print !0\n"
gdb_expect {
    -re ".\[0-9\]* = 1.*$gdb_prompt $" {
        pass "print value of !0"
      }
    -re ".*$gdb_prompt $" { fail "print value of !0" }
    timeout           { fail "(timeout) print value of !0" }
  }
 
 
send_gdb "print !100\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of !100"
      }
    -re ".*$gdb_prompt $" { fail "print value of !100" }
    timeout           { fail "(timeout) print value of !100" }
  }
 
 
send_gdb "print !1000\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of !1000"
      }
    -re ".*$gdb_prompt $" { fail "print value of !1000" }
    timeout           { fail "(timeout) print value of !1000" }
  }
 
 
send_gdb "print !10\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of !10"
      }
    -re ".*$gdb_prompt $" { fail "print value of !10" }
    timeout           { fail "(timeout) print value of !10" }
  }
 
 
send_gdb "print !2\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of !2 "
      }
    -re ".*$gdb_prompt $" { fail "print value of !2" }
    timeout           { fail "(timeout) print value of !2" }
  }
 
 
send_gdb "print 10 | 5\n"
gdb_expect {
    -re ".\[0-9\]* = 15.*$gdb_prompt $" {
        pass "print value of 10 | 5"
      }
    -re ".*$gdb_prompt $" { fail "print value of 10 | 5" }
    timeout           { fail "(timeout) print value of 10 | 5" }
  }
 
 
send_gdb "print 10 & 5\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of 10 & 5"
      }
    -re ".*$gdb_prompt $" { fail "print value of 10 & 5" }
    timeout           { fail "(timeout) print value of 10 & 5" }
  }
 
 
send_gdb "print 10 ^ 5\n"
gdb_expect {
    -re ".\[0-9\]* = 15.*$gdb_prompt $" {
        pass "print value of 10 ^ 5"
      }
    -re ".*$gdb_prompt $" { fail "print value of 10 ^ 5" }
    timeout           { fail "(timeout) print value of 10 ^ 5" }
  }
 
 
send_gdb "print -!0\n"
gdb_expect {
    -re ".\[0-9\]* = -1.*$gdb_prompt $" {
        pass "print value of -!0"
      }
    -re ".*$gdb_prompt $" { fail "print value of -!0" }
    timeout           { fail "(timeout) print value of -!0" }
  }
 
 
send_gdb "print ~-!0\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of ~-!0"
      }
    -re ".*$gdb_prompt $" { fail "print value of ~-!0" }
    timeout           { fail "(timeout) print value of ~-!0" }
  }
 
 
 
send_gdb "print 3 * 2 / 4.0 * 2.0\n"
gdb_expect {
    -re ".\[0-9\]* = 3.*$gdb_prompt $" {
        pass "print value of 3 * 2 / 4.0 * 2.0"
      }
    -re ".*$gdb_prompt $" { fail "print value of 3 * 2 / 4.0 * 2.0" }
    timeout           { fail "(timeout) print value of 3 * 2 / 4.0 * 2.0" }
  }
 
 
send_gdb "print 8 << 2 >> 4\n"
gdb_expect {
    -re ".\[0-9\]* = 2.*$gdb_prompt $" {
        pass "print value of 8 << 2 >> 4"
      }
    -re ".*$gdb_prompt $" { fail "print value of 8 << 2 >> 4" }
    timeout           { fail "(timeout) print value of 8 << 2 >> 4" }
  }
 
 
send_gdb "print -1 < 0 > 1\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of -1 < 0 > 1"
      }
    -re ".*$gdb_prompt $" { fail "print value of -1 < 0 > 1" }
    timeout           { fail "(timeout) print value of -1 < 0 > 1" }
  }
 
 
send_gdb "print 15 ^ 10 ^ 5 ^ 7\n"
gdb_expect {
    -re ".\[0-9\]* = 7.*$gdb_prompt $" {
        pass "print value of 15 ^ 10 ^ 5 ^ 7"
      }
    -re ".*$gdb_prompt $" { fail "print value of 15 ^ 10 ^ 5 ^ 7" }
    timeout           { fail "(timeout) print value of 15 ^ 10 ^ 5 ^ 7" }
  }
 
 
send_gdb "print 3.5 < 4.0\n"
gdb_expect {
    -re ".\[0-9\]* = 1.*$gdb_prompt $" {
        pass "print value of 3.5 < 4.0"
      }
    -re ".*$gdb_prompt $" { fail "print value of 3.5 < 4.0" }
    timeout           { fail "(timeout) print value of 3.5 < 4.0" }
  }
 
 
send_gdb "print 3.5 < -4.0\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of 3.5 < -4.0"
      }
    -re ".*$gdb_prompt $" { fail "print value of 3.5 < -4.0" }
    timeout           { fail "(timeout) print value of 3.5 < -4.0" }
  }
 
 
send_gdb "print 2 > -3\n"
gdb_expect {
    -re ".\[0-9\]* = 1.*$gdb_prompt $" {
        pass "print value of 2 > -3"
      }
    -re ".*$gdb_prompt $" { fail "print value of 2 > -3" }
    timeout           { fail "(timeout) print value of 2 > -3" }
  }
 
 
send_gdb "print -3>4\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of -3>4"
      }
    -re ".*$gdb_prompt $" { fail "print value of -3>4" }
    timeout           { fail "(timeout) print value of -3>4" }
  }
 
 
send_gdb "print (-3 > 4)\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of (-3 > 4)"
      }
    -re ".*$gdb_prompt $" { fail "print value of (-3 > 4)" }
    timeout           { fail "(timeout) print value of (-3 > 4)" }
  }
 
 
send_gdb "print 3>=2.5\n"
gdb_expect {
    -re ".\[0-9\]* = 1.*$gdb_prompt $" {
        pass "print value of 3>=2.5"
      }
    -re ".*$gdb_prompt $" { fail "print value of 3>=2.5" }
    timeout           { fail "(timeout) print value of 3>=2.5" }
  }
 
 
send_gdb "print 3>=4.5\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of 3>=4.5"
      }
    -re ".*$gdb_prompt $" { fail "print value of 3>=4.5" }
    timeout           { fail "(timeout) print value of 3>=4.5" }
  }
 
 
send_gdb "print 3==3.0\n"
gdb_expect {
    -re ".\[0-9\]* = 1.*$gdb_prompt $" {
        pass "print value of 3==3.0"
      }
    -re ".*$gdb_prompt $" { fail "print value of 3==3.0" }
    timeout           { fail "(timeout) print value of 3==3.0" }
  }
 
 
send_gdb "print 3==4.0\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of 3==4.0"
      }
    -re ".*$gdb_prompt $" { fail "print value of 3==4.0" }
    timeout           { fail "(timeout) print value of 3==4.0" }
  }
 
 
send_gdb "print 3!=3.0\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of 3!=3.0"
      }
    -re ".*$gdb_prompt $" { fail "print value of 3!=3.0" }
    timeout           { fail "(timeout) print value of 3!=3.0" }
  }
 
 
send_gdb "print 3!=5.0\n"
gdb_expect {
    -re ".\[0-9\]* = 1.*$gdb_prompt $" {
        pass "print value of 3!=5.0"
      }
    -re ".*$gdb_prompt $" { fail "print value of 3!=5.0" }
    timeout           { fail "(timeout) print value of 3!=5.0" }
  }
 
 
send_gdb "print 0 || 1 && 0 | 0 ^ 0 == 8 > 128 >>1 +2 *2\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of 0 || 1 && 0 | 0 ^ 0 == 8 > 128 >>1 +2 *2"
      }
    -re ".*$gdb_prompt $" { fail "print value of 0 || 1 && 0 | 0 ^ 0 == 8 > 128 >>1 +2 *2" }
    timeout           { fail "(timeout) print value of 0 || 1 && 0 | 0 ^ 0 == 8 > 128 >>1 +2 *2" }
  }
 
 
send_gdb "print 1.0 || 0\n"
gdb_expect {
    -re ".\[0-9\]* = 1.*$gdb_prompt $" {
        pass "print value of 1.0 || 0"
      }
    -re ".*$gdb_prompt $" { fail "print value of 1.0 || 0" }
    timeout           { fail "(timeout) print value of 1.0 || 0" }
  }
 
 
send_gdb "print 0.0 || 1.0\n"
gdb_expect {
    -re ".\[0-9\]* = 1.*$gdb_prompt $" {
        pass "print value of 0.0 || 1.0"
      }
    -re ".*$gdb_prompt $" { fail "print value of 0.0 || 1.0" }
    timeout           { fail "(timeout) print value of 0.0 || 1.0" }
  }
 
 
send_gdb "print 0.0 || 0\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of 0.0 || 0"
      }
    -re ".*$gdb_prompt $" { fail "print value of 0.0 || 0" }
    timeout           { fail "(timeout) print value of 0.0 || 0" }
  }
 
 
send_gdb "print 0 || 1 && 0 | 0 ^ 0 == 8\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of 0 || 1 && 0 | 0 ^ 0 == 8"
      }
    -re ".*$gdb_prompt $" { fail "print value of 0 || 1 && 0 | 0 ^ 0 == 8" }
    timeout           { fail "(timeout) print value of 0 || 1 && 0 | 0 ^ 0 == 8" }
  }
 
 
send_gdb "print 0 == 8 > 128 >> 1 + 2 * 2\n"
gdb_expect {
    -re ".\[0-9\]* = 0.*$gdb_prompt $" {
        pass "print value of 0 == 8 > 128 >> 1 + 2 * 2"
      }
    -re ".*$gdb_prompt $" { fail "print value of 0 == 8 > 128 >> 1 + 2 * 2" }
    timeout           { fail "(timeout) print value of 0 == 8 > 128 >> 1 + 2 * 2" }
  }
 

Browse

Tools

Subversion Repositories or1k

[/] [or1k/] [trunk/] [gdb-5.0/] [gdb/] [testsuite/] [gdb.base/] [bitops.exp] - Blame information for rev 1765

Line No.	Rev	Author	Line
1	106	markom	`# Copyright (C) 1998 Free Software Foundation, Inc.`
2
3			`# This program is free software; you can redistribute it and/or modify`
4			`# it under the terms of the GNU General Public License as published by`
5			`# the Free Software Foundation; either version 2 of the License, or`
6			`# (at your option) any later version.`
7			`#`
8			`# This program is distributed in the hope that it will be useful,`
9			`# but WITHOUT ANY WARRANTY; without even the implied warranty of`
10			`# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the`
11			`# GNU General Public License for more details.`
12			`#`
13			`# You should have received a copy of the GNU General Public License`
14			`# along with this program; if not, write to the Free Software`
15			`# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.`
16
17			`# Please email any bugs, comments, and/or additions to this file to:`
18			`# bug-gdb@prep.ai.mit.edu`
19
20			`# This file was written by Elena Zannoni (ezannoni@cygnus.com)`
21
22			`# This file is part of the gdb testsuite`
23			`#`
24			`# tests expressions with bitwise operators, and some`
25			`# logical operators`
26			`# Does not use a target program`
27			`#`
28
29
30			`if $tracelevel then {`
31			`strace $tracelevel`
32			`}`
33
34			`#`
35			`# test running programs`
36			`#`
37			`set prms_id 0`
38			`set bug_id 0`
39
40
41			`gdb_exit`
42			`gdb_start`
43			`gdb_reinitialize_dir $srcdir/$subdir`
44
45
46			`send_gdb "print !1\n"`
47			`gdb_expect {`
48			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
49			`pass "print value of !1"`
50			`}`
51			`-re ".*$gdb_prompt $" { fail "print value of !1" }`
52			`timeout { fail "(timeout) print value of !1" }`
53			`}`
54
55
56			`send_gdb "print !0\n"`
57			`gdb_expect {`
58			`-re ".\[0-9\]* = 1.*$gdb_prompt $" {`
59			`pass "print value of !0"`
60			`}`
61			`-re ".*$gdb_prompt $" { fail "print value of !0" }`
62			`timeout { fail "(timeout) print value of !0" }`
63			`}`
64
65
66			`send_gdb "print !100\n"`
67			`gdb_expect {`
68			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
69			`pass "print value of !100"`
70			`}`
71			`-re ".*$gdb_prompt $" { fail "print value of !100" }`
72			`timeout { fail "(timeout) print value of !100" }`
73			`}`
74
75
76			`send_gdb "print !1000\n"`
77			`gdb_expect {`
78			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
79			`pass "print value of !1000"`
80			`}`
81			`-re ".*$gdb_prompt $" { fail "print value of !1000" }`
82			`timeout { fail "(timeout) print value of !1000" }`
83			`}`
84
85
86			`send_gdb "print !10\n"`
87			`gdb_expect {`
88			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
89			`pass "print value of !10"`
90			`}`
91			`-re ".*$gdb_prompt $" { fail "print value of !10" }`
92			`timeout { fail "(timeout) print value of !10" }`
93			`}`
94
95
96			`send_gdb "print !2\n"`
97			`gdb_expect {`
98			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
99			`pass "print value of !2 "`
100			`}`
101			`-re ".*$gdb_prompt $" { fail "print value of !2" }`
102			`timeout { fail "(timeout) print value of !2" }`
103			`}`
104
105
106			`send_gdb "print 10 \| 5\n"`
107			`gdb_expect {`
108			`-re ".\[0-9\]* = 15.*$gdb_prompt $" {`
109			`pass "print value of 10 \| 5"`
110			`}`
111			`-re ".*$gdb_prompt $" { fail "print value of 10 \| 5" }`
112			`timeout { fail "(timeout) print value of 10 \| 5" }`
113			`}`
114
115
116			`send_gdb "print 10 & 5\n"`
117			`gdb_expect {`
118			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
119			`pass "print value of 10 & 5"`
120			`}`
121			`-re ".*$gdb_prompt $" { fail "print value of 10 & 5" }`
122			`timeout { fail "(timeout) print value of 10 & 5" }`
123			`}`
124
125
126			`send_gdb "print 10 ^ 5\n"`
127			`gdb_expect {`
128			`-re ".\[0-9\]* = 15.*$gdb_prompt $" {`
129			`pass "print value of 10 ^ 5"`
130			`}`
131			`-re ".*$gdb_prompt $" { fail "print value of 10 ^ 5" }`
132			`timeout { fail "(timeout) print value of 10 ^ 5" }`
133			`}`
134
135
136			`send_gdb "print -!0\n"`
137			`gdb_expect {`
138			`-re ".\[0-9\]* = -1.*$gdb_prompt $" {`
139			`pass "print value of -!0"`
140			`}`
141			`-re ".*$gdb_prompt $" { fail "print value of -!0" }`
142			`timeout { fail "(timeout) print value of -!0" }`
143			`}`
144
145
146			`send_gdb "print ~-!0\n"`
147			`gdb_expect {`
148			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
149			`pass "print value of ~-!0"`
150			`}`
151			`-re ".*$gdb_prompt $" { fail "print value of ~-!0" }`
152			`timeout { fail "(timeout) print value of ~-!0" }`
153			`}`
154
155
156
157			`send_gdb "print 3 * 2 / 4.0 * 2.0\n"`
158			`gdb_expect {`
159			`-re ".\[0-9\]* = 3.*$gdb_prompt $" {`
160			`pass "print value of 3 * 2 / 4.0 * 2.0"`
161			`}`
162			`-re ".$gdb_prompt $" { fail "print value of 3 2 / 4.0 * 2.0" }`
163			`timeout { fail "(timeout) print value of 3 * 2 / 4.0 * 2.0" }`
164			`}`
165
166
167			`send_gdb "print 8 << 2 >> 4\n"`
168			`gdb_expect {`
169			`-re ".\[0-9\]* = 2.*$gdb_prompt $" {`
170			`pass "print value of 8 << 2 >> 4"`
171			`}`
172			`-re ".*$gdb_prompt $" { fail "print value of 8 << 2 >> 4" }`
173			`timeout { fail "(timeout) print value of 8 << 2 >> 4" }`
174			`}`
175
176
177			`send_gdb "print -1 < 0 > 1\n"`
178			`gdb_expect {`
179			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
180			`pass "print value of -1 < 0 > 1"`
181			`}`
182			`-re ".*$gdb_prompt $" { fail "print value of -1 < 0 > 1" }`
183			`timeout { fail "(timeout) print value of -1 < 0 > 1" }`
184			`}`
185
186
187			`send_gdb "print 15 ^ 10 ^ 5 ^ 7\n"`
188			`gdb_expect {`
189			`-re ".\[0-9\]* = 7.*$gdb_prompt $" {`
190			`pass "print value of 15 ^ 10 ^ 5 ^ 7"`
191			`}`
192			`-re ".*$gdb_prompt $" { fail "print value of 15 ^ 10 ^ 5 ^ 7" }`
193			`timeout { fail "(timeout) print value of 15 ^ 10 ^ 5 ^ 7" }`
194			`}`
195
196
197			`send_gdb "print 3.5 < 4.0\n"`
198			`gdb_expect {`
199			`-re ".\[0-9\]* = 1.*$gdb_prompt $" {`
200			`pass "print value of 3.5 < 4.0"`
201			`}`
202			`-re ".*$gdb_prompt $" { fail "print value of 3.5 < 4.0" }`
203			`timeout { fail "(timeout) print value of 3.5 < 4.0" }`
204			`}`
205
206
207			`send_gdb "print 3.5 < -4.0\n"`
208			`gdb_expect {`
209			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
210			`pass "print value of 3.5 < -4.0"`
211			`}`
212			`-re ".*$gdb_prompt $" { fail "print value of 3.5 < -4.0" }`
213			`timeout { fail "(timeout) print value of 3.5 < -4.0" }`
214			`}`
215
216
217			`send_gdb "print 2 > -3\n"`
218			`gdb_expect {`
219			`-re ".\[0-9\]* = 1.*$gdb_prompt $" {`
220			`pass "print value of 2 > -3"`
221			`}`
222			`-re ".*$gdb_prompt $" { fail "print value of 2 > -3" }`
223			`timeout { fail "(timeout) print value of 2 > -3" }`
224			`}`
225
226
227			`send_gdb "print -3>4\n"`
228			`gdb_expect {`
229			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
230			`pass "print value of -3>4"`
231			`}`
232			`-re ".*$gdb_prompt $" { fail "print value of -3>4" }`
233			`timeout { fail "(timeout) print value of -3>4" }`
234			`}`
235
236
237			`send_gdb "print (-3 > 4)\n"`
238			`gdb_expect {`
239			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
240			`pass "print value of (-3 > 4)"`
241			`}`
242			`-re ".*$gdb_prompt $" { fail "print value of (-3 > 4)" }`
243			`timeout { fail "(timeout) print value of (-3 > 4)" }`
244			`}`
245
246
247			`send_gdb "print 3>=2.5\n"`
248			`gdb_expect {`
249			`-re ".\[0-9\]* = 1.*$gdb_prompt $" {`
250			`pass "print value of 3>=2.5"`
251			`}`
252			`-re ".*$gdb_prompt $" { fail "print value of 3>=2.5" }`
253			`timeout { fail "(timeout) print value of 3>=2.5" }`
254			`}`
255
256
257			`send_gdb "print 3>=4.5\n"`
258			`gdb_expect {`
259			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
260			`pass "print value of 3>=4.5"`
261			`}`
262			`-re ".*$gdb_prompt $" { fail "print value of 3>=4.5" }`
263			`timeout { fail "(timeout) print value of 3>=4.5" }`
264			`}`
265
266
267			`send_gdb "print 3==3.0\n"`
268			`gdb_expect {`
269			`-re ".\[0-9\]* = 1.*$gdb_prompt $" {`
270			`pass "print value of 3==3.0"`
271			`}`
272			`-re ".*$gdb_prompt $" { fail "print value of 3==3.0" }`
273			`timeout { fail "(timeout) print value of 3==3.0" }`
274			`}`
275
276
277			`send_gdb "print 3==4.0\n"`
278			`gdb_expect {`
279			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
280			`pass "print value of 3==4.0"`
281			`}`
282			`-re ".*$gdb_prompt $" { fail "print value of 3==4.0" }`
283			`timeout { fail "(timeout) print value of 3==4.0" }`
284			`}`
285
286
287			`send_gdb "print 3!=3.0\n"`
288			`gdb_expect {`
289			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
290			`pass "print value of 3!=3.0"`
291			`}`
292			`-re ".*$gdb_prompt $" { fail "print value of 3!=3.0" }`
293			`timeout { fail "(timeout) print value of 3!=3.0" }`
294			`}`
295
296
297			`send_gdb "print 3!=5.0\n"`
298			`gdb_expect {`
299			`-re ".\[0-9\]* = 1.*$gdb_prompt $" {`
300			`pass "print value of 3!=5.0"`
301			`}`
302			`-re ".*$gdb_prompt $" { fail "print value of 3!=5.0" }`
303			`timeout { fail "(timeout) print value of 3!=5.0" }`
304			`}`
305
306
307			`send_gdb "print 0 \|\| 1 && 0 \| 0 ^ 0 == 8 > 128 >>1 +2 *2\n"`
308			`gdb_expect {`
309			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
310			`pass "print value of 0 \|\| 1 && 0 \| 0 ^ 0 == 8 > 128 >>1 +2 *2"`
311			`}`
312			`-re ".$gdb_prompt $" { fail "print value of 0 \|\| 1 && 0 \| 0 ^ 0 == 8 > 128 >>1 +2 2" }`
313			`timeout { fail "(timeout) print value of 0 \|\| 1 && 0 \| 0 ^ 0 == 8 > 128 >>1 +2 *2" }`
314			`}`
315
316
317			`send_gdb "print 1.0 \|\| 0\n"`
318			`gdb_expect {`
319			`-re ".\[0-9\]* = 1.*$gdb_prompt $" {`
320			`pass "print value of 1.0 \|\| 0"`
321			`}`
322			`-re ".*$gdb_prompt $" { fail "print value of 1.0 \|\| 0" }`
323			`timeout { fail "(timeout) print value of 1.0 \|\| 0" }`
324			`}`
325
326
327			`send_gdb "print 0.0 \|\| 1.0\n"`
328			`gdb_expect {`
329			`-re ".\[0-9\]* = 1.*$gdb_prompt $" {`
330			`pass "print value of 0.0 \|\| 1.0"`
331			`}`
332			`-re ".*$gdb_prompt $" { fail "print value of 0.0 \|\| 1.0" }`
333			`timeout { fail "(timeout) print value of 0.0 \|\| 1.0" }`
334			`}`
335
336
337			`send_gdb "print 0.0 \|\| 0\n"`
338			`gdb_expect {`
339			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
340			`pass "print value of 0.0 \|\| 0"`
341			`}`
342			`-re ".*$gdb_prompt $" { fail "print value of 0.0 \|\| 0" }`
343			`timeout { fail "(timeout) print value of 0.0 \|\| 0" }`
344			`}`
345
346
347			`send_gdb "print 0 \|\| 1 && 0 \| 0 ^ 0 == 8\n"`
348			`gdb_expect {`
349			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
350			`pass "print value of 0 \|\| 1 && 0 \| 0 ^ 0 == 8"`
351			`}`
352			`-re ".*$gdb_prompt $" { fail "print value of 0 \|\| 1 && 0 \| 0 ^ 0 == 8" }`
353			`timeout { fail "(timeout) print value of 0 \|\| 1 && 0 \| 0 ^ 0 == 8" }`
354			`}`
355
356
357			`send_gdb "print 0 == 8 > 128 >> 1 + 2 * 2\n"`
358			`gdb_expect {`
359			`-re ".\[0-9\]* = 0.*$gdb_prompt $" {`
360			`pass "print value of 0 == 8 > 128 >> 1 + 2 * 2"`
361			`}`
362			`-re ".$gdb_prompt $" { fail "print value of 0 == 8 > 128 >> 1 + 2 2" }`
363			`timeout { fail "(timeout) print value of 0 == 8 > 128 >> 1 + 2 * 2" }`
364			`}`
365