Changeset 3ac5fd8 for tests/coroutine/devicedriver.cfa

Timestamp:

Aug 17, 2024, 3:15:21 PM (15 months ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

master

Children:

df2e00f

Parents:

afb15cf

Message:

first attempt changing end-of-file to an exception

File:

• tests/coroutine/devicedriver.cfa (modified) (2 diffs)

tests/coroutine/devicedriver.cfa

@@ -10 +10 @@
 // Created On       : Sat Mar 16 15:30:34 2019
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Sat Jun 17 09:11:56 2023
-// Update Count     : 94
+// Last Modified On : Thu Aug 15 18:45:45 2024
+// Update Count     : 96
 //
 
@@ -71 +71 @@
 
         sin | nlOn;                                                                                     // read newline (all) characters
-  eof: for () {                                                                                 // read until end of file
-                sin | byte;                                                                             // read one character
-          if ( eof( sin ) ) break eof;                                          // eof ?
-                choose( next( driver, byte ) ) {                                // analyse character
-                  case CONT: ;
-                  case MSG: sout | "msg:" | msg;
-                  case ESTX: sout | "STX in message";
-                  case ELNTH: sout | "message too long";
-                  case ECRC: sout | "CRC failure";
-                } // choose
-        } // for
+        try {
+                for () {                                                                                // read until end of file
+                        sin | byte;                                                                     // read one character
+                        choose( next( driver, byte ) ) {                        // analyse character
+                          case CONT: ;
+                          case MSG: sout | "msg:" | msg;
+                          case ESTX: sout | "STX in message";
+                          case ELNTH: sout | "message too long";
+                          case ECRC: sout | "CRC failure";
+                        } // choose
+                } // for
+        } catch( end_of_file * ) {
+        } // try
 } // main