drygdryg/calc
1
0
Fork 0
mirror of https://github.com/lcn2/calc.git synced 2025-08-19 01:13:27 +03:00
Code Issues Packages Projects Releases Wiki Activity

Release calc version 2.11.0t8.10

Browse Source
This commit is contained in:
Landon Curt Noll
1999-10-30 21:36:24 -07:00
parent a99a3400e7
commit 69d4a17187
6 changed files with 44 additions and 166 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lib/regress.cal
View File

@@ -7165,6 +7165,9 @@ print '189: parsed test_somenew()';
*/
define test_quit()
{
local x8400 = 23209; /* watch for lost memory */
static s8400 = 21701; /* watch for lost memory */
print '8400: Starting test_quit';
quit;
@@ -7464,8 +7467,9 @@ print '8310: Ending define tests';
print;
return test_quit();
read -once test8400;
print '8402: read -once test8400';
print '8403: Ending test_quit';
print '8404: read -once test8400';
vrfy(test8400() == 64434, '8405: test8400() == 64434');
print '8406: Ending test_quit';
/*

14
lib/test8400.cal
View File

@@ -12,5 +12,19 @@
*/
print "8401: in test8400.cal";
/*
* test8400 - dummy function to allow a check of quit-based memory leaks
*/
define test8400()
{
local x8401 = 19937; /* watch for lost memory */
static s8401 = 44497; /* watch for lost memory */
return x8401+s8401;
}
print "8402: parsed test8400()";
vrfy(test8400() == 64434, '8403: test8400() == 64434');
quit;
prob('quit did not end test8400.cal');