/
aprogrammer
/
dotnet-docs
Обзор
Документация
Войти
/
aprogrammer
/
dotnet-docs
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
main
docs/fundamentals/runtime-libraries/snippets/System/Exception/Overview/fsharp/example.fs
33 строки
882 B
Genevieve Warren
Remarks for exception types and Registry class (#38930)
03 янв 2024, 22:30
Не верифицирован
03 янв 2024, 22:30
932bcca
Код
Авторство
О чём код?
module example // <Snippet3> open System open System.Reflection let limit = 10000000 let primes = PrimeNumberGenerator limit let start = 1000001 try let values = primes.GetPrimesFrom start printfn $"There are {values.Length} prime numbers from {start} to {limit}" with :? NotPrimeException as e -> printfn $"{e.NonPrime} is not prime" printfn $"{e}" printfn "--------" let domain = AppDomain.CreateDomain "Domain2" let gen = domain.CreateInstanceAndUnwrap( typeof<PrimeNumberGenerator>.Assembly.FullName, "PrimeNumberGenerator", true, BindingFlags.Default, null, [| box 1000000 |], null, null) :?> PrimeNumberGenerator try let start = 100 printfn $"{gen.GetPrimesFrom start}" with :? NotPrimeException as e -> printfn $"{e.NonPrime} is not prime" printfn $"{e}" printfn "--------" // </Snippet3>