test[tinn8] 70 win32

"Iterate folders searching for .ini files"
(FileSystemItem named: 'c:\windows') "recursiveDo:"do: [:item|
	(item name includes: '.ini') ifTrue: [ self note: item getFullPath ]
]

"SysInfo"
self note: 'System Directory=' ,SysInfo getSystemDirectory.
self note: 'Windows Directory=' ,SysInfo getSystemWindowsDirectory.
self note: 'Memory status=' ,SysInfo getMemoryStatus description.

"Processes"
"OSProcess processesDo: [:p| self print: p getImageName ]"
self note: 'OSProcess running #' ,OSProcess instances size.
"self note: 'OSProcess ids=' ,OSProcess ids asLiteral."