tests/wxGlade/HMIFrame@wxglade_hmi/hmi.wxg
author Andrey Skvortsov <andrej.skvortzov@gmail.com>
Wed, 01 Aug 2018 13:09:45 +0300
changeset 2258 c9915bc620cd
parent 1690 cfac9d1c3571
permissions -rw-r--r--
Fix wrong code generation if EN/ENO are used in FBD/LD/SFC

This problem appears for example here

--------
------- | MOVE |
| MOVE1 |------|EN ENO|
------- | |
| |
------- | | -----------
| 23 |------|IN OUT|---| LocalVar0 |
------- -------- -----------


--------
------- | MOVE |
| MOVE2 |------|EN ENO|
------- | |
| |
------- | | -----------
| 15 |------|IN OUT|---| LocalVar0 |
------- -------- -----------

Before wrong code was generated for this case:

MOVE6_OUT := MOVE(EN := move1, IN := 23, ENO => MOVE6_ENO);
LocalVar0 := MOVE6_OUT;
MOVE4_OUT := MOVE(EN := move2, IN := 15, ENO => MOVE4_ENO);
LocalVar0 := MOVE4_OUT;

With this patch now following code is generated:

MOVE6_OUT := MOVE(EN := move1, IN := 23, ENO => MOVE6_ENO);
IF MOVE6_ENO THEN
LocalVar0 := MOVE6_OUT;
END_IF;
MOVE4_OUT := MOVE(EN := move2, IN := 15, ENO => MOVE4_ENO);
IF MOVE4_ENO THEN
LocalVar0 := MOVE4_OUT;
END_IF;


See discussion here:
https://sourceforge.net/p/beremiz/mailman/message/36378805/
411
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
     1
<?xml version="1.0"?>
1690
cfac9d1c3571 cleanup wxGlade example
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 728
diff changeset
     2
<!-- generated by wxGlade 0.7.2 on Mon Jun  5 14:18:29 2017 -->
411
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
     3
1690
cfac9d1c3571 cleanup wxGlade example
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 728
diff changeset
     4
<application class="" encoding="UTF-8" for_version="2.8" header_extension=".h" indent_amount="4" indent_symbol="space" is_template="0" language="python" name="" option="0" overwrite="0" path="..py.py" source_extension=".cpp" top_window="HMIFrame" use_gettext="0" use_new_namespace="1">
411
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
     5
    <object class="Class_HMIFrame" name="HMIFrame" base="EditFrame">
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
     6
        <style>wxDEFAULT_FRAME_STYLE</style>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
     7
        <title>HMIFrame</title>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
     8
        <object class="wxBoxSizer" name="sizer_1" base="EditBoxSizer">
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
     9
            <orient>wxVERTICAL</orient>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    10
            <object class="sizeritem">
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    11
                <border>0</border>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    12
                <option>0</option>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    13
                <object class="wxSpinCtrl" name="spin_ctrl_1" base="EditSpinCtrl">
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    14
                    <range>0, 10000</range>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    15
                </object>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    16
            </object>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    17
            <object class="sizeritem">
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    18
                <border>0</border>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    19
                <option>0</option>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    20
                <object class="wxCheckBox" name="checkbox_1" base="EditCheckBox">
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    21
                    <label>checkbox_1</label>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    22
                </object>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    23
            </object>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    24
            <object class="sizeritem">
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    25
                <border>0</border>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    26
                <option>0</option>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    27
                <object class="wxStaticText" name="label_1" base="EditStaticText">
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    28
                    <attribute>1</attribute>
1690
cfac9d1c3571 cleanup wxGlade example
Andrey Skvortsov <andrej.skvortzov@gmail.com>
parents: 728
diff changeset
    29
                    <label>GUI changed!</label>
411
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    30
                </object>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    31
            </object>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    32
        </object>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    33
    </object>
8261c8f1e365 Bug on Debug trying to start (and stop) before PLC started fixed.
laurent
parents:
diff changeset
    34
</application>