FUNCTION: findfloat, $98
FUNCTION: checkextension, $99
-; todo support other crap
+FUNCTION: test #0
+ FLOAT: x, 100
+ FLOAT: y, 200
+
+ FLOAT: r_mul
+ FLOAT: r_div
+ FLOAT: r_add
+ FLOAT: r_sub
+
+ MUL_V x,y,r_mul
+ DIV_V x,y,r_div
+ ADD_V x,y,r_add
+ SUV_V x,y,r_sub
+
+ STORE_V r_mul
+ CALL0 dprint
+
+ STORE_V
+END