Project

General

Profile

Actions
Copy link

Bug #141

closed

Comparison of named empty string with array of SHORTCHAR does not work.

Added by J. Templ almost 9 years ago. Updated almost 9 years ago.

Status:
Closed
Priority:
Normal
Assignee:
J. Templ
Target version:
1.7.1
Start date:
11/02/2016
Due date:
% Done:

0%

Estimated time:
Forum topic:

Description

Comparison of named empty string with array of SHORTCHAR does not work.
Instead of comparing 0X with the first array element, -1 is used.
This seems to be the same kind of bug as #128, which fixed it for assignment.

Reported by Josef Templ, 2016-11-02.

Actions
Copy link
 #1

Updated by J. Templ almost 9 years ago

This test program shows the bug.
It calls HALT instead of HALT.

MODULE Test;

CONST empty = "";
PROCEDURE Do*;
    VAR s: ARRAY 10 OF SHORTCHAR;
  BEGIN
    s := "";
    IF s = empty THEN HALT(99)
    ELSE HALT(88)
    END
  END Do;

END Test.

Actions
Copy link
 #2

Updated by J. Templ almost 9 years ago

@This test program shows the bug.
It calls HALT 88 instead of HALT 99.

MODULE Test;

  CONST empty = "";

  PROCEDURE Do*;
    VAR s: ARRAY 10 OF SHORTCHAR;
  BEGIN
    s := "";
    IF s = empty THEN HALT(99)
    ELSE HALT(88)
    END
  END Do;

END Test.

@

Actions
Copy link
 #3

Updated by D. G. Danforth almost 9 years ago

  • Status changed from New to Closed
Actions
Copy link

Also available in: Atom PDF