ASSERT: Difference between revisions
Jump to navigation
Jump to search
Navigation:
Main Page with Articles and Tutorials
Keyword Reference - Alphabetical
Keyword Reference - By usage
Report a broken link
No edit summary Tags: Undo Reverted |
No edit summary Tag: Manual revert |
||
Line 18: | Line 18: | ||
{{PageExamples}} | {{PageExamples}} | ||
''Example:'' Adding test checks for parameter inputs in a function. | ''Example:'' Adding test checks for parameter inputs in a function. | ||
{{CodeStart}} | {{CodeStart}} | ||
{{Cl|$ASSERTS}}:CONSOLE | {{Cl|$ASSERTS}}:CONSOLE | ||
{{Cl|DO}} | {{Cl|DO}} | ||
a = {{Cl|INT}}({{Cl|RND}} * 10) | a = {{Cl|INT}}({{Cl|RND}} * 10) | ||
Line 28: | Line 28: | ||
{{Cl|_LIMIT}} 3 | {{Cl|_LIMIT}} 3 | ||
{{Cl|LOOP}} {{Cl|UNTIL}} {{Cl|_KEYHIT}} | {{Cl|LOOP}} {{Cl|UNTIL}} {{Cl|_KEYHIT}} | ||
{{Cl|FUNCTION}} myFunc$ (value {{Cl|AS}} {{Cl|SINGLE}}) | {{Cl|FUNCTION}} myFunc$ (value {{Cl|AS}} {{Cl|SINGLE}}) | ||
{{Cl|_ASSERT}} value > 0, "Value cannot be zero" | {{Cl|_ASSERT}} value > 0, "Value cannot be zero" | ||
{{Cl|_ASSERT}} value <= 10, "Value cannot exceed 10" | {{Cl|_ASSERT}} value <= 10, "Value cannot exceed 10" | ||
{{Cl|IF}} value > 1 {{Cl|THEN}} plural$ = "s" | {{Cl|IF}} value > 1 {{Cl|THEN}} plural$ = "s" | ||
myFunc$ = {{Cl|STRING$}}(value, "*") + {{Cl|STR$}}(value) + " star" + plural$ + " :-)" | myFunc$ = {{Cl|STRING$}}(value, "*") + {{Cl|STR$}}(value) + " star" + plural$ + " :-)" |
Revision as of 01:06, 23 January 2023
The _ASSERT statement can be used to perform tests in code that's in development, for debugging purposes.
Syntax
- _ASSERT condition[, errorMessage$]
Description
- condition is the condition that must be met in order to consider the _ASSERT valid.
- Optional errorMessage$ is the message to be displayed in the console window if $ASSERTS:CONSOLE is used.
- If the condition is not met (that is, if it evaluates to 0), an error occurs ("_ASSERT failed on line #") and program execution stops.
Availability
- Version 1.4 and up.
Examples
Example: Adding test checks for parameter inputs in a function.
$ASSERTS:CONSOLE DO a = INT(RND * 10) b$ = myFunc$(a) PRINT a, , b$ _LIMIT 3 LOOP UNTIL _KEYHIT FUNCTION myFunc$ (value AS SINGLE) _ASSERT value > 0, "Value cannot be zero" _ASSERT value <= 10, "Value cannot exceed 10" IF value > 1 THEN plural$ = "s" myFunc$ = STRING$(value, "*") + STR$(value) + " star" + plural$ + " :-)" END FUNCTION |
See also