From 0a51563e4e5989abe8becd1c060e06d4dec6024e Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Thu, 28 May 2020 08:17:29 +0200
Subject: ortho/gcc: convert boolean and enums to int on interfaces.

---
 src/ortho/gcc/ortho-lang-49.c | 2 ++
 src/ortho/gcc/ortho-lang-5.c  | 2 ++
 src/ortho/gcc/ortho-lang-6.c  | 2 ++
 src/ortho/gcc/ortho-lang-7.c  | 2 ++
 src/ortho/gcc/ortho-lang-8.c  | 2 ++
 5 files changed, 10 insertions(+)

(limited to 'src/ortho/gcc')

diff --git a/src/ortho/gcc/ortho-lang-49.c b/src/ortho/gcc/ortho-lang-49.c
index 7de15aea9..1c127fdb1 100644
--- a/src/ortho/gcc/ortho-lang-49.c
+++ b/src/ortho/gcc/ortho-lang-49.c
@@ -1720,8 +1720,10 @@ new_interface_decl (struct o_inter_list *interfaces,
     case ENUMERAL_TYPE:
     case BOOLEAN_TYPE:
       DECL_ARG_TYPE (r) = integer_type_node;
+      break;
     default:
       DECL_ARG_TYPE (r) = atype;
+      break;
     }
 
   layout_decl (r, 0);
diff --git a/src/ortho/gcc/ortho-lang-5.c b/src/ortho/gcc/ortho-lang-5.c
index 52fd049f7..6f478b8d8 100644
--- a/src/ortho/gcc/ortho-lang-5.c
+++ b/src/ortho/gcc/ortho-lang-5.c
@@ -1706,8 +1706,10 @@ new_interface_decl (struct o_inter_list *interfaces,
     case ENUMERAL_TYPE:
     case BOOLEAN_TYPE:
       DECL_ARG_TYPE (r) = integer_type_node;
+      break;
     default:
       DECL_ARG_TYPE (r) = atype;
+      break;
     }
 
   layout_decl (r, 0);
diff --git a/src/ortho/gcc/ortho-lang-6.c b/src/ortho/gcc/ortho-lang-6.c
index f78017da4..2fd5be401 100644
--- a/src/ortho/gcc/ortho-lang-6.c
+++ b/src/ortho/gcc/ortho-lang-6.c
@@ -1706,8 +1706,10 @@ new_interface_decl (struct o_inter_list *interfaces,
     case ENUMERAL_TYPE:
     case BOOLEAN_TYPE:
       DECL_ARG_TYPE (r) = integer_type_node;
+      break;
     default:
       DECL_ARG_TYPE (r) = atype;
+      break;
     }
 
   layout_decl (r, 0);
diff --git a/src/ortho/gcc/ortho-lang-7.c b/src/ortho/gcc/ortho-lang-7.c
index 92bfc8d46..f78bf0460 100644
--- a/src/ortho/gcc/ortho-lang-7.c
+++ b/src/ortho/gcc/ortho-lang-7.c
@@ -1718,8 +1718,10 @@ new_interface_decl (struct o_inter_list *interfaces,
     case ENUMERAL_TYPE:
     case BOOLEAN_TYPE:
       DECL_ARG_TYPE (r) = integer_type_node;
+      break;
     default:
       DECL_ARG_TYPE (r) = atype;
+      break;
     }
 
   layout_decl (r, 0);
diff --git a/src/ortho/gcc/ortho-lang-8.c b/src/ortho/gcc/ortho-lang-8.c
index 5b253aee2..51b4a86f8 100644
--- a/src/ortho/gcc/ortho-lang-8.c
+++ b/src/ortho/gcc/ortho-lang-8.c
@@ -1719,8 +1719,10 @@ new_interface_decl (struct o_inter_list *interfaces,
     case ENUMERAL_TYPE:
     case BOOLEAN_TYPE:
       DECL_ARG_TYPE (r) = integer_type_node;
+      break;
     default:
       DECL_ARG_TYPE (r) = atype;
+      break;
     }
 
   layout_decl (r, 0);
-- 
cgit v1.2.3