From de3e51becaddd350dc550d7ca828e125c3361e5d Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Tue, 1 Aug 2017 11:04:05 +0200
Subject: fftunit.pas: add assertion about buggy data order

---
 fftunit.pas | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/fftunit.pas b/fftunit.pas
index 7b5995f..fd3e9cb 100644
--- a/fftunit.pas
+++ b/fftunit.pas
@@ -167,6 +167,8 @@ begin
   inherited create;
   inO:=inputOrdnung;
   outO:=outputOrdnung;
+  if (inO=doAlleResSmi) or (outO=doAlleResSmi) then
+    raise exception.create('Die Datenordnung doAlleResSmi ist momentan noch verbugt!');
   len:=laenge;
   hLen:=laenge div 2;
   fillchar(res,sizeOf(res),#0);
@@ -180,6 +182,8 @@ begin
   inherited create;
   inO:=original.inO;
   outO:=original.outO;
+  if (inO=doAlleResSmi) or (outO=doAlleResSmi) then
+    raise exception.create('Die Datenordnung doAlleResSmi ist momentan noch verbugt!');
   len:=original.len;
   hLen:=original.hLen;
   fillchar(res,sizeOf(res),#0);
-- 
cgit v1.2.3-70-g09d2