X-Git-Url: https://scm.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/c7f552fd8888da2f0d8cfb228fe0f28d3df3a12c..b4b6f2ea75b9f0f3ca918f5b84016610bf7a4d4f:/interpretor/faust-0.9.47mr3/compiler/extended/logprim.cpp diff --git a/interpretor/faust-0.9.47mr3/compiler/extended/logprim.cpp b/interpretor/faust-0.9.47mr3/compiler/extended/logprim.cpp deleted file mode 100644 index 0c4cf55..0000000 --- a/interpretor/faust-0.9.47mr3/compiler/extended/logprim.cpp +++ /dev/null @@ -1,68 +0,0 @@ -#include "xtended.hh" -#include "Text.hh" -#include - -#include "floats.hh" - -class LogPrim : public xtended -{ - - public: - - LogPrim() : xtended("log") {} - - virtual unsigned int arity () { return 1; } - - virtual bool needCache () { return true; } - - virtual Type infereSigType (const vector& args) - { - assert (args.size() == arity()); - interval i = args[0]->getInterval(); - if (i.valid & i.lo>0) { - return castInterval(floatCast(args[0]), interval(log(i.lo), log(i.hi))); - } else { - return floatCast(args[0]); - } - } - - virtual void sigVisit (Tree sig, sigvisitor* visitor) {} - - virtual int infereSigOrder (const vector& args) { - assert (args.size() == arity()); - return args[0]; - } - - - virtual Tree computeSigOutput (const vector& args) { - num n; - assert (args.size() == arity()); - if (isNum(args[0],n)) { - return tree(log(double(n))); - } else { - return tree(symbol(), args[0]); - } - } - - virtual string generateCode (Klass* klass, const vector& args, const vector& types) - { - assert (args.size() == arity()); - assert (types.size() == arity()); - - return subst("log$1($0)", args[0], isuffix()); - } - - virtual string generateLateq (Lateq* lateq, const vector& args, const vector& types) - { - assert (args.size() == arity()); - assert (types.size() == arity()); - - return subst("\\ln\\left( $0 \\right)", args[0]); - } - -}; - - -xtended* gLogPrim = new LogPrim(); - -