Up |
Return the list of 3d devices.
fun [] [[S S] r1]
Return : [[S S] r1] this list.
fun main ()=
_showconsole;
let MX3getDeviceList -> l in
while l != nil do
let hd l -> [a b] in
(
_fooS sprintf "%s %s" [a b];
set l = tl l;
);
0;;
The console could display this :
OpenGL OpenGL