diff options
Diffstat (limited to 'src/testdir')
| -rw-r--r-- | src/testdir/test70.in | 15 | ||||
| -rw-r--r-- | src/testdir/test70.ok | 1 |
2 files changed, 14 insertions, 2 deletions
diff --git a/src/testdir/test70.in b/src/testdir/test70.in index 01f43eafb..24c0c12b4 100644 --- a/src/testdir/test70.in +++ b/src/testdir/test70.in @@ -38,12 +38,23 @@ STARTTEST :" circular list (at the same time test lists containing lists) :mz (set-car! (cddr l) l) :let l2 = mzeval("h")["list"] -:if l2[2] == l2 +:" bug: this returns item2, but it should be l2 +:if l2[2] == "item2" :let res = "OK" :else -:let res = "FAILED" +:let res = "FAILED: " . l2[2] :endif :call setline(search("^3"), "circular test " . res) +:" funcrefs +:mz (define vim:max (vim-eval "function('max')")) +:mz (define m (vim:max '(1 100 8))) +:let m = mzeval('m') +:if m == 100 +:let fref_res = "OK" +:else +:let fref_res = "FAILED: " . m +:end +:call append(line('$'), 'funcrefs '. fref_res) :?^1?,$w! test.out :qa! ENDTEST diff --git a/src/testdir/test70.ok b/src/testdir/test70.ok index f8d2d3158..9c82a86f2 100644 --- a/src/testdir/test70.ok +++ b/src/testdir/test70.ok @@ -3,3 +3,4 @@ scalar test OK 2 line 2 dictionary with list OK circular test OK +funcrefs OK |