]> ocean-lang.org Git - ocean/blobdiff - csrc/oceani-tests.mdc
oceani: remove all UNTESTED again.
[ocean] / csrc / oceani-tests.mdc
index 4e9f4e388ea123f0c457c97830f6818df8db799f..fdf55038638216831a5ab2161cb57d13044fbe37 100644 (file)
@@ -686,6 +686,15 @@ Test functions.  They don't return anything, so we need to get them to print
                angular := to_polar(32, 23)
                print angular.rho, angular.theta
 
+       func test2(n:number; s:string;) : (ret:number)
+               ret = n + $s
+
+       func random
+       return
+               n:number
+       do
+               n = 4 // xkcd:221
+
 ###### output: functions
        done
        1  done