[rucksack-devel] WITH-TRANSACTION

[Arthur Lemmens]

Nikodemus wrote:

> The current WITH-TRANSACTION looks wrong to me: non-local exists leave the
> transaction hanging. Below is a sketch for a more robust one

Thanks.  Looks good to me.

Committed with two minor changes:

- I put the (REMF ARGS :RUCKSACK) line back in.
   (Doesn't really make any difference, but feels a bit cleaner to me.)

- I added a DO after (LOOP NAMED ,TRANSACTION
   Without the DO it's not standard CL, I think.  (Or, if it is, Lispworks
   doesn't recognize it as such.)

Arthur