NBS Minimal BASIC Test Programs: Version 2, User's Manual, Volume 13 |
From inside the book
Results 6-10 of 100
Page 11
50 PRINT 60 PRINT " BEGIN TEST . " 70 PRINT 80 PRINT " IF PROGRAM EXECUTION TERMINATES AFTER THE NEXT LINE , " 90 PRINT " *** TEST PASSED **** 100 STOP 110 PRINT " PROGRAM EXECUTION WAS NOT TERMINATED : " 120 PRINT " *** TEST FAILED ...
50 PRINT 60 PRINT " BEGIN TEST . " 70 PRINT 80 PRINT " IF PROGRAM EXECUTION TERMINATES AFTER THE NEXT LINE , " 90 PRINT " *** TEST PASSED **** 100 STOP 110 PRINT " PROGRAM EXECUTION WAS NOT TERMINATED : " 120 PRINT " *** TEST FAILED ...
Page 72
... THEN 320 280 IF B1 < > 123E 22 THEN 320 290 IF BO < > - 123E - 22 THEN 320 300 PRINT **** TEST PASSED *** 310 GOTO 330 320 PRINT **** TEST FAILED *** 330 PRINT 340 PRINT " 350 PRINT 360 PRINT " END PROGRAM 22 " 370 END END TEST .
... THEN 320 280 IF B1 < > 123E 22 THEN 320 290 IF BO < > - 123E - 22 THEN 320 300 PRINT **** TEST PASSED *** 310 GOTO 330 320 PRINT **** TEST FAILED *** 330 PRINT 340 PRINT " 350 PRINT 360 PRINT " END PROGRAM 22 " 370 END END TEST .
Page 78
... M $ 7030 PRINT 7040 PRINT " 7050 PRINT 7060 LET R $ = " PASSED " BEGIN TEST " 7070 IF S = 0 THEN 7300 7080 PRINT " CASE ... TEST FAILS " 8530 LET R $ = " FAILED " 8540 GOTO 8560 8550 PRINT " TEST PASSES " 8560 RETURN 9000 REM HANDLE ...
... M $ 7030 PRINT 7040 PRINT " 7050 PRINT 7060 LET R $ = " PASSED " BEGIN TEST " 7070 IF S = 0 THEN 7300 7080 PRINT " CASE ... TEST FAILS " 8530 LET R $ = " FAILED " 8540 GOTO 8560 8550 PRINT " TEST PASSES " 8560 RETURN 9000 REM HANDLE ...
Page 85
7060 LET E1 = 0 7080 PRINT " CASE # " , " SHOULD BE " , " ACTUAL " , " OUTCOME " 7090 PRINT 7300 RETURN 8000 REM SUBROUTINE TO END SECTION 8010 PRINT 8020 IF E1 = 0 THEN 8050 8025 PRINT " *** TEST FAILED IN " ; E1 ; " CASE ( S ) *** 11 ...
7060 LET E1 = 0 7080 PRINT " CASE # " , " SHOULD BE " , " ACTUAL " , " OUTCOME " 7090 PRINT 7300 RETURN 8000 REM SUBROUTINE TO END SECTION 8010 PRINT 8020 IF E1 = 0 THEN 8050 8025 PRINT " *** TEST FAILED IN " ; E1 ; " CASE ( S ) *** 11 ...
Page 89
... LET Y : -4 1130 GOSUB 9000 1140 PRINT 1150 IF F = 0 THEN 1180 1160 PRINT " *** TEST FAILED IN " ; F ; " CASE ( S ) . **** 1170 GOTO 1190 1180 PRINT " *** TEST PASSED *** 1190 PRINT 1200 PRINT " END TEST " 1210 PRINT 2000 PRINT 2010 ...
... LET Y : -4 1130 GOSUB 9000 1140 PRINT 1150 IF F = 0 THEN 1180 1160 PRINT " *** TEST FAILED IN " ; F ; " CASE ( S ) . **** 1170 GOTO 1190 1180 PRINT " *** TEST PASSED *** 1190 PRINT 1200 PRINT " END TEST " 1210 PRINT 2000 PRINT 2010 ...
What people are saying - Write a review
We haven't found any reviews in the usual places.
Other editions - View all
Common terms and phrases
20 PRINT 40 PRINT SECTION ACCEPT THE PROGRAM ACCOMPANIED BY DOCUMENTATION ACCURACY ACTUAL ALLOWING ANSI STANDARD APPROPRIATE ERROR MESSAGE ARGUMENT ARRAY ASSIGNED BASIC TEST PROGRAMS BEGIN TEST CHARACTERS COLUMN COMPUTED CONSTANTS CONTAINING CONTROL DATA DIGITS DISPLAYED END PROGRAM FILE END TEST ENTER ERROR EVALUATION EXACT EXECUTION EXPECTED FOLLOWING FUNCTION GOSUB GOTO IDENTIFYING THE EXCEPTION implementation INFORMATIVE TEST INPUT INPUT-REPLY ITEM LINE LOOP MEASURE MESSAGE IDENTIFYING MINIMAL BASIC TEST NBS MINIMAL BASIC NEGATIVE NON-STANDARD FEATURE NOTE NUMERIC EXPRESSIONS OCCUR OK OK OK operations ORDER OUTPUT OVERFLOW PASS THIS TEST POSITIVE PRINT 40 PRINT PRINT END PROGRAM PRINT PROGRAM FILE PRINT THIS SECTION PRINT TO PASS PROCESSOR PROGRAM NUMBER PROGRAM TESTS READ REFERENCE REFS REJECT THE PROGRAM REPORTED RESULT RETURN RND FUNCTION SECTION TESTS SPACE STATEMENT STRING SUBSCRIPT SUPPLIED TERMINATE TEST FAILED TEST OK TEST PASSED TYPE UNDERFLOW VALUE VARIABLE ZERO ОК ОК ОК