search for: do_usemethod

...do_close 100A8E41 R.dll:100A8E41 do_internal 1008494A R.dll:1008494A Rf_eval 10085595 R.dll:10085595 Rf_evalList 10084993 R.dll:10084993 Rf_eval 100875AB R.dll:100875AB Rf_applyClosure 100A9361 R.dll:100A9361 do_internal 100A99A5 R.dll:100A99A5 Rf_usemethod 100A9E1A R.dll:100A9E1A do_usemethod 1008494A R.dll:1008494A Rf_eval 100875AB R.dll:100875AB Rf_applyClosure 100846E0 R.dll:100846E0 Rf_eval 10051EE9 R.dll:10051EE9 Rf_endcontext 1008751F R.dll:1008751F Rf_applyClosure 100846E0 R.dll:100846E0 Rf_eval 10086305 R.dll:10086305 do_set 1008494A R.dll:1008494A Rf_eval 100863...

...0x7a1fc in applyMethod (call=0xd9d7fc, op=0x319cf4, args=0xb750c0, rho=0xb75aac, newrho=0xd9d770) at objects.c:117 #15 0x7a660 in Rf_usemethod (generic=0xefffc9b0 "genD", obj=0xd9f398, call=0x3c1870, args=0x15d400, rho=0xb75aac, ans=0xefffc9ac) at objects.c:252 #16 0x7a930 in do_usemethod (call=0x430e4c, op=0x1d0c50, args=0x430e30, env=0xb75aac) at objects.c:325 #17 0x56aa0 in Rf_eval (e=0x430e4c, rho=0xb75aac) at eval.c:317 #18 0x570bc in Rf_applyClosure (call=0x3db454, op=0x31df48, arglist=0xb750c0, rho=0xb792e4, suppliedenv=0x1b2868) at eval.c:501 #19 0x56ccc in Rf_eval (...

...al.c:624 #6 0x00007ffff78d4a7e in forcePromise (e=e at entry=0x17f3d488) at eval.c:520 #7 0x00007ffff78d41ec in Rf_eval (e=0x17f3d488, rho=0x607a68) at eval.c:661 #8 0x00007ffff790a940 in GetObject (cptr=<optimized out>, cptr=<optimized out>) at objects.c:82 #9 0x00007ffff790b8e2 in do_usemethod (call=0x887498, op=<optimized out>, args=0x887460, env=<optimized out>) at objects.c:449 #10 0x00007ffff78c462a in bcEval (body=body at entry=0x8874d0, rho=rho at entry=0x17f3d5a0, useCache=useCache at entry=TRUE) at eval.c:6449 #11 0x00007ffff78d4138 in Rf_eval (e=0x8874d0, rho...

...23 #3 0x080b8873 in Rf_eval (e=0x823f2b8, rho=0x823f014) at ../../../R/src/main/eval.c:329 #4 0x080b88c9 in Rf_eval (e=0x8fd1e60, rho=0x821e540) at ../../../R/src/main/eval.c:354 #5 0x080e1e0e in GetObject (cptr=0xbfffd400) at ../../../R/src/main/objects.c:88 #6 0x080e2a3b in do_usemethod (call=0x84eb084, op=0x823be78, args=0x84eb0a0, env=0x8fd1df0) at ../../../R/src/main/objects.c:381 #7 0x080b8c33 in Rf_eval (e=0x84eb084, rho=0x8fd1df0) at ../../../R/src/main/eval.c:375 #8 0x080b8f48 in Rf_applyClosure (call=0x8fd1eb4, op=0x84eafa4, arglist=0x8fd1e44, rho=0x823f014,...

...oerce.c:1544) ==15375==??? by 0x4CFCB9: bcEval (eval.c:6775) ==15375==??? by 0x4D95AF: Rf_eval (eval.c:624) ==15375==??? by 0x4DAD12: R_execClosure (eval.c:1764) ==15375==??? by 0x515EF7: dispatchMethod (objects.c:408) ==15375==??? by 0x516379: Rf_usemethod (objects.c:458) ==15375==??? by 0x516694: do_usemethod (objects.c:543) ==15375== [1] "abc<ee>" Here is a patch for the native version of `substr` that highlights the problem and a possible fix.? Basically `substr` computes the byte width of a UTF-8 character based on the leading byte ("\xEE" here, which implies 3 bytes) and...

