tmask.pp\math\units\test\tests\riscv_new - delta/fpc.git - svn.freepascal.org: svn/fpc

index : delta/fpc.git

svn.freepascal.org: svn/fpc

summary refs log tree commit diff

path: root/riscv_new/tests/test/units/math/tmask.pp

blob: a321f88e674b8ed1ed6ec4ee1c651ae7982a5d1d (plain)

{ %OPT=-CE }
program fpu;

{$mode delphi}

uses SysUtils,Math;

var
  f1,f2 : double;
  caught: boolean;

{$include tmask.inc}