From 38d364185b7f3ad77928c61cc799128a1e9fd329 Mon Sep 17 00:00:00 2001 From: Smooth Operator Date: Wed, 31 Jan 2024 08:51:20 -0500 Subject: [PATCH] fix sugar --- tests/t70_locals.nim | 19 +++++++++++++++++++ tests/t71_sugar.nim | 20 -------------------- 2 files changed, 19 insertions(+), 20 deletions(-) delete mode 100644 tests/t71_sugar.nim diff --git a/tests/t70_locals.nim b/tests/t70_locals.nim index 9b861d37..9fb7e4cd 100644 --- a/tests/t70_locals.nim +++ b/tests/t70_locals.nim @@ -501,3 +501,22 @@ suite "lifetimes": # destroy bar.m; eg. step == 9 foo() + +import std/sugar + +suite "high-cal": + var r = 0 + block: + ## sugary procedure arguments can be used in expressions + r = 0 + proc bar(x: int): int {.cps: Cont.} = + inc r + result = x * 2 + + proc foo(fn: (int) -> int): int {.cps: Cont.} = + inc r + result = fn: bar(2) + inc r + + check 12 == foo(x => x * 3) + check r == 3 diff --git a/tests/t71_sugar.nim b/tests/t71_sugar.nim deleted file mode 100644 index 16be5d83..00000000 --- a/tests/t71_sugar.nim +++ /dev/null @@ -1,20 +0,0 @@ -import std/sugar - -include preamble - -suite "high-cal": - var r = 0 - block: - ## sugary procedure arguments can be used in expressions - r = 0 - proc bar(x: int): int {.cps: Cont.} = - inc r - result = x * 2 - - proc foo(fn: (int) -> int): int {.cps: Cont.} = - inc r - result = fn: bar(2) - inc r - - check 12 == foo(x => x * 3) - check r == 3