diff options
| author | Omar Rizwan <omar@omar.website> | 2023-06-30 18:11:12 +0000 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2023-06-30 18:11:12 +0000 |
| commit | 8a8a749eb2afbf6b0636c280554c32219fff1dd2 (patch) | |
| tree | a4fca4989a76d0e17c2d17ffe8ad1ad349111df2 /test/basic.tcl | |
| parent | Left-align labels, watch for .folk.temp files (diff) | |
| parent | Fix load librt to work on folk0 also (diff) | |
| download | folk-8a8a749eb2afbf6b0636c280554c32219fff1dd2.tar.gz folk-8a8a749eb2afbf6b0636c280554c32219fff1dd2.zip | |
Merge pull request #42 from FolkComputer/osnr/camera-pipeline
Run Camera in subprocess
Diffstat (limited to 'test/basic.tcl')
| -rw-r--r-- | test/basic.tcl | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/test/basic.tcl b/test/basic.tcl index af2bb16f..c39916dd 100644 --- a/test/basic.tcl +++ b/test/basic.tcl @@ -1,9 +1,3 @@ -proc assert condition { - set s "{$condition}" - if {![uplevel 1 expr $s]} { - return -code error "assertion failed: $condition" - } -} proc count condition { Statements::count $condition } @@ -11,7 +5,7 @@ proc count condition { Assert programOakland has program {{this} { Claim Omar lives in "Oakland" }} -Assert when $::nodename has step count /c/ {{c} { +Assert when $::thisProcess has step count /c/ {{c} { When Omar lives in /place/ { Claim $place is a place where Omar lives } |