diff options
| author | Omar Rizwan <omar@omar.website> | 2023-06-19 17:40:27 +0000 |
|---|---|---|
| committer | Omar Rizwan <omar@omar.website> | 2023-06-19 17:41:37 +0000 |
| commit | a5b40ecd2ba5e4e04ed35a410d05953d877e0d13 (patch) | |
| tree | f2708ab18b803d4037a489cdf50f328d2c2e70ac /test/commit.tcl | |
| parent | Disable shapes log (diff) | |
| download | folk-a5b40ecd2ba5e4e04ed35a410d05953d877e0d13.tar.gz folk-a5b40ecd2ba5e4e04ed35a410d05953d877e0d13.zip | |
Add assert to lib/language.tcl
Diffstat (limited to 'test/commit.tcl')
| -rw-r--r-- | test/commit.tcl | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/test/commit.tcl b/test/commit.tcl index 2a8bdaed..1cf780b8 100644 --- a/test/commit.tcl +++ b/test/commit.tcl @@ -1,10 +1,3 @@ -proc assert condition { - set s "{$condition}" - if {![uplevel 1 expr $s]} { - return -code error "assertion failed: $condition" - } -} - Assert programBall has program {{this} { Commit { Claim $this has a ball at x 100 y 100 } |