Common shared /qbug?/

 BBS: Inland Empire Archive
Date: 07-27-92 (22:02)             Number: 81
From: STEVE HALKO                  Refer#: NONE
  To: RAYMOND KEITH                 Recvd: NO  
Subj: Common shared /qbug?/          Conf: (2) Quik_Bas

RK>The following common shared method is noted as valid in
RK>my reference manuals
RK>however I noticed a nasty bug using this method. It appears to be a random

  That's pretty nasty!  Good detective work.

  Here's another nasty one that I discovered about a year ago.  Run this
  from the QB environment, and everything looks good.  Now compile it
  and see what happens!

  DEFINT A-Z
  DECLARE SUB sub1 (a, b, c, d)
  a = 1
  b = 2
  c = 3
  d = 4
  CALL sub1(a, b, c, d)

  SUB sub1 (a, b, c, d)
    PRINT a, b, c, d
    PRINT a, b, c, d
    PRINT a, b, c, d
    PRINT a, b, c, d
  END SUB

 * SLMR 2.1a * Radioactive french fries - fission chips.

--- DB 1.35/002487
 * Origin: Gulf Coast BBS -QuickSHARE #2- (904)563-2547 HST/V.32bis (1:365/12)