Permalink
Browse files

Add a few sample scripts

  • Loading branch information...
1 parent 3885b37 commit 0b421697816f18feed4635c5bf81b540528362c2 Evan Phoenix committed Feb 5, 2011
Showing with 14 additions and 0 deletions.
  1. +12 −0 sample/benchmark.st
  2. +2 −0 sample/simple.st
View
@@ -0,0 +1,12 @@
+Blah define ; add: x to: y ; as: [
+ x + y
+].
+
+self import: 'benchmark'.
+res := Benchmark ~measure: [
+ self print: 'in measure'.
+ 10000000 ~times: [ :i |
+ Blah new add: 8 to: 4
+ ]
+].
+Kernel ~puts: res
View
@@ -0,0 +1,2 @@
+self print: 'Hello'.
+self print: 'World'

0 comments on commit 0b42169

Please sign in to comment.