Here’s a simple test that you can use to determine whether the application is running on a system equipped with a Pentium CPU affected by the FDIV bug:
' return True if the CPU suffers from the FDIV bugFunction IsBuggedPentium() As Boolean IsBuggedPentium = ((1 / 3221224323) * 3221224323) <> 1 End FunctionNote that this code always returns False in a VB application that runs as p-code or compiled with the standard compilation options. To actually detect the bug, you must execute this function in an application compiled with the “Remove Safe Pentium(tm) FDIV Checks”, in the Project Properties – Advanced Optimizations dialog box.
