AtomicDo.fss

Revision 1831, 0.9 kB (checked in by nbeckman, 6 months ago)
Simple field accesses, and now we are checking the expressions in a block before the last one for void-ness.

Line
1	(*******************************************************************************
2	Copyright 2008 Sun Microsystems, Inc.,
3	4150 Network Circle, Santa Clara, California 95054, U.S.A.
4	All rights reserved.
5
6	U.S. Government Rights - Commercial software.
7	Government users are subject to the Sun Microsystems, Inc. standard
8	license agreement and applicable provisions of the FAR and its supplements.
9
10	Use is subject to license terms.
11
12	This distribution may include materials developed by third parties.
13
14	Sun, Sun Microsystems, the Sun logo and Java are trademarks or registered
15	trademarks of Sun Microsystems, Inc. in the U.S. and other countries.
16	******************************************************************************)
17
18	component AtomicDo
19	export Executable
20
21	(* Atomic block has type of its body. *)
22
23	run(args:String...):() = do
24
25	ignore(atomic do
26	ignore(0)
27	true
28	end as Boolean)
29	()
30
31	end
32
33	end

Note: See TracBrowser for help on using the browser.