From 7c56865d97b1ac2aaa5936420cb0b72487b0966c Mon Sep 17 00:00:00 2001
From: gambas <g4mba5@gmail.com>
Date: Mon, 13 Jul 2020 15:41:12 +0200
Subject: [PATCH] Fix '&=' operator optimization when the added string is void.

[INTERPRETER]
* BUG: Fix '&=' operator optimization when the added string is void.
---
 comp/src/gb.form/.src/Test/Form1.class | 33 ++++++++++++++++++++++++++
 comp/src/gb.form/.src/Test/Form1.form  | 30 +++++++++++++++++++++++
 2 files changed, 63 insertions(+)
 create mode 100644 comp/src/gb.form/.src/Test/Form1.class
 create mode 100644 comp/src/gb.form/.src/Test/Form1.form

diff --git a/comp/src/gb.form/.src/Test/Form1.class b/comp/src/gb.form/.src/Test/Form1.class
new file mode 100644
index 000000000..28e4bf59f
--- /dev/null
+++ b/comp/src/gb.form/.src/Test/Form1.class
@@ -0,0 +1,33 @@
+' Gambas class file
+
+Public Sub Run() As Boolean
+
+  Return Not Me.ShowModal()
+
+End
+
+Public Sub btnOK_Click()
+
+  Me.Close(True)
+
+End
+
+Public Sub btnCancel_Click()
+
+  Me.Close
+
+End
+
+
+Public Sub Form_Open()
+
+   Me.Center
+   
+End
+
+
+Public Sub DateBox1_Change()
+
+  Message.Question("does it pass, on debug?")
+
+End
diff --git a/comp/src/gb.form/.src/Test/Form1.form b/comp/src/gb.form/.src/Test/Form1.form
new file mode 100644
index 000000000..156079929
--- /dev/null
+++ b/comp/src/gb.form/.src/Test/Form1.form
@@ -0,0 +1,30 @@
+# Gambas Form File 3.0
+
+{ Form Form
+  MoveScaled(0,0,64,64)
+  Resizable = False
+  Arrangement = Arrange.Vertical
+  Spacing = True
+  Margin = True
+  { DateBox1 DateBox
+    MoveScaled(17,17,24,4)
+  }
+  { HBox1 HBox
+    MoveScaled(1,59,62,4)
+    Spacing = True
+    { Panel1 Panel
+      MoveScaled(4,0,4,4)
+      Expand = True
+    }
+    { btnOK Button
+      MoveScaled(29,0,16,4)
+      Text = ("OK")
+      Default = True
+    }
+    { btnCancel Button
+      MoveScaled(46,0,16,4)
+      Text = ("Cancel")
+      Cancel = True
+    }
+  }
+}