From 18ca3940994716110e0ed95ac17adc7a53b39397 Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Wed, 29 Jul 2015 16:14:32 +0200
Subject: kleine Erklaerung zu Fehler in exprToFloat eingebaut

---
 matheunit.pas | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/matheunit.pas b/matheunit.pas
index 9525fe3..7fc3188 100644
--- a/matheunit.pas
+++ b/matheunit.pas
@@ -54,6 +54,7 @@ constructor tKnownValues.create;
 begin
   inherited create;
   fillchar(kvs,sizeof(kvs),#0);
+  add('π',pi);
 end;
 
 destructor tKnownValues.destroy;
@@ -472,7 +473,12 @@ begin
   if not cbv then result:=strtofloat(s)
   else if not kvs.extract(s,result) then begin
     if st then result:=1
-    else if assigned(cbgv) then result:=cbgv(s);
+    else if assigned(cbgv) then result:=cbgv(s)
+    else begin
+      result:=nan;
+      gibAus(''''+s+''' kann ich nicht auflösen!',3);
+      halt(1);
+    end;
   end;
 (*   if s='np' then result:=params.np
   else if s='maxw' then result:=params.maxW
-- 
cgit v1.2.3-70-g09d2