gloo 7.1 → 7.1.2

data/test.gloo/verbs/create.test.gloo

@@ -11,6 +11,31 @@ tests.verbs.create [can] :
       eval it = 'hello'
       assert "expected it to equal the created value"
 
+  here_box [can] :
+
+  create_with_a_here_path [test] :
+    description [string] : create takes a ^ path inside a script, like other verbs.
+    on_test [script] :
+      create ^^.here_box.made as string : 'made here'
+      eval tests.verbs.create.here_box.made = 'made here'
+      assert "expected ^^.here_box.made to be created"
+
+  create_with_a_one_level_here_path [test] :
+    description [string] : create ^.name makes a child of the script's parent (here, the test).
+    on_test [script] :
+      create ^.child_of_test as int : 3
+      eval tests.verbs.create.create_with_a_one_level_here_path.child_of_test = 3
+      assert "expected ^.child_of_test under the test"
+
+  create_with_a_context_path [test] :
+    description [string] : create takes an @ path, relative to the context.
+    on_test [script] :
+      context tests.verbs.create.here_box
+      create @.via_context as int : 5
+      context root
+      eval tests.verbs.create.here_box.via_context = 5
+      assert "expected @.via_context to be created in the context"
+
 tests.verbs.create_names [can] :
 
   err_fired [bool] : false

data/test.gloo/verbs/eval.test.gloo

@@ -15,3 +15,11 @@ tests.verbs.eval [can] :
 
       eval false
       refute "expected false to be false"
+
+  failed_expression_puts_false_in_it [test] :
+    description [string] : eval of an expression that fails puts false in it.
+    expect_errors [bool] : true
+    on_test [script] :
+      eval 1 + no_such_obj_xyz
+      eval it = false
+      assert "expected it to be false after a failed expression"

data/test.gloo/verbs/invoke.test.gloo

@@ -90,3 +90,53 @@ tests.verbs.invoke [can] :
       show invoke( tests.verbs.invoke.greet "Bob Smith" )
       eval it = "Hi, Bob Smith"
       assert "expected it to be 'Hi, Bob Smith'"
+
+  wrong_param_count_sets_it_false [test] :
+    description [string] : invoke with the wrong number of params puts false in it.
+    expect_errors [bool] : true
+    on_test [script] :
+      eval 'Hi'
+      invoke tests.verbs.invoke.add 1
+      eval it = false
+      assert "expected it to be false after a failed invoke"
+
+  shortcut_wrong_param_count_sets_it_false [test] :
+    description [string] : ~> with the wrong number of params puts false in it.
+    expect_errors [bool] : true
+    on_test [script] :
+      eval 'Hi'
+      ~> tests.verbs.invoke.add 1
+      eval it = false
+      assert "expected it to be false after a failed ~>"
+
+  not_a_function_sets_it_false [test] :
+    description [string] : invoke of something that isn't a function puts false in it.
+    expect_errors [bool] : true
+    on_test [script] :
+      eval 'Hi'
+      invoke tests.verbs.invoke.total
+      eval it = false
+      assert "expected it to be false after invoking a non-function"
+
+  missing_arg_object_is_an_error [test] :
+    description [string] : an argument naming a missing object fires on_error and puts false in it.
+    expect_errors [bool] : true
+    on_test [script] :
+      put false into ^^.err_fired
+      eval 'Hi'
+      invoke tests.verbs.invoke.add no_such_obj_xyz 4
+      eval it = false
+      assert "expected it to be false"
+      eval ^^.err_fired = true
+      assert "expected on_error to fire for the missing argument"
+
+  inline_failure_in_put_sets_it_false [test] :
+    description [string] : a failed invoke( ... ) inside put puts false in it.
+    expect_errors [bool] : true
+    on_test [script] :
+      put 5 into ^^.total
+      put invoke( tests.verbs.invoke.add 1 ) into ^^.total
+      eval it = false
+      assert "expected it to be false"
+      eval ^^.total = 5
+      assert "expected the target to keep its value"

data/test.gloo/verbs/load.test.gloo

@@ -13,6 +13,9 @@ tests.verbs.load [can] :
   # Scratch files live in the gloo tmp folder ($.gloo_tmp).
   on_load [script] :
     put $.gloo_tmp '/gloo_load_no_objects_test.gloo' into ^.f
+    put $.gloo_tmp ^.wild_name into ^.wild_dir
+    put ^.wild_dir '/wild_a.gloo' into ^.wild_a
+    put ^.wild_dir '/wild_b.gloo' into ^.wild_b
 
   comments_only [text] : BEGIN
 # This file has comments,
