diff options
| author | Bruce Hill <bitbucket@bruce-hill.com> | 2018-07-20 20:27:15 -0700 |
|---|---|---|
| committer | Bruce Hill <bitbucket@bruce-hill.com> | 2018-07-20 20:27:27 -0700 |
| commit | 6728587dfc6a5f4090f2673113ffedb2be924daf (patch) | |
| tree | 77591abacd8760bedaa30110570613ef263220fe /tests/object.nom | |
| parent | c9df1bc3e881b2ebcf5808a0db7bea29cd07c849 (diff) | |
Auto-formatted and auto-upgraded everything!
Diffstat (limited to 'tests/object.nom')
| -rw-r--r-- | tests/object.nom | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/tests/object.nom b/tests/object.nom index 186957d..d29fcdd 100644 --- a/tests/object.nom +++ b/tests/object.nom @@ -1,9 +1,10 @@ -#!/usr/bin/env nomsu -V2.4.4.3 +#!/usr/bin/env nomsu -V2.5.4.3 # Tests for the object model defined in lib/object.nom use "core" use "lib/object.nom" + object "Dog": (class Dog).genus = "Canus" method [initialize %] (%.barks or= 0) @@ -13,7 +14,7 @@ object "Dog": method [get pissed off] ((me).barks += 1) -%d = (new Dog {barks: 2}) +%d = (new Dog {barks:2}) as %d: assume ((me) == %d) assume ((me).barks == 2) @@ -28,17 +29,18 @@ assume ("\(%d.class)" == "Dog") assume (%d.genus == "Canus") assume (%d.barks == 3) as (new Dog) (assume ((me).barks == 0) or barf "Default initializer failed") -as (new Dog {barks: 1}) (assume ((bark) == "Bark!")) -action [foo] (as (new Dog {barks: 23}) (return (me).barks)) +as (new Dog {barks:1}) (assume ((bark) == "Bark!")) +action [foo] (as (new Dog {barks:23}) (return (me).barks)) assume ((foo) == 23) or barf "Oops, \(foo) != 23" -as (new Dog {barks: 101}): - try (as (new Dog {barks: 8}) (barf)) and if it succeeds (barf) - assume ((me).barks == 101) or barf "Error in nested 'as % %' failed to properly reset 'self'" +as (new Dog {barks:101}): + try (as (new Dog {barks:8}) (barf)) and if it succeeds (barf) + assume ((me).barks == 101) or barf ".." + Error in nested 'as % %' failed to properly reset 'self' object "Corgi" extends (class Dog) (method [sploot] "splooted") %corg = (new Corgi) assume (%corg.barks == 0) -as (new Corgi {barks: 1}): +as (new Corgi {barks:1}): assume ((sploot) == "splooted") or barf "subclass method failed" assume ((bark) == "Bark!") or barf "inheritance failed" assume ((woof) == "Bark!") |
