From 8ff759c00520eb2947fe54876ddf031b3ed094ee Mon Sep 17 00:00:00 2001 From: Zar Goertzel Date: Sun, 29 Mar 2026 23:19:11 +0200 Subject: [PATCH] unique fix --- src/translator.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/translator.pl b/src/translator.pl index 4e1985f9..90ae5a30 100644 --- a/src/translator.pl +++ b/src/translator.pl @@ -73,8 +73,8 @@ %Special stream operation rewrite rules before main translation rewrite_streamops(['trace!', Arg1, Arg2], [progn, ['println!', Arg1], Arg2]). -rewrite_streamops([unique, [superpose|Args]], - [call, [superpose, ['unique-atom', [collapse, [superpose|Args]]]]]). +rewrite_streamops([unique, Arg], + [call, [superpose, ['unique-atom', [collapse, Arg]]]]). rewrite_streamops([union, [superpose|A], [superpose|B]], [call, [superpose, ['union-atom', [collapse, [superpose|A]], [collapse, [superpose|B]]]]]).