If I do > example(lm) ... > mycoef <- function(object, ...) UseMethod("coef", object) > mycoef(lm.D9) Error in mycoef(lm.D9) : no applicable method for "coef" which is pretty surprising, as coef has a default method. After a bit of digging, this comes from do_usemethod having defenv = environment where the generic was defined */ defenv = ENCLOS(env); so it is assuming that UseMethod() is called within the defining generic for its first argument. That plainly does not need to be true, e.g. > coefficients function (object, ...) UseMethod("...

...trace #0 Rf_getAttrib (vec=0x8b50cd0, name=0x81d19b8) at attrib.c:93 #1 0x080c0a8f in Rf_usemethod (generic=0xbffff0c0 "print", obj=0x8b50cd0, call=0x880c5a0, args=0x81d1b08, rho=0x89dd900, callrho=0x81e6f68, defrho=0x81e6f14, ans=0xbffff0bc) at objects.c:271 #2 0x080c1058 in do_usemethod (call=0x880c5a0, op=0x81e4f80, args=0x880c5bc, env=0x89dd900) at objects.c:409 #3 0x0809cd29 in Rf_eval (e=0x880c5a0, rho=0x89dd900) at eval.c:404 #4 0x0809d26d in Rf_applyClosure (call=0x89de354, op=0x880c4c0, arglist=0x89dd874, rho=0x81e6f68, suppliedenv=0x81d1b08) at eval.c:595 #5...

...#9 0x7d770 in applyMethod (call=0x49a264, op=0x904f24, args=0x4bb21c, rho=0x4bb3c0, newrho=0x49a210) at objects.c:117 #10 0x7dbd4 in Rf_usemethod (generic=0xefffbdc8 "l", obj=0xbd11a4, call=0xb73e20, args=0x160000, rho=0x4bb3c0, ans=0xefffbdc4) at objects.c:252 #11 0x7dea4 in do_usemethod (call=0xb6a258, op=0x1d3774, args=0xb6a274, env=0x4bb3c0) at objects.c:325 #12 0x5a114 in Rf_eval (e=0xb6a258, rho=0x4bb3c0) at eval.c:317 #13 0x5a730 in Rf_applyClosure (call=0xa21d14, op=0x907a14, arglist=0x4bb21c, rho=0x4bb078, suppliedenv=0x1b5300) at eval.c:501 #14 0x5a340 in Rf_eval (...

...trace #0 Rf_getAttrib (vec=0x8b50cd0, name=0x81d19b8) at attrib.c:93 #1 0x080c0a8f in Rf_usemethod (generic=0xbffff0c0 "print", obj=0x8b50cd0, call=0x880c5a0, args=0x81d1b08, rho=0x89dd900, callrho=0x81e6f68, defrho=0x81e6f14, ans=0xbffff0bc) at objects.c:271 #2 0x080c1058 in do_usemethod (call=0x880c5a0, op=0x81e4f80, args=0x880c5bc, env=0x89dd900) at objects.c:409 #3 0x0809cd29 in Rf_eval (e=0x880c5a0, rho=0x89dd900) at eval.c:404 #4 0x0809d26d in Rf_applyClosure (call=0x89de354, op=0x880c4c0, arglist=0x89dd874, rho=0x81e6f68, suppliedenv=0x81d1b08) at eval.c:595 #5...

...? by 0x4CFCB9: bcEval (eval.c:6775) > ==15375==??? by 0x4D95AF: Rf_eval (eval.c:624) > ==15375==??? by 0x4DAD12: R_execClosure (eval.c:1764) > ==15375==??? by 0x515EF7: dispatchMethod (objects.c:408) > ==15375==??? by 0x516379: Rf_usemethod (objects.c:458) > ==15375==??? by 0x516694: do_usemethod (objects.c:543) > ==15375== > [1] "abc<ee>" > > Here is a patch for the native version of `substr` that highlights the problem and a possible fix.? Basically `substr` computes the byte width of a UTF-8 character based on the leading byte ("\xEE" here, which imp...

...t memory.c:1210 #1 0x080c3089 in R_gc_internal (size_needed=0) at memory.c:1865 #2 0x080c27fe in Rf_cons (car=0xbfffbf40, cdr=0x81f65a0) at memory.c:1534 #3 0x08097e35 in Rf_duplicate (s=0x8324ff0) at duplicate.c:108 #4 0x080c9abf in GetObject (cptr=0xbfffc2d0) at objects.c:40 #5 0x080ca663 in do_usemethod (call=0x82c5d28, op=0x8209874, args=0x82c5d44, env=0x8f1ecd4) at objects.c:401 #6 0x080a3b28 in Rf_eval (e=0x82c5d28, rho=0x8f1ecd4) at eval.c:418 #7 0x080a3db2 in Rf_applyClosure (call=0x8324ff0, op=0x82c5c48, arglist=0x8d05e80, rho=0x8f385f0, suppliedenv=0x81f65a0) at eval.c:609 #8 0x0...

...(call, op, args, rho, newrho); (gdb) up #14 0x8095e48 in Rf_usemethod (generic=0xbfffe438 "plot", obj=0x4094f5a8, call=0x405b521c, args=0x402d8008, rho=0x40944540, ans=0xbfffe434) at objects.c:197 197 *ans = applyMethod(t, sxp, matchedarg, rho, newrho); (gdb) up #15 0x8095fd3 in do_usemethod (call=0x405b521c, op=0x402e0a78, args=0x405b5208, env=0x40944540) at objects.c:251 251 if (usemethod(buf, obj, call, CDR(args), env, &ans) == 1) { (gdb) up #16 0x807c6a1 in Rf_eval (e=0x405b521c, rho=0x40944540) at eval.c:172 172 tmp = PRIMFUN(op) (e, op, CDR(e), rho); (gdb) up #1...

...0x7d3f48, args=0x87015c, rho=0x8702ac, newrho=0x86fbd0) at objects.c:121 #20 0x0009a6f0 in Rf_usemethod (generic=0xffbed928 "plot", obj=0x9f61a8, call=0xffbed6a8, args=0x1bab20, rho=0x8702ac, callrho=0x1db408, defrho=0x1db3b4, ans=0xffbed924) at objects.c:340 #21 0x0009ac00 in do_usemethod (call=0x7d12f4, op=0x1d93c8, args=0x7d1310, env=0x8702ac) at objects.c:409 #22 0x00072444 in Rf_eval (e=0x7d12f4, rho=0x8702ac) at eval.c:404 #23 0x00072444 in Rf_eval (e=0x7d1284, rho=0x8702ac) at eval.c:404 #24 0x0007350c in do_begin (call=0x7d1268, op=0x1cb37c, args=0x7d124c, rho=0x8702a...

...a0, args=0x89b1e24, rho=0x89b1d7c, newrho=0x89b1cd4) at objects.c:126 #18 0xb7d61223 in Rf_usemethod (generic=0x8069af8 "edit", obj=0x8a87868, call=0x89b1e94, args=0x8052110, rho=0x89b1d7c, callrho=0x8073f9c, defrho=0x828f2fc, ans=0xbfd10d00) at objects.c:291 #19 0xb7d61776 in do_usemethod (call=0x89b1e94, op=0x80711b8, args=0x89b1e78, env=0x89b1d7c) at objects.c:399 #20 0xb7d1f352 in Rf_eval (e=0x89b1e94, rho=0x89b1d7c) at eval.c:463 #21 0xb7d1fb67 in Rf_applyClosure (call=0x89b2230, op=0x89b2150, arglist=0x89b1e24, rho=0x8073f9c, suppliedenv=0x8073fb8) at eval.c:669 #22 0xb...

