大家省省吧，都是在PostgreSQL上改改敢自称自主知识产权

〇〇 · 发表于 2012-11-3 18:25

把递归改为循环就看不出差距了
SQL> create or replace function f2(x integer) return integer as
2 a integer;
3 b integer;
4 s integer;
5 begin
6 a :=1;
7 b :=1;
8 s :=0;
9    if x <= 2 then
10    return 1;
11    end if;
12    for i in 3..x loop
13    if mod(i, 2)= 1 then
14    a :=a+b;
15    s :=a;
16    else
17    b :=a+b;
18    s :=b;
19    end if;
20    end loop;
21    return s;
22 end;

Use time:31 ms.
ok.

SQL> select f2(30);

Use time:0 ms.

EXPR1(INTEGER)  |

-------------------------------------L1-------------------------------------
832040 |

Total 1 records.

SQL> select f2(40);

Use time:0 ms.

EXPR1(INTEGER)  |

-------------------------------------L1-------------------------------------
102334155 |

Total 1 records.

SQL> select f2(42);

Use time:0 ms.

EXPR1(INTEGER)  |

-------------------------------------L1-------------------------------------
267914296 |

Total 1 records.

SQL>
~~~~~~~~~~~~~~~~
SQL>create or replace function f2(x integer) return integer as
2 a int=1;
3 b int=1;
4 s int=0;
5 begin
6    if x <= 2 then
7    return 1;
8    end if;
9    for i in 3..x loop
10 if mod(i, 2)= 1 then
11 a:=a+b;
12 s:=a;
13 else
14 b:=a+b;
15 s:=b;
16 end if;
17 end loop;
18 return s;
19  end;
20  /
操作已执行
已用时间: 161.458(ms) clock tick:0. Execute id is 19.

SQL>select f2(30);

行号    f2(30)
---------- ----------
1       832040

已用时间: 1.208(ms) clock tick:0. Execute id is 20.
SQL>select f2(40);

行号    f2(40)
---------- ----------
1       102334155

已用时间: 0.875(ms) clock tick:0. Execute id is 23.

SQL>select f2(42);

行号    f2(42)
---------- ----------
1       267914296

已用时间: 0.867(ms) clock tick:0. Execute id is 24.

SQL>

pkmonster · 发表于 2012-11-4 08:44

这个递归函数的性能, dm7与dm6相比,确实略有退步,主要原因是dm7采用了类似JAVA虚拟机的异常表, 还有为了支持脚本的调试, 每一次调用都显式创建了栈帧与表达式值栈, 代价相对比较大。

目前这个函数性能与oracle相比大致相当，后面会继续改进。

〇〇 · 发表于 2012-11-5 19:14

pkmonster 发表于 2012-11-4 08:44
这个递归函数的性能, dm7与dm6相比,确实略有退步,主要原因是dm7采用了类似JAVA虚拟机的异常表, 还有为了支持 ...

linux上的dm7
SQL>conn sysdba/sysdba
conn sysdba/sysdba

服务器[LOCALHOST:5236]:处于普通打开状态
使用普通用户登录

登录使用时间 :3.820(ms)
SQL>create function f1(x integer) return integer as
create function f1(x integer) return integer as
2 begin
3    if x <= 2 then
4    return 1;
5    end if;
6    return f1(x - 1) + f1(x - 2);
7 end;
8 /
操作已执行
已用时间: 5.239(ms).Execute id is 521.

SQL>select f1(30) from dual;
select f1(30) from dual;

行号    f1(30)
---------- -----------
1       832040

已用时间: 882.173(ms).Execute id is 522.

SQL>select f1(35) from dual;
select f1(35) from dual;

行号    f1(35)
---------- -----------
1       9227465

已用时间: 00:00:09.750. Execute id is 523.

SQL>

〇〇 · 发表于 2012-11-5 19:16

〇〇发表于 2012-11-5 19:14
linux上的dm7
SQL>conn sysdba/sysdba
conn sysdba/sysdba

同样的linux上的oracle
SQL> create function f1(x integer) return integer as
  2  begin
  3 if x <= 2 then
  4    return 1;
  5 end if;
  6 return f1(x - 1) + f1(x - 2);
  7  end;
  8  /

函数已创建。

已用时间:  00: 00: 00.03
SQL> select f(30) from dual;
select f(30) from dual
   *
第 1 行出现错误:
ORA-00904: "F": 标识符无效

已用时间:  00: 00: 00.03
SQL> c/f/f1
  1* select f1(30) from dual
SQL> /

F1(30)
----------
832040

已用时间:  00: 00: 00.54
SQL> c/30/35
  1* select f1(35) from dual
SQL> /

F1(35)
----------
9227465

已用时间:  00: 00: 05.94

〇〇 · 发表于 2012-11-5 19:19

〇〇发表于 2012-11-5 19:16
同样的linux上的oracle
SQL> create function f1(x integer) return integer as
2 begin

oracle本地编译快了1半
SQL> alter session set plsql_code_type = native;

会话已更改。

已用时间:  00: 00: 00.01
SQL> alter function f1 compile;

函数已更改。

已用时间:  00: 00: 00.46
SQL> select f1(30) from dual;

F1(30)
----------
832040

已用时间:  00: 00: 00.34
SQL> select f1(35) from dual;

F1(35)
----------
9227465

已用时间:  00: 00: 03.66
SQL>