@@ -26,6 +29,10 @@ END
 
   computed_name [string] : /gloo_load_computed_test.gloo
   lib_name [string] : md
+  wild_name [string] : /gloo_load_wild_test
+  wild_dir [file] :
+  wild_a [file] :
+  wild_b [file] :
   computed_f [file] :
   computed_fixture [text] : BEGIN
 computed_demo [can] :
@@ -138,3 +145,30 @@ END
       assert "expected load lib ( expr ) not to fire on_error"
       exists? object markdown
       assert "expected the markdown type to be registered"
+
+  load_an_absolute_wildcard_path [test] :
+    description [string] : load {absolute folder}/* loads every .gloo file in the folder.
+    on_test [script] :
+      tell ^^.wild_dir to mkdir
+      tell ^^.wild_a to write ( 'wild_a [can] :' )
+      tell ^^.wild_b to write ( 'wild_b [can] :' )
+      load ( ^^.wild_dir '/*' )
+      exists? wild_a
+      assert "expected wild_a.gloo to be loaded"
+      exists? wild_b
+      assert "expected wild_b.gloo to be loaded"
+      tell wild_a to unload
+      tell wild_b to unload
+      tell ^^.wild_a to delete
+      tell ^^.wild_b to delete
+
+  load_a_full_path_without_the_extension [test] :
+    description [string] : load of a full path finds the .gloo file without the extension being given.
+    on_test [script] :
+      put $.gloo_tmp ^^.computed_name into ^^.computed_f
+      tell ^^.computed_f to write ( ^^.computed_fixture )
+      load ( $.gloo_tmp '/gloo_load_computed_test' )
+      eval computed_demo.s = 'hi'
+      assert "expected the full path without .gloo to load"
+      tell computed_demo to unload
+      tell ^^.computed_f to delete

data/test.gloo/verbs/log.test.gloo

@@ -10,3 +10,19 @@ tests.verbs.log [can] :
       log 'debug' (debug)
       eval it = 'debug'
       assert "expected it to be 'debug'"
+
+  failed_expression_puts_false_in_it [test] :
+    description [string] : log of an expression that fails puts false in it.
+    expect_errors [bool] : true
+    on_test [script] :
+      log 1 + no_such_obj_xyz
+      eval it = false
+      assert "expected it to be false after a failed expression"
+
+  failed_level_puts_the_value_in_it [test] :
+    description [string] : log with a level that fails still puts the value in it.
+    expect_errors [bool] : true
+    on_test [script] :
+      log 'plain' (no_such_obj_xyz)
+      eval it = 'plain'
+      assert "expected the value in it when only the level fails"

data/test.gloo/verbs/show.test.gloo

@@ -33,3 +33,35 @@ tests.verbs.show [can] :
       show 'a' + 'b'
       eval it = 'ab'
       assert "expected it to be 'ab'"
+
+  add [ƒ] :
+    on_invoke [script] :
+      put ^.params.x + ^.params.y into ^.result
+    params [can] :
+      x [int] :
+      y [int] :
+    result [int] :
+
+  failed_expression_puts_false_in_it [test] :
+    description [string] : show of an expression that fails puts false in it.
+    expect_errors [bool] : true
+    on_test [script] :
+      show 1 + no_such_obj_xyz
+      eval it = false
+      assert "expected it to be false after a failed expression"
+
+  failed_inline_invoke_puts_false_in_it [test] :
+    description [string] : show of an inline invoke that fails puts false in it.
+    expect_errors [bool] : true
+    on_test [script] :
+      show invoke( tests.verbs.show.add 1 )
+      eval it = false
+      assert "expected it to be false after a failed inline invoke"
+
+  failed_color_puts_the_value_in_it [test] :
+    description [string] : show with a color that fails still puts the value in it.
+    expect_errors [bool] : true
+    on_test [script] :
+      show 'plain' (no_such_obj_xyz)
+      eval it = 'plain'
+      assert "expected the value in it when only the color fails"

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: gloo
 version: !ruby/object:Gem::Version
-  version: '7.1'
+  version: 7.1.2
 platform: ruby
 authors:
 - Eric Crane
@@ -442,6 +442,8 @@ files:
 - lib/gloo/verbs/version.rb
 - lib/gloo/verbs/wait.rb
 - lib/run.rb
+- test.gloo/app/embed.test.gloo
+- test.gloo/app/fixtures/embed_harness.rb
 - test.gloo/basic.test.gloo
 - test.gloo/ctrl/each.test.gloo
 - test.gloo/dt/date.test.gloo