LONG FAR PASCAL AFX_EXPORT
AfxWndProc(HWND hWnd, UINT message, UINT wParam, LONG lParam)
{
    register CWnd* pWnd;

    pWnd = CWnd::FromHandlePermanent(hWnd);
    ASSERT(pWnd != NULL);
    ASSERT(pWnd->m_hWnd == hWnd);

    LONG lResult = _AfxCallWndProc(pWnd, hWnd, message,
                                   wParam, lParam);

    return lResult;
}
