ChipMaster's bwBASIC This also includes history going back to v2.10. *WARN* some binary files might have been corrupted by CRLF.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

55 lines
2.1 KiB

  1. PROGRAM FILE 18: THE IF-THEN STATEMENT WITH STRING OPERANDS.
  2. ANSI STANDARD 10.2, 10.4
  3. SECTION 18.1: THE IF-THEN STATEMENT WITH STRING OPERANDS.
  4. THIS SECTION TESTS THE COMPARISON OF STRING VARIABLES AND
  5. CONSTANTS WITH A VARIETY OF VALUES. BOTH RELATIONSHIPS
  6. (= AND <>) ARE TESTED FOR EACH PAIR OF VALUES. THE 'V' OR
  7. 'C' FOLLOWING THE COMPARAND VALUE INDICATES WHETHER IT IS
  8. A VARIABLE OR A CONSTANTS.
  9. 'T' OR 'F' IS PRINTED TO SHOW THE OUTCOME OF THE
  10. COMPARISON. FOR INCORRECT COMPARES, AN '*' IS PRINTED
  11. NEXT TO THE ERRONEOUS RESULT. WHEN DISPLAYING COMPARAND
  12. VALUES, THE UNDERLINE CHARACTER, '_', IS USED TO REPRESENT
  13. THE SPACE CHARACTER (THUS A DISPLAYED 'ONE_BLANK'
  14. INDICATES AN INTERNAL VALUE OF 'ONE BLANK').
  15. ALSO, THE NULL STRING (LENGTH OF ZERO) IS DENOTED BY THE
  16. LABEL '(NULL STRING)'.
  17. CHARACTER STRINGS SHOULD TEST EQUAL IF AND ONLY IF THE
  18. STRINGS ARE EQUAL IN LENGTH AND CONTAIN IDENTICAL SEQUENCES
  19. OF CHARACTERS.
  20. BEGIN TEST.
  21. LEFT : RIGHT
  22. COMPARAND V/C: COMPARAND V/C = <> RESULT
  23. ABC C : __ABC V F T OK
  24. ABC C : ABC V T F OK
  25. ABC C : ABC_ V F T OK
  26. ABC C : ___ABC__ V F T OK
  27. ABC C : (NULL STRING) V F T OK
  28. ABC C : ABCD V F T OK
  29. ___0X9 V : _0X9__ C F T OK
  30. 0X9 V : _0X9__ C F T OK
  31. 0X9__ V : _0X9__ C F T OK
  32. _0X9__ V : _0X9__ C T F OK
  33. __ V : ____ V F T OK
  34. _ V : (NULL STRING) V F T OK
  35. 18_CHARACTERS_LONG V : 18_CHARACTERS_LONG V T F OK
  36. 18_CHARACTERS_LONG V : 18_CHARACTERS_LONK V F T OK
  37. !#$%&'()0=+*<>? V : !#$%&'()0=+*<>? V T F OK
  38. (NULL STRING) V : (NULL STRING) V T F OK
  39. UVWXYZ_ V : UVWXYZ__ V F T OK
  40. *** TEST PASSED ***
  41. END TEST.
  42. END PROGRAM 18
  43. Program interrupted at line 1940