...t; rho=0x89b1d7c, newrho=0x89b1cd4) at objects.c:126 > #18 0xb7d61223 in Rf_usemethod (generic=0x8069af8 "edit", obj=0x8a87868, > call=0x89b1e94, args=0x8052110, rho=0x89b1d7c, callrho=0x8073f9c, > defrho=0x828f2fc, ans=0xbfd10d00) at objects.c:291 > #19 0xb7d61776 in do_usemethod (call=0x89b1e94, op=0x80711b8, args=0x89b1e78, > env=0x89b1d7c) at objects.c:399 > #20 0xb7d1f352 in Rf_eval (e=0x89b1e94, rho=0x89b1d7c) at eval.c:463 > #21 0xb7d1fb67 in Rf_applyClosure (call=0x89b2230, op=0x89b2150, > arglist=0x89b1e24, rho=0x8073f9c, suppliedenv=0x8073fb8) at...

...x8d7004, args=0xeca770, rho=0xeca968, newrho=0xec9424) at objects.c:119 #24 0x000acad8 in Rf_usemethod (generic=0x8cf918 "plot", obj=0x8d7004, call=0xffbee300, args=0xec9424, rho=0xeca968, callrho=0x227480, defrho=0x229388, ans=0xffbee57c) at objects.c:326 #25 0x000acf7c in do_usemethod (call=0x8d3bd8, op=0x2251a8, args=0x8d3bf4, env=0xeca968) at objects.c:389 #26 0x0007d6cc in Rf_eval (e=0x8d3bd8, rho=0xeca968) at eval.c:375 #27 0x0007d6cc in Rf_eval (e=0x8d3b68, rho=0xeca968) at eval.c:375 #28 0x0007ed28 in do_begin (call=0x8d3b4c, op=0x2163b8, args=0x8d3b30, rho=0xeca...

...8 do_begin + 104 45 libR.dylib 0x003a14dc Rf_eval + 1244 46 libR.dylib 0x003a4f58 Rf_applyClosure + 728 47 libR.dylib 0x003a13f0 Rf_eval + 1008 48 libR.dylib 0x003a62c8 forcePromise + 184 49 libR.dylib 0x003a12c8 Rf_eval + 712 50 libR.dylib 0x003eafac do_usemethod + 1228 51 libR.dylib 0x003a14dc Rf_eval + 1244 52 libR.dylib 0x003a4f58 Rf_applyClosure + 728 53 libR.dylib 0x003a13f0 Rf_eval + 1008 54 libR.dylib 0x003a2b08 do_begin + 104 55 libR.dylib 0x003a14dc Rf_eval + 1244 56 libR.dylib 0x003a4f58 Rf_applyClos...

If anyone has a few extra CPU cycles to spare, I'd appreciate it if you could verify a problem that I have encountered. Run the code below and tell me if it crashes your R before completion. library(lme4) data(bdf) dump<-sapply( 1:50000, function(i) { fm <- lme(langPOST ~ IQ.ver.cen + avg.IQ.ver.cen, data = bdf, random = ~ IQ.ver.cen | schoolNR); cat("