shithub: orca

Download patch

ref: 31ab74723a25b9d4e9ecfbe883153f6672a581f2
parent: 745c28ce511966760c34b974e9946878a2ec85dd
author: cancel <cancel@cancel.fm>
date: Sat Dec 29 14:37:29 EST 2018

Cleanup

--- a/sim.c
+++ b/sim.c
@@ -258,14 +258,9 @@
   if (!oper_has_neighboring_bang(gbuffer, height, width, y, x))                \
   return
 
-#define OPER_PORT_IO_MASK                                                      \
-  (Mark_flag_input | Mark_flag_output | Mark_flag_haste_input)
-#define OPER_PORT_CELL_ENABLING_MASK (Mark_flag_lock | Mark_flag_sleep)
-#define OPER_PORT_FLIP_LOCK_BIT(_flags) ((_flags) ^ Mark_flag_lock)
-
 #define PORT(_delta_y, _delta_x, _flags)                                       \
   mbuffer_poke_relative_flags_or(mbuffer, height, width, y, x, _delta_y,       \
-                                 _delta_x, OPER_PORT_FLIP_LOCK_BIT(_flags))
+                                 _delta_x, (_flags) ^ Mark_flag_lock)
 #define END_PORTS }
 
 //////// Operators