Não pode escolher mais do que 25 tópicos
Os tópicos devem começar com uma letra ou um número, podem incluir traços ('-') e podem ter até 35 caracteres.
|
- module CQuery
- implicit none
- public GetCurrentProcessorNumber
-
- interface
-
- function GetCurrentProcessorNumber() bind(C,Name='GetCurrentProcessorNumber')
- use ifwinty
- implicit none
- !DEC$ ATTRIBUTES STDCALL :: GetCurrentProcessorNumber
- integer(DWORD) :: GetCurrentProcessorNumber
- end function GetCurrentProcessorNumber
-
- end interface
-
- contains
- end module CQuery
|