Menu
▾
▴
easycalc-commits — Read-only list for CVS commits
You can subscribe to this list here.
| 2006 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
(36) |
Sep
(44) |
Oct
(25) |
Nov
(2) |
Dec
(5) |
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 2007 |
Jan
(1) |
Feb
(1) |
Mar
|
Apr
|
May
(9) |
Jun
|
Jul
(4) |
Aug
(8) |
Sep
(16) |
Oct
|
Nov
(2) |
Dec
(28) |
| 2008 |
Jan
|
Feb
(2) |
Mar
|
Apr
|
May
(11) |
Jun
|
Jul
|
Aug
|
Sep
(2) |
Oct
|
Nov
|
Dec
|
| 2009 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
(33) |
Jul
(5) |
Aug
(7) |
Sep
(9) |
Oct
(31) |
Nov
(25) |
Dec
(21) |
| 2011 |
Jan
(2) |
Feb
(12) |
Mar
|
Apr
(7) |
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
|
From: Jorge G. <cl...@us...> - 2006-09-24 14:18:32
|
Update of /cvsroot/easycalc/easycalc/mlib In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv18338 Modified Files: slist.c Log Message: fixed crash Index: slist.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/mlib/slist.c,v retrieving revision 1.32 retrieving revision 1.33 diff -C2 -d -r1.32 -r1.33 *** slist.c 12 Sep 2006 19:40:56 -0000 1.32 --- slist.c 24 Sep 2006 14:18:26 -0000 1.33 *************** *** 743,749 **** return err; ! if (intarg == 0 || intarg > lst->size) return c_baddim; ! result = lst->item[intarg-1]; err = stack_add_val(stack,&result,complex); --- 743,751 ---- return err; ! if (intarg == 0 || intarg > lst->size){ ! list_delete(lst); return c_baddim; ! } ! result = lst->item[intarg-1]; err = stack_add_val(stack,&result,complex); |
|
From: Ton v. O. <tvo...@us...> - 2006-09-23 23:40:36
|
Update of /cvsroot/easycalc/easycalc In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv16071 Modified Files: main.c result.c Log Message: "Clr" button erases not only input field, but also result field. On initial startup also show a cleared result field instead of "0". Index: main.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/main.c,v retrieving revision 1.68 retrieving revision 1.69 diff -C2 -d -r1.68 -r1.69 *** main.c 12 Sep 2006 19:40:55 -0000 1.68 --- main.c 23 Sep 2006 23:40:30 -0000 1.69 *************** *** 1033,1036 **** --- 1033,1038 ---- field = GetObjectPtr(tdInput); FldDelete(field,0,FldGetTextLength(field)); + result_set_text("", notype); + result_draw(); break; case btnMainDot: Index: result.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/result.c,v retrieving revision 1.31 retrieving revision 1.32 diff -C2 -d -r1.31 -r1.32 *** result.c 12 Sep 2006 19:40:55 -0000 1.31 --- result.c 23 Sep 2006 23:40:30 -0000 1.32 *************** *** 367,371 **** MemPtrFree(prefData); } else ! result_set_text("0",notype); } } --- 367,371 ---- MemPtrFree(prefData); } else ! result_set_text("",notype); } } |
|
From: Jorge G. <cl...@us...> - 2006-09-23 22:13:08
|
Update of /cvsroot/easycalc/easycalc/mlib In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv16021/mlib Modified Files: stack.c Log Message: removed unused function stack_item_type_nr Index: stack.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/mlib/stack.c,v retrieving revision 1.35 retrieving revision 1.36 diff -C2 -d -r1.35 -r1.36 *** stack.c 12 Sep 2006 19:40:56 -0000 1.35 --- stack.c 23 Sep 2006 22:13:05 -0000 1.36 *************** *** 515,531 **** } - CError - stack_item_type_nr(CodeStack *stack,rpntype *type,Int16 itnum) - { - Trpn tmp; - - if (stack->size<itnum) - return c_internal; - tmp = stack->stack[stack->size - itnum -1]; - - *type = tmp.type; - return c_noerror; - } - /*********************************************************************** * --- 515,518 ---- |
|
From: Jorge G. <cl...@us...> - 2006-09-23 22:13:08
|
Update of /cvsroot/easycalc/easycalc/include In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv16021/include Modified Files: stack.h Log Message: removed unused function stack_item_type_nr Index: stack.h =================================================================== RCS file: /cvsroot/easycalc/easycalc/include/stack.h,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** stack.h 12 Sep 2006 19:40:55 -0000 1.6 --- stack.h 23 Sep 2006 22:13:05 -0000 1.7 *************** *** 45,49 **** void stack_delete(CodeStack *stack) MLIB; void stack_copy(CodeStack *dest,CodeStack *orig) MLIB; - CError stack_item_type_nr(CodeStack *stack,rpntype *type,Int16 itnum) MLIB; void stack_reverse(CodeStack *stack) MLIB; double reduce_precision(double value) MLIB; --- 45,48 ---- |
|
From: Jorge G. <cl...@us...> - 2006-09-23 21:52:06
|
Update of /cvsroot/easycalc/easycalc In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv7619 Modified Files: grsetup.c Log Message: Index: grsetup.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/grsetup.c,v retrieving revision 1.22 retrieving revision 1.23 diff -C2 -d -r1.22 -r1.23 *** grsetup.c 12 Sep 2006 19:40:55 -0000 1.22 --- grsetup.c 23 Sep 2006 21:52:03 -0000 1.23 *************** *** 579,583 **** if(graphPrefs.functype!=graph_param || i%2==0){ ! Coord x1=x,x2=x+HanderaCoord(3),x3=x+HanderaCoord(5); Coord y1=y,y2=y-HanderaCoord(2),y3=y-HanderaCoord(4); --- 579,583 ---- if(graphPrefs.functype!=graph_param || i%2==0){ ! Coord x1=x,x2=x+HanderaCoord(3),x3=x+HanderaCoord(6); Coord y1=y,y2=y-HanderaCoord(2),y3=y-HanderaCoord(4); |
|
From: Jorge G. <cl...@us...> - 2006-09-23 20:57:38
|
Update of /cvsroot/easycalc/easycalc In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv19322 Modified Files: calc.rcp.in Log Message: fixed bug Index: calc.rcp.in =================================================================== RCS file: /cvsroot/easycalc/easycalc/calc.rcp.in,v retrieving revision 1.108 retrieving revision 1.109 diff -C2 -d -r1.108 -r1.109 *** calc.rcp.in 14 Sep 2006 13:46:08 -0000 1.108 --- calc.rcp.in 23 Sep 2006 20:57:33 -0000 1.109 *************** *** 1218,1222 **** BEGIN BITMAP "bitmaps/ldel.bmp" BPP 1 DENSITY 72 - BITMAP "bitmaps/ldel-hi.bmp" BPP 1 DENSITY 144 END #endif --- 1218,1221 ---- *************** *** 1269,1273 **** BEGIN BITMAP "bitmaps/pprime.bmp" BPP 1 DENSITY 72 - BITMAP "bitmaps/pprime-hi.bmp" BPP 1 DENSITY 144 END #endif --- 1268,1271 ---- *************** *** 1283,1297 **** #else #ifdef SONY_SDK ! BITMAP ID bmpPrevPrime COMPRESS BEGIN ! BITMAP "bitmaps/pprime.bmp" BPP 1 DENSITY 72 ! BITMAP "bitmaps/pprime-hi.bmp" BPP 1 DENSITY 144 END #else ! BITMAP ID bmpPrevPrime COMPRESS BEGIN ! BITMAP "bitmaps/pprime.bmp" BPP 1 DENSITY 72 END #endif --- 1281,1295 ---- #else #ifdef SONY_SDK ! BITMAP ID bmpNextPrime COMPRESS BEGIN ! BITMAP "bitmaps/nprime.bmp" BPP 1 DENSITY 72 ! BITMAP "bitmaps/nprime-hi.bmp" BPP 1 DENSITY 144 END #else ! BITMAP ID bmpNextPrime COMPRESS BEGIN ! BITMAP "bitmaps/nprime.bmp" BPP 1 DENSITY 72 END #endif |
Update of /cvsroot/easycalc/easycalc/langs In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv4465 Modified Files: cs.rcp de.rcp en.rcp fr.rcp it.rcp ja.rcp pt.rcp ru_koi8.rcp ru_win.rcp sp.rcp Log Message: added step button in Table Mode Index: it.rcp =================================================================== RCS file: /cvsroot/easycalc/easycalc/langs/it.rcp,v retrieving revision 1.17 retrieving revision 1.18 diff -C2 -d -r1.17 -r1.18 *** it.rcp 6 Sep 2006 00:41:31 -0000 1.17 --- it.rcp 22 Sep 2006 20:05:14 -0000 1.18 *************** *** 243,246 **** --- 243,247 ---- "$$TABLE MODE" = "Modalità tabella" "$$GOTO" = "Vai a" + "$$STEP" = "Passo" "$$GO" = "Vai" "$$SETUP GRAPHS..." = "Setup grafici..." Index: en.rcp =================================================================== RCS file: /cvsroot/easycalc/easycalc/langs/en.rcp,v retrieving revision 1.48 retrieving revision 1.49 diff -C2 -d -r1.48 -r1.49 *** en.rcp 6 Sep 2006 00:41:31 -0000 1.48 --- en.rcp 22 Sep 2006 20:05:14 -0000 1.49 *************** *** 231,234 **** --- 231,235 ---- "$$TABLE MODE" = "Table Mode" "$$GOTO" = "GoTo" + "$$STEP" = "Step" "$$GO" = "Go" "$$SETUP GRAPHS..." = "Setup Graphs..." Index: ru_koi8.rcp =================================================================== RCS file: /cvsroot/easycalc/easycalc/langs/ru_koi8.rcp,v retrieving revision 1.14 retrieving revision 1.15 diff -C2 -d -r1.14 -r1.15 *** ru_koi8.rcp 6 Sep 2006 00:41:31 -0000 1.14 --- ru_koi8.rcp 22 Sep 2006 20:05:14 -0000 1.15 *************** *** 231,234 **** --- 231,235 ---- "$$TABLE MODE" = "ôÁÂÌÉÞÎÙÊ ÒÅÖÉÍ" "$$GOTO" = "éÄÔÉ ÎÁ" + "$$STEP" = "Step" "$$GO" = "éÄÔÉ" "$$SETUP GRAPHS..." = "÷ÙÂÏÒ ÇÒÁÆÉËÁ..." Index: cs.rcp =================================================================== RCS file: /cvsroot/easycalc/easycalc/langs/cs.rcp,v retrieving revision 1.29 retrieving revision 1.30 diff -C2 -d -r1.29 -r1.30 *** cs.rcp 6 Sep 2006 00:41:31 -0000 1.29 --- cs.rcp 22 Sep 2006 20:05:14 -0000 1.30 *************** *** 229,232 **** --- 229,233 ---- "$$TABLE MODE" = "Mód tabulka" "$$GOTO" = "Jdi Na" + "$$STEP" = "Step" "$$GO" = "Jdi" "$$SETUP GRAPHS..." = "Výbìr grafù..." Index: pt.rcp =================================================================== RCS file: /cvsroot/easycalc/easycalc/langs/pt.rcp,v retrieving revision 1.16 retrieving revision 1.17 diff -C2 -d -r1.16 -r1.17 *** pt.rcp 6 Sep 2006 00:41:31 -0000 1.16 --- pt.rcp 22 Sep 2006 20:05:14 -0000 1.17 *************** *** 240,243 **** --- 240,244 ---- "$$TABLE MODE" = "Modo Tabela" "$$GOTO" = "Ir a" + "$$STEP" = "Passo" "$$GO" = "Ir a" "$$SETUP GRAPHS..." = "Configurar Gráfico..." Index: ru_win.rcp =================================================================== RCS file: /cvsroot/easycalc/easycalc/langs/ru_win.rcp,v retrieving revision 1.13 retrieving revision 1.14 diff -C2 -d -r1.13 -r1.14 *** ru_win.rcp 6 Sep 2006 00:41:31 -0000 1.13 --- ru_win.rcp 22 Sep 2006 20:05:14 -0000 1.14 *************** *** 232,235 **** --- 232,236 ---- "$$TABLE MODE" = "Òàáëè÷íûé ðåæèì" "$$GOTO" = "Èäòè íà" + "$$STEP" = "Step" "$$GO" = "Èäòè" "$$SETUP GRAPHS..." = "Âûáîð ãðàôèêà..." Index: ja.rcp =================================================================== RCS file: /cvsroot/easycalc/easycalc/langs/ja.rcp,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** ja.rcp 6 Sep 2006 00:41:31 -0000 1.6 --- ja.rcp 22 Sep 2006 20:05:14 -0000 1.7 *************** *** 232,235 **** --- 232,236 ---- "$$TABLE MODE" = "lê" "$$GOTO" = "Ú®" + "$$STEP" = "Step" "$$GO" = "Ú®" "$$SETUP GRAPHS..." = "Ot\¬.." Index: fr.rcp =================================================================== RCS file: /cvsroot/easycalc/easycalc/langs/fr.rcp,v retrieving revision 1.18 retrieving revision 1.19 diff -C2 -d -r1.18 -r1.19 *** fr.rcp 6 Sep 2006 01:23:23 -0000 1.18 --- fr.rcp 22 Sep 2006 20:05:14 -0000 1.19 *************** *** 244,247 **** --- 244,248 ---- "$$TABLE MODE" = "Mode table" "$$GOTO" = "Aller à" + "$$STEP" = "Pas" "$$GO" = "Aller" "$$SETUP GRAPHS..." = "Configuration graphique..." Index: sp.rcp =================================================================== RCS file: /cvsroot/easycalc/easycalc/langs/sp.rcp,v retrieving revision 1.41 retrieving revision 1.42 diff -C2 -d -r1.41 -r1.42 *** sp.rcp 6 Sep 2006 00:41:31 -0000 1.41 --- sp.rcp 22 Sep 2006 20:05:14 -0000 1.42 *************** *** 241,244 **** --- 241,245 ---- "$$TABLE MODE" = "Modo Tabla" "$$GOTO" = "Ir a" + "$$STEP" = "Paso" "$$GO" = "Ir a" "$$SETUP GRAPHS..." = "Configurar Gráfico..." Index: de.rcp =================================================================== RCS file: /cvsroot/easycalc/easycalc/langs/de.rcp,v retrieving revision 1.42 retrieving revision 1.43 diff -C2 -d -r1.42 -r1.43 *** de.rcp 6 Sep 2006 00:41:31 -0000 1.42 --- de.rcp 22 Sep 2006 20:05:14 -0000 1.43 *************** *** 240,243 **** --- 240,244 ---- "$$TABLE MODE" = "Tabellenmodus" "$$GOTO" = "Gehe Zu" + "$$STEP" = "Schritt" "$$GO" = "Gz" "$$SETUP GRAPHS..." = "Funktionen ..." |
|
From: Jorge G. <cl...@us...> - 2006-09-22 20:04:50
|
Update of /cvsroot/easycalc/easycalc In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv4438 Modified Files: grtable.c Log Message: added step button in Table Mode Index: grtable.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/grtable.c,v retrieving revision 1.22 retrieving revision 1.23 diff -C2 -d -r1.22 -r1.23 *** grtable.c 12 Sep 2006 19:40:55 -0000 1.22 --- grtable.c 22 Sep 2006 20:04:47 -0000 1.23 *************** *** 227,230 **** --- 227,240 ---- } + static void grtable_step(void) GRAPH; + static void + grtable_step(void) + { + if (varmgr_get_double(&rowStep,"Set step value")) { + TblMarkTableInvalid(GetObjectPtr(grTableTable)); + TblRedrawTable(GetObjectPtr(grTableTable)); + } + } + /*********************************************************************** * *************** *** 300,303 **** --- 310,317 ---- handled = true; break; + case grTableStep: + grtable_step(); + handled = true; + break; case grTableLeft: firstCol--; |
|
From: Jorge G. <cl...@us...> - 2006-09-22 20:04:40
|
Update of /cvsroot/easycalc/easycalc In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv4404 Modified Files: graph.rcp.in Log Message: added step button in Table Mode Index: graph.rcp.in =================================================================== RCS file: /cvsroot/easycalc/easycalc/graph.rcp.in,v retrieving revision 1.30 retrieving revision 1.31 diff -C2 -d -r1.30 -r1.31 *** graph.rcp.in 23 Aug 2006 17:55:55 -0000 1.30 --- graph.rcp.in 22 Sep 2006 20:04:37 -0000 1.31 *************** *** 25,32 **** TITLE "$$TABLE MODE" ! BUTTON "<" ID grTableLeft AT (70 140 12 12) ! BUTTON ">" ID grTableRight AT (PREVRIGHT+5 PREVTOP 12 12) ! BUTTON "$$GOTO" ID grTableGoto AT (PREVRIGHT+10 PREVTOP AUTO 12) ! TABLE ID grTableTable AT (5 15 150 110) ROWS 10 COLUMNS 3 COLUMNWIDTHS 50 50 50 BUTTON "$$DONE" ID grTableDone AT (5 140 40 12) --- 25,33 ---- TITLE "$$TABLE MODE" ! BUTTON "<" ID grTableLeft AT (52 140 12 12) ! BUTTON ">" ID grTableRight AT (PREVRIGHT+4 PREVTOP 12 12) ! BUTTON "$$STEP" ID grTableStep AT (PREVRIGHT+6 PREVTOP 30 12) ! BUTTON "$$GOTO" ID grTableGoto AT (PREVRIGHT+6 PREVTOP 30 12) ! TABLE ID grTableTable AT (5 15 150 110) ROWS 10 COLUMNS 3 COLUMNWIDTHS 50 50 50 BUTTON "$$DONE" ID grTableDone AT (5 140 40 12) |
|
From: Jorge G. <cl...@us...> - 2006-09-22 20:04:24
|
Update of /cvsroot/easycalc/easycalc In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv4354 Modified Files: calcrsc.h Log Message: added step button in Table Mode Index: calcrsc.h =================================================================== RCS file: /cvsroot/easycalc/easycalc/calcrsc.h,v retrieving revision 1.59 retrieving revision 1.60 diff -C2 -d -r1.59 -r1.60 *** calcrsc.h 12 Sep 2006 19:40:55 -0000 1.59 --- calcrsc.h 22 Sep 2006 20:04:20 -0000 1.60 *************** *** 380,383 **** --- 380,384 ---- #define grTableDone 4604 #define grTableGoto 4605 + #define grTableStep 4606 #define dinputForm 4700 |
|
From: Jorge G. <cl...@us...> - 2006-09-22 17:59:58
|
Update of /cvsroot/easycalc/easycalc/mlib In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv10171 Modified Files: cmatrix.c matrix.c Log Message: bug fixed Index: cmatrix.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/mlib/cmatrix.c,v retrieving revision 1.25 retrieving revision 1.26 diff -C2 -d -r1.25 -r1.26 *** cmatrix.c 22 Sep 2006 15:06:32 -0000 1.25 --- cmatrix.c 22 Sep 2006 17:59:53 -0000 1.26 *************** *** 1091,1119 **** case MATRIX_ECHELON: r = cmatrix_echelon(m); - cmatrix_delete(m); - m = r; break; case FUNC_CONJ: /* Transpose */ r = cmatrix_transpose(m); - cmatrix_delete(m); - m = r; break; case MATRIX_QRQ: r = cmatrix_qrq(m); ! if (r == NULL) { err = c_singular; - break; - } - cmatrix_delete(m); - m = r; break; case MATRIX_QRR: r = cmatrix_qrr(m); ! if (r == NULL) { err = c_singular; - break; - } - cmatrix_delete(m); - m = r; break; case MATRIX_QRS: --- 1091,1107 ---- case MATRIX_ECHELON: r = cmatrix_echelon(m); break; case FUNC_CONJ: /* Transpose */ r = cmatrix_transpose(m); break; case MATRIX_QRQ: r = cmatrix_qrq(m); ! if (r == NULL) err = c_singular; break; case MATRIX_QRR: r = cmatrix_qrr(m); ! if (r == NULL) err = c_singular; break; case MATRIX_QRS: *************** *** 1123,1141 **** } r = cmatrix_qrs(m); ! if (r == NULL){ err = c_singular; - break; - } - cmatrix_delete(m); - m = r; break; default: ! return c_internal; } - if (!err) - err = stack_add_val(stack,&m,cmatrix); - cmatrix_delete(m); return err; } --- 1111,1128 ---- } r = cmatrix_qrs(m); ! if (r == NULL) err = c_singular; break; default: ! err = c_internal; ! break; } cmatrix_delete(m); + + if (!err){ + err = stack_add_val(stack,&r,cmatrix); + cmatrix_delete(r); + } return err; } *************** *** 1172,1176 **** break; default: ! return c_internal; } cmatrix_delete(m); --- 1159,1164 ---- break; default: ! err = c_internal; ! break; } cmatrix_delete(m); *************** *** 1252,1257 **** return err; ! if (col > m->cols || row > m->rows || col == 0 || row == 0) return c_baddim; if (func->paramcount == 2){ --- 1240,1247 ---- return err; ! if (col > m->cols || row > m->rows || col == 0 || row == 0){ ! cmatrix_delete(m); return c_baddim; + } if (func->paramcount == 2){ *************** *** 1260,1276 **** lresult = list_new(m->cols); for(i=0;i<m->cols;i++){ lresult->item[i] = MATRIX(m,row-1,i); } ! stack_add_val(stack,&lresult,list); list_delete(lresult); } else{ result = MATRIX(m,row-1,col-1); ! stack_add_val(stack, &result, complex); } cmatrix_delete(m); ! return c_noerror; ! } \ No newline at end of file --- 1250,1270 ---- lresult = list_new(m->cols); + if(!lresult){ + cmatrix_delete(m); + return c_memory; + } + for(i=0;i<m->cols;i++){ lresult->item[i] = MATRIX(m,row-1,i); } ! err = stack_add_val(stack,&lresult,list); list_delete(lresult); } else{ result = MATRIX(m,row-1,col-1); ! err = stack_add_val(stack, &result, complex); } cmatrix_delete(m); ! return err; } \ No newline at end of file Index: matrix.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/mlib/matrix.c,v retrieving revision 1.29 retrieving revision 1.30 diff -C2 -d -r1.29 -r1.30 *** matrix.c 22 Sep 2006 15:06:33 -0000 1.29 --- matrix.c 22 Sep 2006 17:59:53 -0000 1.30 *************** *** 791,819 **** case MATRIX_ECHELON: r = matrix_echelon(m); - matrix_delete(m); - m = r; break; case FUNC_CONJ: /* Transpose */ r = matrix_transpose(m); - matrix_delete(m); - m = r; break; case MATRIX_QRQ: r = matrix_qrq(m); ! if (r == NULL) { err = c_singular; - break; - } - matrix_delete(m); - m = r; break; case MATRIX_QRR: r = matrix_qrr(m); ! if (r == NULL) { err = c_singular; - break; - } - matrix_delete(m); - m = r; break; case MATRIX_QRS: --- 791,807 ---- case MATRIX_ECHELON: r = matrix_echelon(m); break; case FUNC_CONJ: /* Transpose */ r = matrix_transpose(m); break; case MATRIX_QRQ: r = matrix_qrq(m); ! if (r == NULL) err = c_singular; break; case MATRIX_QRR: r = matrix_qrr(m); ! if (r == NULL) err = c_singular; break; case MATRIX_QRS: *************** *** 823,841 **** } r = matrix_qrs(m); ! if (r == NULL){ err = c_singular; - break; - } - matrix_delete(m); - m = r; break; default: ! return c_internal; } - if (!err) - err = stack_add_val(stack,&m,matrix); - matrix_delete(m); return err; } --- 811,828 ---- } r = matrix_qrs(m); ! if (r == NULL) err = c_singular; break; default: ! err = c_internal; ! break; } matrix_delete(m); + + if (!err){ + err = stack_add_val(stack,&r,matrix); + matrix_delete(r); + } return err; } *************** *** 879,883 **** break; default: ! return c_internal; } matrix_delete(m); --- 866,871 ---- break; default: ! err = c_internal; ! break; } matrix_delete(m); *************** *** 925,930 **** return err; ! if (col > m->cols || row > m->rows || col == 0 || row == 0) return c_baddim; if (func->paramcount == 2){ --- 913,920 ---- return err; ! if (col > m->cols || row > m->rows || col == 0 || row == 0){ ! matrix_delete(m); return c_baddim; + } if (func->paramcount == 2){ *************** *** 933,951 **** lresult = list_new(m->cols); for(i=0;i<m->cols;i++){ lresult->item[i].real = MATRIX(m,row-1,i); lresult->item[i].imag = 0.0; } ! stack_add_val(stack,&lresult,list); list_delete(lresult); } else{ result = MATRIX(m,row-1,col-1); ! stack_add_val(stack, &result, real); } matrix_delete(m); ! return c_noerror; ! } --- 923,945 ---- lresult = list_new(m->cols); + if(!lresult){ + matrix_delete(m); + return c_memory; + } + for(i=0;i<m->cols;i++){ lresult->item[i].real = MATRIX(m,row-1,i); lresult->item[i].imag = 0.0; } ! err = stack_add_val(stack,&lresult,list); list_delete(lresult); } else{ result = MATRIX(m,row-1,col-1); ! err = stack_add_val(stack, &result, real); } matrix_delete(m); ! return err; } |
|
From: Jorge G. <cl...@us...> - 2006-09-22 15:06:38
|
Update of /cvsroot/easycalc/easycalc/mlib In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv5686/mlib Modified Files: cmatrix.c funcs.c matrix.c Log Message: matrix[i] returns row i of matrix in a list Index: cmatrix.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/mlib/cmatrix.c,v retrieving revision 1.24 retrieving revision 1.25 diff -C2 -d -r1.24 -r1.25 *** cmatrix.c 12 Sep 2006 19:40:56 -0000 1.24 --- cmatrix.c 22 Sep 2006 15:06:32 -0000 1.25 *************** *** 1213,1214 **** --- 1213,1276 ---- return err; } + + /*********************************************************************** + * + * FUNCTION: cmatrix_item + * + * DESCRIPTION: Function for the M[1:2] type of operation + * + * PARAMETERS: matrix, row [, column] + * + * RETURN: complex number or list + * + ***********************************************************************/ + CError + cmatrix_item(Functype *func, CodeStack *stack) + { + UInt32 row,col; + CError err; + Complex result; + CMatrix *m; + + if (func->paramcount == 3){ + err = stack_get_val(stack, &col, integer); + if (err) + return err; + } + else{ + if (func->paramcount != 2) + return c_badargcount; + col=1; + } + + err = stack_get_val(stack, &row, integer); + if (err) + return err; + + err = stack_get_val(stack, &m, cmatrix); + if (err) + return err; + + if (col > m->cols || row > m->rows || col == 0 || row == 0) + return c_baddim; + + if (func->paramcount == 2){ + List *lresult; + int i; + + lresult = list_new(m->cols); + for(i=0;i<m->cols;i++){ + lresult->item[i] = MATRIX(m,row-1,i); + } + stack_add_val(stack,&lresult,list); + list_delete(lresult); + } + else{ + result = MATRIX(m,row-1,col-1); + stack_add_val(stack, &result, complex); + } + + cmatrix_delete(m); + return c_noerror; + + } \ No newline at end of file Index: matrix.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/mlib/matrix.c,v retrieving revision 1.28 retrieving revision 1.29 diff -C2 -d -r1.28 -r1.29 *** matrix.c 12 Sep 2006 19:40:56 -0000 1.28 --- matrix.c 22 Sep 2006 15:06:33 -0000 1.29 *************** *** 893,899 **** * DESCRIPTION: Function for the M[1:2] type of operation * ! * PARAMETERS: matrix, row, column * ! * RETURN: real number * ***********************************************************************/ --- 893,899 ---- * DESCRIPTION: Function for the M[1:2] type of operation * ! * PARAMETERS: matrix, row [, column] * ! * RETURN: real number or list * ***********************************************************************/ *************** *** 904,951 **** CError err; double result; ! Complex cresult; ! rpntype type; ! if (func->paramcount != 3) ! return c_badargcount; - err = stack_get_val(stack, &col, integer); - if (err) - return err; err = stack_get_val(stack, &row, integer); if (err) return err; ! err = stack_item_type(stack,&type,0); ! if (err) return err; ! if (type == matrix) { ! Matrix *m; ! err = stack_get_val(stack, &m, matrix); ! if (err) ! return err; ! if (col > m->cols || row > m->rows || ! col == 0 || row == 0) ! return c_baddim; ! result = MATRIX(m,row-1,col-1); ! err = stack_add_val(stack, &result, real); ! matrix_delete(m); ! } else if (type == cmatrix) { ! CMatrix *m; ! err = stack_get_val(stack, &m, cmatrix); ! if (err) ! return err; ! if (col > m->cols || row > m->rows || ! col == 0 || row == 0) ! return c_baddim; ! ! cresult = MATRIX(m,row-1,col-1); ! err = stack_add_val(stack, &cresult, complex); ! cmatrix_delete(m); ! } else ! err = c_badarg; ! return err; } --- 904,951 ---- CError err; double result; ! Matrix *m; ! if (func->paramcount == 3){ ! err = stack_get_val(stack, &col, integer); ! if (err) ! return err; ! } ! else{ ! if (func->paramcount != 2) ! return c_badargcount; ! col=1; ! } err = stack_get_val(stack, &row, integer); if (err) return err; ! err = stack_get_val(stack, &m, matrix); ! if (err) return err; ! if (col > m->cols || row > m->rows || col == 0 || row == 0) ! return c_baddim; ! ! if (func->paramcount == 2){ ! List *lresult; ! int i; ! ! lresult = list_new(m->cols); ! for(i=0;i<m->cols;i++){ ! lresult->item[i].real = MATRIX(m,row-1,i); ! lresult->item[i].imag = 0.0; ! } ! stack_add_val(stack,&lresult,list); ! list_delete(lresult); ! } ! else{ result = MATRIX(m,row-1,col-1); ! stack_add_val(stack, &result, real); ! } ! ! matrix_delete(m); ! return c_noerror; ! } Index: funcs.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/mlib/funcs.c,v retrieving revision 1.49 retrieving revision 1.50 diff -C2 -d -r1.49 -r1.50 *** funcs.c 12 Sep 2006 19:40:56 -0000 1.49 --- funcs.c 22 Sep 2006 15:06:33 -0000 1.50 *************** *** 45,48 **** --- 45,49 ---- #include "slist.h" #include "matrix.h" + #include "cmatrix.h" /* If we are just drawing the graph, set this variable. */ *************** *** 1028,1040 **** func_item(Functype *func, CodeStack *stack) { ! rpntype type1; ! UInt32 arg1=0,arg2=0; ! Trpn item,ritem; CError err; if (func->paramcount == 2) ! err = stack_item_type_nr(stack,&type1,1); else if (func->paramcount == 3) ! err = stack_item_type_nr(stack,&type1,2); else err = c_badargcount; --- 1029,1039 ---- func_item(Functype *func, CodeStack *stack) { ! rpntype type; CError err; if (func->paramcount == 2) ! err = stack_item_type(stack,&type,1); else if (func->paramcount == 3) ! err = stack_item_type(stack,&type,2); else err = c_badargcount; *************** *** 1042,1067 **** return err; ! if (type1 == variable) { ! err = stack_get_val(stack,&arg2,integer); ! if (err) ! return err; ! if (func->paramcount == 3) { ! err = stack_get_val(stack,&arg1,integer); ! if (err) ! return err; ! } ! item = stack_pop(stack); ! ritem.allocsize = 0; ! ritem.type = litem; ! StrCopy(ritem.u.litemval.name,item.u.varname); ! ritem.u.litemval.row = arg1; ! ritem.u.litemval.col = arg2; ! stack_push(stack,ritem); ! rpn_delete(item); ! } else if (func->paramcount == 2) return list_item(func,stack); ! else return matrix_item(func,stack); ! return c_noerror; } #else /* Not specfun enabled */ --- 1041,1055 ---- return err; ! switch (type){ ! case list: return list_item(func,stack); ! case matrix: return matrix_item(func,stack); ! case cmatrix: ! return cmatrix_item(func,stack); ! default: ! return c_badarg; ! } ! } #else /* Not specfun enabled */ |
|
From: Jorge G. <cl...@us...> - 2006-09-22 15:06:38
|
Update of /cvsroot/easycalc/easycalc/include In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv5686/include Modified Files: cmatrix.h Log Message: matrix[i] returns row i of matrix in a list Index: cmatrix.h =================================================================== RCS file: /cvsroot/easycalc/easycalc/include/cmatrix.h,v retrieving revision 1.9 retrieving revision 1.10 diff -C2 -d -r1.9 -r1.10 *** cmatrix.h 12 Sep 2006 19:40:55 -0000 1.9 --- cmatrix.h 22 Sep 2006 15:06:32 -0000 1.10 *************** *** 45,48 **** --- 45,49 ---- CError cmatrix_func(Functype *func,CodeStack *stack) MATFUNC; CError cmatrix_dim(Functype *func, CodeStack *stack) MATFUNC; + CError cmatrix_item(Functype *func, CodeStack *stack) MATFUNC; #endif |
|
From: Ton v. O. <tvo...@us...> - 2006-09-18 17:54:25
|
Update of /cvsroot/easycalc/easycalc In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv12442 Modified Files: calc.c Log Message: Ignore key-up events for the hard keys (needed on Treo 650/700p) so hard keys do not get processed twice. Index: calc.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/calc.c,v retrieving revision 1.33 retrieving revision 1.34 diff -C2 -d -r1.33 -r1.34 *** calc.c 12 Sep 2006 19:40:55 -0000 1.33 --- calc.c 18 Sep 2006 17:54:17 -0000 1.34 *************** *** 492,503 **** UInt16 error; - /* Make it that the button assigned to easycalc, not the datebook switches modes */ do { EvtGetEvent(&event, evtTimeout); if (hard_key_to_pass_through(&event) || ! SysHandleEvent(&event)) { ! if (TxtCharIsHardKey(event.data.keyDown.modifiers, event.data.keyDown.chr) ! && ! (event.data.keyDown.modifiers & poweredOnKeyMask) && ! ! (hard_key_to_pass_through(&event))) GotHardKey(); else if (! MenuHandleEvent(0, &event, &error)) --- 492,504 ---- UInt16 error; do { EvtGetEvent(&event, evtTimeout); + /* Only the button assigned to EasyCalc should switch modes */ if (hard_key_to_pass_through(&event) || ! SysHandleEvent(&event)) { ! if (event.eType == keyDownEvent ! && TxtCharIsHardKey(event.data.keyDown.modifiers, event.data.keyDown.chr) ! && ! (event.data.keyDown.modifiers & poweredOnKeyMask) ! && ! (hard_key_to_pass_through(&event))) GotHardKey(); else if (! MenuHandleEvent(0, &event, &error)) |
|
From: Jorge G. <cl...@us...> - 2006-09-17 11:46:14
|
Update of /cvsroot/easycalc/easycalc/mlib In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv16404/mlib Modified Files: complex.c Log Message: fixed rounding errors in complex Index: complex.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/mlib/complex.c,v retrieving revision 1.21 retrieving revision 1.22 diff -C2 -d -r1.21 -r1.22 *** complex.c 12 Sep 2006 19:40:56 -0000 1.21 --- complex.c 17 Sep 2006 11:46:06 -0000 1.22 *************** *** 562,565 **** --- 562,566 ---- if ((err=stack_get_val2(stack,&arg1,&arg2,complex))) return err; + switch (func->num) { case FUNC_PLUS: *************** *** 592,601 **** return c_badfunc; } if (calcPrefs.reducePrecision) { result.real = reduce_precision(result.real); result.imag = reduce_precision(result.imag); } ! return stack_add_val(stack,&result,complex); } --- 593,612 ---- return c_badfunc; } + if (calcPrefs.reducePrecision) { + + if (fabs(result.real) < PRECISION_TO_ZERO) + result.real= 0.0; + else result.real = reduce_precision(result.real); + + if (fabs(result.imag) < PRECISION_TO_ZERO) + result.imag= 0.0; + else result.imag = reduce_precision(result.imag); } ! err=stack_add_val(stack,&result,complex); ! return err; } *************** *** 622,740 **** return err; ! if (func->num == FUNC_CONJ) { result.real = carg.real; result.imag = -carg.imag; return stack_add_val(stack,&result,complex); ! } ! if (func->num==MATH_ABS) { res = hypot(carg.real,carg.imag); return stack_add_val(stack,&res,real); ! } ! if (func->num==MATH_ANGLE) { res = atan2(carg.imag, carg.real); res = math_rad_to_user(res); ! return stack_add_val(stack,&res,real); ! } ! if (func->num==MATH_REAL) { res = carg.real; ! return stack_add_val(stack,&res,real); ! } ! if (func->num == MATH_IMAG) { res = carg.imag; ! return stack_add_val(stack,&res,real); ! } ! if (func->num==MATH_EXP) { // carg.imag = math_user_to_rad(carg.imag); result = cplx_exp(carg); ! return stack_add_val(stack,&result,complex); ! } ! if (func->num==MATH_SQRT) { result = cplx_sqrt(carg); ! return stack_add_val(stack,&result,complex); ! } ! if (func->num==MATH_LN || func->num==MATH_LOG || ! func->num==MATH_LOG2) { result = cplx_log(carg); result.imag = math_rad_to_user(result.imag); ! if (func->num==MATH_LOG) { ! result.real/=log(10); ! result.imag/=log(10); ! } ! else if (func->num==MATH_LOG2) { ! result.real/=log(2); ! result.imag/=log(2); ! } ! return stack_add_val(stack,&result,complex); ! } ! if (func->num==MATH_SIN || func->num==MATH_COS || ! func->num==MATH_TAN || func->num==MATH_SINH || ! func->num==MATH_COSH || func->num==MATH_TANH) { ! if (func->num == MATH_SIN || func->num == MATH_COS || ! func->num == MATH_TAN) ! carg.real = math_user_to_rad(carg.real); ! ! switch (func->num) { ! case MATH_SIN: ! result = cplx_sin(carg); ! break; ! case MATH_COS: ! result = cplx_cos(carg); ! break; ! case MATH_TAN: ! /* We really should have a separate function for this (and ! the hyperbolic tangent), but we're now weighing speed ! versus code size, and this is certainly smaller. */ ! result = cplx_div(cplx_sin(carg), cplx_cos(carg)); ! break; ! case MATH_SINH: ! result = cplx_sinh(carg); ! break; ! case MATH_COSH: ! result = cplx_cosh(carg); ! break; ! case MATH_TANH: ! result = cplx_div(cplx_sinh(carg),cplx_cosh(carg)); ! break; ! } ! return stack_add_val(stack,&result,complex); ! } ! if (func->num==MATH_ASIN || func->num==MATH_ACOS || ! func->num==MATH_ATAN || func->num==MATH_ASINH || ! func->num==MATH_ACOSH || func->num==MATH_ATANH) { ! /* These inverse trigonometric and hyperbolic functions only yield ! the value at the principal branch. */ ! ! switch(func->num) { ! case MATH_ASIN: ! result = cplx_asin(carg); ! break; ! case MATH_ACOS: ! result = cplx_acos(carg); ! break; ! case MATH_ATAN: ! result = cplx_atan(carg); ! break; ! case MATH_ASINH: ! result = cplx_asinh(carg); ! break; ! case MATH_ACOSH: ! result = cplx_acosh(carg); ! break; ! case MATH_ATANH: ! result = cplx_atanh(carg); ! break; ! default: ! return c_internal; ! break; ! } ! if (func->num == MATH_ASIN || func->num == MATH_ACOS || ! func->num == MATH_ATAN) ! result.real = math_rad_to_user(result.real); ! return stack_add_val(stack,&result,complex); } ! ! return c_internal; } --- 633,746 ---- return err; ! switch (func->num) { ! ! case FUNC_CONJ: result.real = carg.real; result.imag = -carg.imag; return stack_add_val(stack,&result,complex); ! case MATH_ABS: res = hypot(carg.real,carg.imag); return stack_add_val(stack,&res,real); ! case MATH_ANGLE: res = atan2(carg.imag, carg.real); res = math_rad_to_user(res); ! return stack_add_val(stack,&res,real); ! case MATH_REAL: res = carg.real; ! return stack_add_val(stack,&res,real); ! case MATH_IMAG: res = carg.imag; ! return stack_add_val(stack,&res,real); ! ! case MATH_EXP: // carg.imag = math_user_to_rad(carg.imag); result = cplx_exp(carg); ! break; ! case MATH_SQRT: result = cplx_sqrt(carg); ! break; ! ! case MATH_LN: result = cplx_log(carg); result.imag = math_rad_to_user(result.imag); + break; + case MATH_LOG: + result = cplx_log(carg); + result.imag = math_rad_to_user(result.imag); + result.real/=log(10); + result.imag/=log(10); + break; + case MATH_LOG2: + result = cplx_log(carg); + result.imag = math_rad_to_user(result.imag); + result.real/=log(2); + result.imag/=log(2); + break; ! case MATH_SIN: ! carg.real = math_user_to_rad(carg.real); ! result = cplx_sin(carg); ! break; ! case MATH_COS: ! carg.real = math_user_to_rad(carg.real); ! result = cplx_cos(carg); ! break; ! case MATH_TAN: ! carg.real = math_user_to_rad(carg.real); ! /* We really should have a separate function for this (and ! the hyperbolic tangent), but we're now weighing speed ! versus code size, and this is certainly smaller. */ ! result = cplx_div(cplx_sin(carg), cplx_cos(carg)); ! break; ! case MATH_SINH: ! result = cplx_sinh(carg); ! break; ! case MATH_COSH: ! result = cplx_cosh(carg); ! break; ! case MATH_TANH: ! result = cplx_div(cplx_sinh(carg),cplx_cosh(carg)); ! break; ! /* These inverse trigonometric and hyperbolic functions only yield ! the value at the principal branch. */ ! case MATH_ASIN: ! result = cplx_asin(carg); ! result.real = math_rad_to_user(result.real); ! break; ! case MATH_ACOS: ! result = cplx_acos(carg); ! result.real = math_rad_to_user(result.real); ! break; ! case MATH_ATAN: ! result = cplx_atan(carg); ! result.real = math_rad_to_user(result.real); ! break; ! case MATH_ASINH: ! result = cplx_asinh(carg); ! break; ! case MATH_ACOSH: ! result = cplx_acosh(carg); ! break; ! case MATH_ATANH: ! result = cplx_atanh(carg); ! break; ! default: ! return c_badfunc; ! } ! ! if (calcPrefs.reducePrecision) { ! if (fabs(result.real) < PRECISION_TO_ZERO) ! result.real= 0.0; ! else ! result.real = reduce_precision(result.real); ! if (fabs(result.imag) < PRECISION_TO_ZERO) ! result.imag= 0.0; ! else ! result.imag = reduce_precision(result.imag); } ! ! err=stack_add_val(stack,&result,complex); ! return err; } |
|
From: Jorge G. <cl...@us...> - 2006-09-17 11:46:14
|
Update of /cvsroot/easycalc/easycalc/include In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv16404/include Modified Files: defuns.h Log Message: fixed rounding errors in complex Index: defuns.h =================================================================== RCS file: /cvsroot/easycalc/easycalc/include/defuns.h,v retrieving revision 1.38 retrieving revision 1.39 diff -C2 -d -r1.38 -r1.39 *** defuns.h 12 Sep 2006 19:40:55 -0000 1.38 --- defuns.h 17 Sep 2006 11:46:06 -0000 1.39 *************** *** 66,70 **** /* Rounding offset for reduce precision */ #define ROUND_OFFSET 13 ! #define PRECISION_TO_ZERO 1E-13 /* konvert.c constants */ --- 66,70 ---- /* Rounding offset for reduce precision */ #define ROUND_OFFSET 13 ! #define PRECISION_TO_ZERO 1E-12 /* konvert.c constants */ |
|
From: Ton v. O. <tvo...@us...> - 2006-09-16 23:31:03
|
Update of /cvsroot/easycalc/easycalc/mlib In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv19764/mlib Modified Files: txtask.c Log Message: Replace calls to FrmAlert(altCompute) ("Error while computing") with call to alertErrorMessage() stating the real error where possible. Index: txtask.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/mlib/txtask.c,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** txtask.c 12 Sep 2006 19:40:56 -0000 1.5 --- txtask.c 16 Sep 2006 23:30:58 -0000 1.6 *************** *** 27,30 **** --- 27,31 ---- #include "calcrsc.h" #include "konvert.h" + #include "calc.h" #include "funcs.h" #include "display.h" *************** *** 100,104 **** } if (err) ! FrmAlert(altCompute); else { res = true; --- 101,105 ---- } if (err) ! alertErrorMessage(err); else { res = true; |
|
From: Ton v. O. <tvo...@us...> - 2006-09-16 23:31:03
|
Update of /cvsroot/easycalc/easycalc In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv19764 Modified Files: finance.c solver.c varmgr.c Log Message: Replace calls to FrmAlert(altCompute) ("Error while computing") with call to alertErrorMessage() stating the real error where possible. Index: finance.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/finance.c,v retrieving revision 1.14 retrieving revision 1.15 diff -C2 -d -r1.14 -r1.15 *** finance.c 12 Sep 2006 19:40:55 -0000 1.14 --- finance.c 16 Sep 2006 23:30:58 -0000 1.15 *************** *** 73,77 **** "PYR=fzero(1E-1:366:\"fv-fin_fv(I:N:PV:PMT:x:1)\":1E-6", "PYR=fzero(1E-1:366:\"fv-fin_fv(I:N:PV:PMT:x:0\":1E-6"}, ! {0,0,NULL,NULL} }; --- 73,77 ---- "PYR=fzero(1E-1:366:\"fv-fin_fv(I:N:PV:PMT:x:1)\":1E-6", "PYR=fzero(1E-1:366:\"fv-fin_fv(I:N:PV:PMT:x:0\":1E-6"}, ! {0,0,NULL,NULL} }; *************** *** 100,107 **** for (i=0;inpFinForm[i].var!=NULL;i++) { item = db_read_variable(inpFinForm[i].var,&err); ! if (err || item.type!=real) ! SysCopyStringResource(text,strUndefined); ! else ! fp_print_double(text,item.u.realval); if (!err) rpn_delete(item); --- 100,107 ---- for (i=0;inpFinForm[i].var!=NULL;i++) { item = db_read_variable(inpFinForm[i].var,&err); ! if (err || item.type!=real) ! SysCopyStringResource(text,strUndefined); ! else ! fp_print_double(text,item.u.realval); if (!err) rpn_delete(item); *************** *** 136,140 **** if (err) ! return; wait_draw(); --- 136,140 ---- if (err) ! return; wait_draw(); *************** *** 144,148 **** if (err) ! FrmAlert(altCompute); FrmUpdateForm(finForm,frmUpdateVars); --- 144,148 ---- if (err) ! alertErrorMessage(err); FrmUpdateForm(finForm,frmUpdateVars); Index: solver.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/solver.c,v retrieving revision 1.13 retrieving revision 1.14 diff -C2 -d -r1.13 -r1.14 *** solver.c 12 Sep 2006 19:40:55 -0000 1.13 --- solver.c 16 Sep 2006 23:30:58 -0000 1.14 *************** *** 418,422 **** FrmUpdateForm(slvForm,frmUpdateVars); else ! FrmAlert(altCompute); } --- 418,422 ---- FrmUpdateForm(slvForm,frmUpdateVars); else ! alertErrorMessage(err); } *************** *** 468,472 **** } if (err) ! FrmAlert(altCompute); } --- 468,472 ---- } if (err) ! alertErrorMessage(err); } Index: varmgr.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/varmgr.c,v retrieving revision 1.22 retrieving revision 1.23 diff -C2 -d -r1.22 -r1.23 *** varmgr.c 12 Sep 2006 19:40:55 -0000 1.22 --- varmgr.c 16 Sep 2006 23:30:58 -0000 1.23 *************** *** 533,537 **** if (err) { ! FrmAlert(altCompute); return false; } --- 533,537 ---- if (err) { ! alertErrorMessage(err); return false; } *************** *** 539,543 **** err = stack_compute(stack); if (err) { ! FrmAlert(altCompute); stack_delete(stack); return false; --- 539,543 ---- err = stack_compute(stack); if (err) { ! alertErrorMessage(err); stack_delete(stack); return false; *************** *** 550,554 **** if (err) { rpn_delete(result); ! FrmAlert(altCompute); return false; } --- 550,554 ---- if (err) { rpn_delete(result); ! alertErrorMessage(err); return false; } *************** *** 732,736 **** } if (err) ! FrmAlert(altCompute); else { res = true; --- 732,736 ---- } if (err) ! alertErrorMessage(err); else { res = true; *************** *** 796,800 **** text = FldGetTextPtr(field); if (!text) ! FrmAlert(altCompute); else { stack = text_to_stack(text,&err); --- 796,800 ---- text = FldGetTextPtr(field); if (!text) ! FrmAlert(altCompute); else { stack = text_to_stack(text,&err); *************** *** 806,810 **** } if (err) ! FrmAlert(altCompute); else { res = true; --- 806,810 ---- } if (err) ! alertErrorMessage(err); else { res = true; |
|
From: Ton v. O. <tvo...@us...> - 2006-09-16 20:36:36
|
Update of /cvsroot/easycalc/easycalc/mlib In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv15158/mlib Modified Files: MathLib.c Log Message: Restore full precision sin/cos/tan in MathLib.c. Reducing precision should be handled elsewhere. Index: MathLib.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/mlib/MathLib.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** MathLib.c 12 Sep 2006 19:40:56 -0000 1.3 --- MathLib.c 16 Sep 2006 20:36:29 -0000 1.4 *************** *** 77,84 **** double result; MathLibCos(MathLibRef, x, &result); - - if(fabs(result)<1E-10) - result=0; - return result; } --- 77,80 ---- *************** *** 87,94 **** double result; MathLibSin(MathLibRef, x, &result); - - if(fabs(result)<1E-10) - result=0; - return result; } --- 83,86 ---- *************** *** 97,104 **** double result; MathLibTan(MathLibRef, x, &result); - - if(fabs(result)<1E-10) - result=0; - return result; } --- 89,92 ---- |
|
From: Ton v. O. <tvo...@us...> - 2006-09-14 13:46:15
|
Update of /cvsroot/easycalc/easycalc In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv32186 Modified Files: calc.rcp.in Log Message: Construct VERSION resource from VERSION file. Index: calc.rcp.in =================================================================== RCS file: /cvsroot/easycalc/easycalc/calc.rcp.in,v retrieving revision 1.107 retrieving revision 1.108 diff -C2 -d -r1.107 -r1.108 *** calc.rcp.in 6 Sep 2006 01:11:58 -0000 1.107 --- calc.rcp.in 14 Sep 2006 13:46:08 -0000 1.108 *************** *** 14,18 **** #endif ! VERSION "1.24-cvs" APPLICATION ID 1 "OpCl" APPLICATIONICONNAME ID 100 "Easy Calc" --- 14,18 ---- #endif ! VERSION "VERSION_HERE" APPLICATION ID 1 "OpCl" APPLICATIONICONNAME ID 100 "Easy Calc" |
|
From: Ton v. O. <tvo...@us...> - 2006-09-13 15:41:40
|
Update of /cvsroot/easycalc/easycalc In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv12563 Modified Files: VERSION Log Message: Start version 1.25. Index: VERSION =================================================================== RCS file: /cvsroot/easycalc/easycalc/VERSION,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** VERSION 13 Sep 2006 14:33:35 -0000 1.2 --- VERSION 13 Sep 2006 15:41:28 -0000 1.3 *************** *** 1 **** ! 1.24 --- 1 ---- ! 1.25cvs |
|
From: Ton v. O. <tvo...@us...> - 2006-09-13 14:34:47
|
Update of /cvsroot/easycalc/easycalc In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv8616 Modified Files: makedistro Log Message: Update makedistro for current configure and Makefile. Index: makedistro =================================================================== RCS file: /cvsroot/easycalc/easycalc/makedistro,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** makedistro 7 Nov 2002 17:52:19 -0000 1.1 --- makedistro 13 Sep 2006 14:34:41 -0000 1.2 *************** *** 1,3 **** ! #!/bin/sh rm -r /tmp/easycalc if [ -z "$1" ]; then --- 1,3 ---- ! #!/bin/sh -x rm -r /tmp/easycalc if [ -z "$1" ]; then *************** *** 11,18 **** mkdir /tmp/EasyCalc-$VERSION/binary # Create changelog ! rcs2log | sed -e "s#/cvsroot/easycalc/easycalc/##g" > /tmp/ChangeLog # Unpack the CVS cd /tmp ! cvs -z3 -d:ext:on...@cv.../cvsroot/easycalc export -r $1 easycalc # Move the tutorial directory mv /tmp/easycalc/tutorial /tmp/EasyCalc-$VERSION --- 11,18 ---- mkdir /tmp/EasyCalc-$VERSION/binary # Create changelog ! rcs2log -h users.sourceforge.net > /tmp/ChangeLog # Unpack the CVS cd /tmp ! cvs -z3 -d:ext:tvo...@ea.../cvsroot/easycalc export -r $1 easycalc # Move the tutorial directory mv /tmp/easycalc/tutorial /tmp/EasyCalc-$VERSION *************** *** 22,31 **** # Compile calc_small cd /tmp/easycalc ! ./configure make cp calc_en.prc /tmp/EasyCalc-$VERSION/binary/calc_small.prc ! # Compile other versions of cal make distclean ! ./configure --enable-specfun make mv calc_cs.prc /tmp/EasyCalc-$VERSION/binary/calc_cs_iso.prc --- 22,31 ---- # Compile calc_small cd /tmp/easycalc ! ./configure --disable-specfun --disable-graphfun --disable-os5hires --disable-diasupport make cp calc_en.prc /tmp/EasyCalc-$VERSION/binary/calc_small.prc ! # Compile full versions of calc make distclean ! ./configure --with-sonysdk --with-handerasdk make mv calc_cs.prc /tmp/EasyCalc-$VERSION/binary/calc_cs_iso.prc *************** *** 36,41 **** cd .. make - make INSTALL mv calc_cs.prc /tmp/EasyCalc-$VERSION/binary/calc_cs_win.prc # Create other important thigs in the Output mv /tmp/ChangeLog /tmp/EasyCalc-$VERSION/ChangeLog --- 36,42 ---- cd .. make mv calc_cs.prc /tmp/EasyCalc-$VERSION/binary/calc_cs_win.prc + cd langs; mv cs2.rcp cs.rcp; cd .. + make INSTALL # Create other important thigs in the Output mv /tmp/ChangeLog /tmp/EasyCalc-$VERSION/ChangeLog *************** *** 44,48 **** cd /tmp/EasyCalc-$VERSION/docs mv COPYING CREDITS specfuncs.pdf .. ! cp ~ondra/pildev/mathlib/MathLib.prc /tmp/EasyCalc-$VERSION/binary cd /tmp ! find EasyCalc-$VERSION | zip -@ ~ondra/pildev/EasyCalc-$VERSION.zip --- 45,49 ---- cd /tmp/EasyCalc-$VERSION/docs mv COPYING CREDITS specfuncs.pdf .. ! cp ~/PalmStuff/PalmDev/Projects/MathLib/MathLib/MathLib.prc /tmp/EasyCalc-$VERSION/binary cd /tmp ! find EasyCalc-$VERSION | zip -@ ~/EasyCalc-$VERSION.zip |
|
From: Ton v. O. <tvo...@us...> - 2006-09-13 14:33:38
|
Update of /cvsroot/easycalc/easycalc In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv8225 Modified Files: VERSION Log Message: Prepare for release of 1.24. Index: VERSION =================================================================== RCS file: /cvsroot/easycalc/easycalc/VERSION,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** VERSION 23 Aug 2006 17:50:44 -0000 1.1 --- VERSION 13 Sep 2006 14:33:35 -0000 1.2 *************** *** 1 **** ! 1.24-cvs --- 1 ---- ! 1.24 |
|
From: Ton v. O. <tvo...@us...> - 2006-09-13 13:42:38
|
Update of /cvsroot/easycalc/easycalc/docs In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv19253 Modified Files: COPYING Log Message: Updated GPL v2 to current text (correct address of FSF). Index: COPYING =================================================================== RCS file: /cvsroot/easycalc/easycalc/docs/COPYING,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** COPYING 27 Oct 2000 17:18:38 -0000 1.1.1.1 --- COPYING 13 Sep 2006 13:42:31 -0000 1.2 *************** *** 2,7 **** Version 2, June 1991 ! Copyright (C) 1989, 1991 Free Software Foundation, Inc. ! 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA Everyone is permitted to copy and distribute verbatim copies of this license document, but changing it is not allowed. --- 2,7 ---- Version 2, June 1991 ! Copyright (C) 1989, 1991 Free Software Foundation, Inc., ! 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA Everyone is permitted to copy and distribute verbatim copies of this license document, but changing it is not allowed. *************** *** 16,20 **** Foundation's software and to any other program whose authors commit to using it. (Some other Free Software Foundation software is covered by ! the GNU Library General Public License instead.) You can apply it to your programs, too. --- 16,20 ---- Foundation's software and to any other program whose authors commit to using it. (Some other Free Software Foundation software is covered by ! the GNU Lesser General Public License instead.) You can apply it to your programs, too. *************** *** 56,60 **** The precise terms and conditions for copying, distribution and modification follow. ! GNU GENERAL PUBLIC LICENSE TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION --- 56,60 ---- The precise terms and conditions for copying, distribution and modification follow. ! GNU GENERAL PUBLIC LICENSE TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION *************** *** 111,115 **** does not normally print such an announcement, your work based on the Program is not required to print an announcement.) ! These requirements apply to the modified work as a whole. If identifiable sections of that work are not derived from the Program, --- 111,115 ---- does not normally print such an announcement, your work based on the Program is not required to print an announcement.) ! These requirements apply to the modified work as a whole. If identifiable sections of that work are not derived from the Program, *************** *** 169,173 **** distribution of the source code, even though third parties are not compelled to copy the source along with the object code. ! 4. You may not copy, modify, sublicense, or distribute the Program except as expressly provided under this License. Any attempt --- 169,173 ---- distribution of the source code, even though third parties are not compelled to copy the source along with the object code. ! 4. You may not copy, modify, sublicense, or distribute the Program except as expressly provided under this License. Any attempt *************** *** 226,230 **** This section is intended to make thoroughly clear what is believed to be a consequence of the rest of this License. ! 8. If the distribution and/or use of the Program is restricted in certain countries either by patents or by copyrighted interfaces, the --- 226,230 ---- This section is intended to make thoroughly clear what is believed to be a consequence of the rest of this License. ! 8. If the distribution and/or use of the Program is restricted in certain countries either by patents or by copyrighted interfaces, the *************** *** 279,284 **** END OF TERMS AND CONDITIONS ! ! Appendix: How to Apply These Terms to Your New Programs If you develop a new program, and you want it to be of the greatest --- 279,284 ---- END OF TERMS AND CONDITIONS ! ! How to Apply These Terms to Your New Programs If you develop a new program, and you want it to be of the greatest *************** *** 292,296 **** <one line to give the program's name and a brief idea of what it does.> ! Copyright (C) 19yy <name of author> This program is free software; you can redistribute it and/or modify --- 292,296 ---- <one line to give the program's name and a brief idea of what it does.> ! Copyright (C) <year> <name of author> This program is free software; you can redistribute it and/or modify *************** *** 304,310 **** GNU General Public License for more details. ! You should have received a copy of the GNU General Public License ! along with this program; if not, write to the Free Software ! Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA Also add information on how to contact you by electronic and paper mail. --- 304,310 ---- GNU General Public License for more details. ! You should have received a copy of the GNU General Public License along ! with this program; if not, write to the Free Software Foundation, Inc., ! 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. Also add information on how to contact you by electronic and paper mail. *************** *** 313,317 **** when it starts in an interactive mode: ! Gnomovision version 69, Copyright (C) 19yy name of author Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. This is free software, and you are welcome to redistribute it --- 313,317 ---- when it starts in an interactive mode: ! Gnomovision version 69, Copyright (C) year name of author Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'. This is free software, and you are welcome to redistribute it *************** *** 336,339 **** proprietary programs. If your program is a subroutine library, you may consider it more useful to permit linking proprietary applications with the ! library. If this is what you want to do, use the GNU Library General Public License instead of this License. --- 336,339 ---- proprietary programs. If your program is a subroutine library, you may consider it more useful to permit linking proprietary applications with the ! library. If this is what you want to do, use the GNU Lesser General Public License instead of this License. |
|
From: Ton v. O. <tvo...@us...> - 2006-09-13 13:18:08
|
Update of /cvsroot/easycalc/easycalc In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv9284 Modified Files: grtaps.c Log Message: Handle insufficient memory for offscreen window more gracefully when moving a plot in grtaps.c. Index: grtaps.c =================================================================== RCS file: /cvsroot/easycalc/easycalc/grtaps.c,v retrieving revision 1.24 retrieving revision 1.25 diff -C2 -d -r1.24 -r1.25 *** grtaps.c 12 Sep 2006 19:40:55 -0000 1.24 --- grtaps.c 13 Sep 2006 13:17:57 -0000 1.25 *************** *** 141,146 **** { Boolean penDown,moved; ! Coord x,y; ! Coord oldx=-1,oldy=-1; WinHandle orgwindow; UInt16 err; --- 141,146 ---- { Boolean penDown,moved; ! Coord x,y,dx,dy; ! Coord oldx=begx,oldy=begy; WinHandle orgwindow; UInt16 err; *************** *** 151,160 **** orgwindow = clie_createoffscreenwindow(bounds->extent.x,bounds->extent.y, nativeFormat,&err); ! ErrFatalDisplayIf(err,"Error while creating tmp window."); ! clie_copyrectangle(NULL,orgwindow,bounds,0,0,winPaint); clie_getclip(&rs); clie_setclip(bounds); orgbounds = *bounds; ! orgbounds.topLeft.x = orgbounds.topLeft.y = 0; graph_setcolor(-1); --- 151,163 ---- orgwindow = clie_createoffscreenwindow(bounds->extent.x,bounds->extent.y, nativeFormat,&err); ! /* Note: orgwindow may be NULL if there is insufficient memory for the ! offscreen window. Then we need to copy inside the screen window */ ! if (orgwindow) ! clie_copyrectangle(NULL,orgwindow,bounds,0,0,winPaint); clie_getclip(&rs); clie_setclip(bounds); orgbounds = *bounds; ! if (orgwindow) ! orgbounds.topLeft.x = orgbounds.topLeft.y = 0; graph_setcolor(-1); *************** *** 172,179 **** } if ((oldx!=x || oldy!=y) && RctPtInRectangle(x,y,bounds)) { clie_copyrectangle(orgwindow,NULL,&orgbounds, ! bounds->topLeft.x + (x-begx), ! bounds->topLeft.y + (y-begy),winPaint); ! grtaps_clear_edges(x-begx,y-begy,bounds); oldx=x;oldy=y; } --- 175,184 ---- } if ((oldx!=x || oldy!=y) && RctPtInRectangle(x,y,bounds)) { + dx = (orgwindow ? x-begx : x-oldx); + dy = (orgwindow ? y-begy : y-oldy); clie_copyrectangle(orgwindow,NULL,&orgbounds, ! bounds->topLeft.x + dx, ! bounds->topLeft.y + dy,winPaint); ! grtaps_clear_edges(dx,dy,bounds); oldx=x;oldy=y; } *************** *** 185,194 **** xmin = graph_xscr2gr((bounds->topLeft.x)-(x-begx)); ymin = graph_yscr2gr((bounds->topLeft.y+bounds->extent.y-1)-(y-begy)); ! if (!RctPtInRectangle(x,y,bounds) \ ! || (graphPrefs.logx && xmin <= 0.0) \ || (graphPrefs.logy && ymin <= 0.0)) { ! clie_copyrectangle(orgwindow,NULL,&orgbounds,bounds->topLeft.x, bounds->topLeft.y,winPaint); ! moved = false; } else { --- 190,206 ---- xmin = graph_xscr2gr((bounds->topLeft.x)-(x-begx)); ymin = graph_yscr2gr((bounds->topLeft.y+bounds->extent.y-1)-(y-begy)); ! if (!RctPtInRectangle(x,y,bounds) ! || (graphPrefs.logx && xmin <= 0.0) || (graphPrefs.logy && ymin <= 0.0)) { ! /* Restore original plot from offscreen window if possible, ! otherwise force a redraw by setting moved to true */ ! if (orgwindow) { ! clie_copyrectangle(orgwindow,NULL,&orgbounds,bounds->topLeft.x, bounds->topLeft.y,winPaint); ! moved = false; ! } ! else { ! moved = true; ! } } else { *************** *** 201,205 **** clie_setclip(&rs); ! WinDeleteWindow(orgwindow,false); return moved; --- 213,218 ---- clie_setclip(&rs); ! if (orgwindow) ! WinDeleteWindow(orgwindow,false); return moved; |
2 messages has been excluded from this view by a project administrator.
