Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Open sidebar
sinqdev
sicspsi
Commits
c9c93a9d
Commit
c9c93a9d
authored
May 19, 2022
by
zolliker
Browse files
fix pardef issues
- 'geterror' property is not deleted in some cases
parent
f16d738b
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
7 additions
and
2 deletions
+7
-2
pardef.c
pardef.c
+7
-2
No files found.
pardef.c
View file @
c9c93a9d
...
...
@@ -1315,6 +1315,7 @@ void ParUpdateNode(hdbValue value) {
}
else
{
/* bare object (parameter "") */
node
=
ctx
->
obj
->
node
;
ctx
->
par
->
node
=
node
;
snprintf
(
sicscommand
,
sizeof
sicscommand
,
"%s = "
,
ctx
->
obj
->
name
);
}
SetHdbProperty
(
node
,
"sicscommand"
,
sicscommand
);
...
...
@@ -1331,6 +1332,7 @@ void ParUpdateNode(hdbValue value) {
SetHdbProperty
(
node
,
"visible"
,
"false"
);
}
}
if
(
GetHdbProp
(
"geterror"
))
skip_unchanged
=
0
;
switch
(
value
.
dataType
)
{
case
HIPFLOAT
:
if
(
value
.
v
.
doubleValue
==
PAR_NAN
)
{
...
...
@@ -1355,8 +1357,8 @@ void ParUpdateNode(hdbValue value) {
if
(
skip_unchanged
&&
node
->
value
.
v
.
intValue
==
value
.
v
.
intValue
)
return
;
break
;
case
HIPTEXT
:
if
(
strcmp
(
node
->
value
.
v
.
text
,
value
.
v
.
text
)
==
0
)
return
;
break
;
if
(
skip_unchanged
&&
strcmp
(
node
->
value
.
v
.
text
,
value
.
v
.
text
)
==
0
)
return
;
break
;
default:
return
;
}
...
...
@@ -1708,6 +1710,9 @@ void ParKill(void *object)
p
=
o
->
infoList
;
while
(
p
)
{
q
=
p
->
next
;
if
(
p
->
node
==
o
->
node
)
{
p
->
node
=
NULL
;
/* avoid removing the object node, this is done below */
}
ParKillThisPar
(
p
);
p
=
q
;
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment