Updates to support SDCC 3.1.4+ new build-in defines.

[ulut.git] / ulut / ul_gavlprim.c

diff --git a/ulut/ul_gavlprim.c b/ulut/ul_gavlprim.c
index fb6352de440c55fb1be992d061ee6956cbc771ab..491ecd7b9f37fcb46e602246b0c162475487f21b 100644 (file)
--- a/ulut/ul_gavlprim.c
+++ b/ulut/ul_gavlprim.c
@@ -77,6 +77,10 @@ gavl_prev_node(const gavl_node_t *node)
   }
 }
 
+#if defined(SDCC) || defined(__SDCC)
+#pragma save
+#pragma nogcse
+#endif /*SDCC*/
 /**
  * gavl_balance_one - Balance One Node to Enhance Balance Factor
  * @subtree:   pointer to pointer to node for which balance is enhanced
@@ -213,6 +217,9 @@ gavl_balance_one(gavl_node_t **subtree)
   /*printf("#%d",ret);*/
   return(ret);
 }
+#if defined(SDCC) || defined(__SDCC)
+#pragma restore
+#endif /*SDCC*/
 
 /**
  * gavl_insert_primitive_at - Low Lewel Routine to Insert Node into Tree