Changeset 5780d0d for libcfa/prelude

Timestamp:

Dec 18, 2024, 10:33:40 AM (5 weeks ago)

Author:

Andrew Beach <ajbeach@…>

Branches:

master

Children:

faf9e19

Parents:

94aa202

Message:

Removed increment and decrement operators for enumerations from builtins. I am confident the generic fallbacks work because I added tests.

File:

• libcfa/prelude/builtins.c (modified) (5 diffs)

libcfa/prelude/builtins.c

@@ -66 +66 @@
 forall( T & )
 trait is_generator {
-      void main( T & this );
-      generator$ * get_generator( T & this );
+        void main( T & this );
+        generator$ * get_generator( T & this );
 };
 
@@ -234 +234 @@
 static inline
 forall( E | Serial( E ) ) {
-        E ++?( E & l ) {
+        E ?+=?( E & l, one_t ) {
                 int pos = fromInstance( l );
                 l = fromInt_unsafe( pos + 1 );
@@ -240 +240 @@
         }
 
-        E --?( E & l ) {
+        E ?-=?( E & l, one_t ) {
                 int pos = fromInstance( l );
                 l = fromInt_unsafe( pos - 1 );
@@ -246 +246 @@
         }
 
-        E ?+=?( E & l, one_t ) {
-                int pos = fromInstance( l );
-                l = fromInt_unsafe( pos + 1 );
-                return l;
-        }
-
-        E ?-=?( E & l, one_t ) {
-                int pos = fromInstance( l );
-                l = fromInt_unsafe( pos - 1 );
-                return l;
-        }
-
         E ?+=?( E & l, int i ) {
                 int pos = fromInstance( l );
@@ -268 +256 @@
                 l = fromInt_unsafe( pos - i );
                 return l;
-        }
-
-        E ?++( E & l ) {
-                int pos = fromInstance( l );
-                l = fromInt_unsafe( pos + 1 );
-                return fromInt_unsafe( pos );
-        }
-
-        E ?--( E & l ) {
-                int pos = fromInstance( l );
-                l = fromInt_unsafe( pos - 1 );
-                return fromInt_unsafe( pos );
         }
 }