Microsoft KB Archive/83464

= Basic 7.1 &quot;Internal Error Near 851C&quot;, DEFINT and DEF FN =

Article ID: 83464

Article Last Modified on 8/16/2005

-

APPLIES TO


 * Microsoft BASIC Professional Development System 7.1

-



This article was previously published under Q83464



SYMPTOMS
The following Basic code, when compiled, will give an &quot;Internal Error Near 851C&quot;: DEFINT A - Z  DEF FNFUNCT (X) = X * X



STATUS
Microsoft has confirmed this to be a bug with Microsoft Basic Professional Development System (PDS) for MS-DOS, version 7.1. This problem was corrected in Microsoft Visual Basic version 1.0 for MS-DOS.



Steps to Reproduce Problem

 * 1) Use the DEFINT A-Z statement (other DEFs will not cause the error).
 * 2) Pass at least one parameter into the function. It must be an integer.
 * 3) In the function, multiply the parameter by itself.
 * 4) Compile the code. None of the option settings prevent the error.
 * 5) The error &quot;Internal Error Near 851C&quot; will occur on the DEF FN line.

NOTE: This error does not occur in the QBX.EXE environment. The problem only occurs under Basic PDS version 7.1.

To work around this problem, do not use the DEFINT function, or change the data type of the parameter used in the function as follows: DEF FNFUNCT (X&) = X& * X&

Additional query words: VBmsdos BasicCom 7.10 b_vbmsdos 1.00 buglist7.10 fixlist1.00

Keywords: KB83464

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.