RosettaCodeData/Task/Singleton/OxygenBasic/singleton.oxy

15 lines
183 B
Text
Raw Permalink Normal View History

2013-04-11 01:07:29 -07:00
class singleton
static sys a,b,c
static string s,t,u
static double x,y,z
end class
'TEST
'====
singleton A
singleton B
A.c=3
print B.c 'result 3
print sizeof B 'result 0