[Truffle] Can we fold yet?

jruby · Jul 11, 2015 · d7d14d1 · d7d14d1
1 parent 34c3d90
commit d7d14d1
Showing 1 changed file with 37 additions and 0 deletions.
diff --git a/test/truffle/can-we-fold-yet.rb b/test/truffle/can-we-fold-yet.rb
@@ -0,0 +1,37 @@
+# Copyright (c) 2015 Oracle and/or its affiliates. All rights reserved. This
+# code is released under a tri EPL/GPL/LGPL license. You can use it,
+# redistribute it and/or modify it under the terms of the:
+# 
+# Eclipse Public License version 1.0
+# GNU General Public License version 2
+# GNU Lesser General Public License version 2.1
+
+unless Truffle.graal?
+  puts 'You need Graal to run this'
+  exit
+end
+
+puts 'Can Truffle constant fold yet?'
+
+loop do
+  print "> "
+  code = gets
+
+  test_thread = Thread.new do
+    begin
+      eval "loop { Truffle::Primitive.assert_constant #{code}; Truffle::Primitive.assert_not_compiled; Thread.pass }"
+    rescue RubyTruffleError => e
+      if e.message.include? 'Truffle::Primitive.assert_not_compiled'
+        puts "Yes! Truffle can constant fold this to #{eval(code).inspect}"
+      elsif e.message.include? 'Truffle::Primitive.assert_constant'
+        puts "No :( Truffle can't constant fold that"
+      else
+        puts "There was an error executing that :("
+      end
+    end
+  end
+
+  unless test_thread.join(5)
+    puts "That timed out :( either it takes too long to execute it or to compile it"
+  end
+end