summaryrefslogtreecommitdiff
path: root/malloc.c
Commit message (Collapse)AuthorAgeFilesLines
* assert() that every NN argument is not NULL. Otherwise we have theNicholas Clark2009-03-191-0/+7
| | | | | | | | | | | | | | | ability to create landmines that will explode under someone in the future when they upgrade their compiler to one with better optimisation. We've already done this at least twice. (Yes, some of the assertions are after code that would already have SEGVd because it already deferences a pointer, but they are put in to make it easier to automate checking that each and every case is covered.) Add a tool, checkARGS_ASSERT.pl, to check that every case is covered. p4raw-id: //depot/perl@33291 (cherry-picked from commit 7918f24d20384771923d344a382e1d16d9552018)
* PATCH: Large omnibus patch to clean up the JRRT quotesTom Christiansen2009-01-051-1/+3
| | | | | | | | | Message-ID: <25940.1225611819@chthon> Date: Sun, 02 Nov 2008 01:43:39 -0600 p4raw-id: //depot/perl@34698 (cherry picked from commit 4ac71550d23cca4632a2bcdfcb1d83a6bf705e45)
* Integrate:Nicholas Clark2008-10-251-4/+4
| | | | | | | | | | | | | | | | | [ 34575] Make C++ compilers happy #2: const POD without initializer is an error for g++, even when static. [ 34579] Make C++ compilers happy #5: jump to 'do_write' crossed initialization in dTHX. Plus some consting, which also makes C++ happier. p4raw-link: @34579 on //depot/perl: 9dbded1fc02e37d3e56aec23d33b4db32ae1190b p4raw-link: @34575 on //depot/perl: b61433a9ad8e0c9bd78643b0e98c119904617002 p4raw-id: //depot/maint-5.10/perl@34592 p4raw-integrated: from //depot/perl@34588 'merge in' malloc.c (@34078..) perl.c (@34568..)
* Integrate:Nicholas Clark2008-09-041-0/+2
| | | | | | | | | | | | | | | | | | [ 34076] Subject: Re: [perl #46381] "Out of memory ... sbrk()" on FreeBSD-6.x for v.5.8.x but not v.5.6.x From: Slaven Rezic <slaven@rezic.de> Date: 26 Oct 2007 16:58:55 +0200 Message-ID: <874pgd6hxs.fsf@biokovo-amd64.herceg.de> [ 34078] Subject: [PATCH] Fix malloc.c warning From: "Jerry D. Hedden" <jdhedden@cpan.org> Date: Mon, 23 Jun 2008 09:41:11 -0400 Message-ID: <1ff86f510806230641x37afed4bla697e381b3ba9d6d@mail.gmail.com> p4raw-link: @34078 on //depot/perl: 532939df3783fc17b262c6a30b57e0b086abe4aa p4raw-link: @34076 on //depot/perl: a73918ec93a602356d85f41060eaacc67da45b23 p4raw-id: //depot/maint-5.10/perl@34263 p4raw-integrated: from //depot/perl@34262 'edit in' malloc.c (@34076..)
* Integrate:Dave Mitchell2008-05-281-0/+4
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | [ 33414] Subject: [perl #46957] [PATCH] make Devel::Peek::mstat always available From: srezic@cpan.org (via RT) <perlbug-followup@perl.org> Date: Sat, 27 Oct 2007 11:33:57 -0700 Message-ID: <rt-3.6.HEAD-4732-1193510037-297.46957-75-0@perl.org> [ 33416] Subject: Re: [PATCH] NEXT.pm bug within overloaded stringification From: Marcel Grünauer <gr@univie.ac.at> Message-Id: <511B0A54-AB2D-4A65-A02E-E2E07C043EAB@univie.ac.at> Date: Mon, 3 Mar 2008 16:08:48 +0100 (a resend of <7BBCFD93-91CF-4656-A97F-ED5E749F7B2E@univie.ac.at>) [ 33434] Subject: [perl #50538] when( @n && %n ) fails to smart match From: "brian d foy" (via RT) <perlbug-followup@perl.org> Date: Mon, 04 Feb 2008 19:36:01 -0800 Message-ID: <rt-3.6.HEAD-4355-1202182561-1550.50538-75-0@perl.org> Updated tests in ticket to become TODO tests [ 33439] Bump VERSION after change #33416 (so we don't end up with different code but same version in 5.10.0 and, say, 5.10.1) [ 33442] Better line diagnostics - runlint's caller rather than runlint itself. [ 33445] Bring the joy of strict to ext/B/t/lint.t. [ 33447] Refactoring the /Can't return (?:array|hash) to scalar context/ croak logic in pp_rv2av into one place saves 112 bytes here. [ 33457] Subject: [PATCH] count-only transliteration needlessly makes copy-on-write From: "Yitzchak Scott-Thoennes" <sthoenna@efn.org> Date: Tue, 4 Mar 2008 16:54:29 -0800 (PST) Message-ID: <47935.71.32.86.11.1204678469.squirrel@webmail.efn.org> [ 33458] Subject: Re: [PATCH] mg_magical() sometimes turns SvRMAGICAL on when it shouldn't From: Vincent Pit <perl@profvince.com> Date: Fri, 08 Feb 2008 23:22:19 +0100 Message-ID: <47ACD61B.6030501@profvince.com> [ 33463] Silence warning from VC++ following #33447 (not all control paths return a value) [ 33466] Subject: [PATCH] MAD update list of failures in mad/t/p55.t From: Gerard Goossen <gerard@tty.nl> Date: Mon, 10 Mar 2008 15:17:08 +0100 Message-ID: <20080310141708.GA28994@ostwald> [ 33467] Subject: [PATCH] Re: [PATCH] MAD fix p55 $[ From: Gerard Goossen <gerard@tty.nl> Date: Mon, 10 Mar 2008 15:44:03 +0100 Message-ID: <20080310144403.GC28994@ostwald> [ 33470] Subject: Re: [PATCH] make Archive::Extract's x.lzma test file be lzma'd, From: "Yitzchak Scott-Thoennes" <sthoenna@efn.org> Date: Tue, 4 Mar 2008 00:28:34 -0800 (PST) Message-ID: <52329.71.32.86.11.1204619314.squirrel@webmail.efn.org> p4raw-link: @33470 on //depot/perl: 1842fafe88147d90b1a41de07040f8fdc9d95179 p4raw-link: @33467 on //depot/perl: 27aaedc17a97efc227bf59e642a1a074461e266d p4raw-link: @33466 on //depot/perl: 58a97135f419acbdcb88dba507c236c50a193268 p4raw-link: @33463 on //depot/perl: 77e217c696c39b67fc6443f86dde2d49211a6302 p4raw-link: @33458 on //depot/perl: 218787bdb7a9250de0cc00118d84dcb23ff2f1c5 p4raw-link: @33457 on //depot/perl: 3788ef8ffa548a64c7425dab843bc6e906dec25c p4raw-link: @33447 on //depot/perl: 042560a65fd56038b3116f30639cb99d98c48622 p4raw-link: @33445 on //depot/perl: 354c4f6702429b0ee68ace7c068c71c145b01011 p4raw-link: @33442 on //depot/perl: b810cbf3630b54e4370087ac3cf7984f09b3d77c p4raw-link: @33439 on //depot/perl: 9a35f1ea0522ed94d65ce910c1f49334b567bf08 p4raw-link: @33434 on //depot/perl: 1dcb720a51504d7b20fb1eac689c4efad1376736 p4raw-link: @33416 on //depot/perl: 5dd54fb4257bccaa223fa7d57413e664e9bb3c2c p4raw-link: @33414 on //depot/perl: 3128eefee559edb9fdd97ad1b3eff48da114045e p4raw-id: //depot/maint-5.10/perl@33943 p4raw-branched: from //depot/perl@33942 'branch in' ext/XS/APItest/t/rmagical.t lib/NEXT/t/stringify.t p4raw-integrated: from //depot/perl@33942 'copy in' t/op/tr.t (@31130..) ext/XS/APItest/APItest.xs (@32699..) ext/XS/APItest/APItest.pm (@33023..) lib/Archive/Extract/t/src/x.lzma.packed (@33098..) ext/B/t/lint.t (@33442..) 'merge in' ext/Devel/Peek/Peek.xs (@32703..) p4raw-integrated: from //depot/perl@33467 'merge in' op.c (@33369..) p4raw-integrated: from //depot/perl@33466 'ignore' mad/t/p55.t (@31554..) p4raw-integrated: from //depot/perl@33458 'merge in' mg.c (@33291..) p4raw-integrated: from //depot/perl@33457 'merge in' doop.c (@33291..) p4raw-integrated: from //depot/perl@33447 'edit in' pp_hot.c (@33376..) p4raw-integrated: from //depot/perl@33434 'copy in' t/op/switch.t (@32120..) p4raw-integrated: from //depot/perl@33416 'edit in' MANIFEST (@33410..) 'ignore' lib/NEXT.pm (@25261..) p4raw-integrated: from //depot/perl@33414 'merge in' malloc.c (@33389..)
* Integrate:Dave Mitchell2008-05-281-16/+34
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | [ 33337] Setting the f flag on length causes the op to be constant folded. [ 33342] fix variable names in 'ununit var' warnings in evals [ 33363] Subject: [PATCH] B::Debug enhancements From: "Reini Urban" <rurban@x-ray.at> Date: Fri, 22 Feb 2008 09:52:32 +0100 Message-ID: <6910a60802220052t3c1f1d91ne38b8ba6f6c56651@mail.gmail.com> [ 33367] Avoid a segfault case in MRO code, based on : Subject: [perl #51092] [PATCH] Segfault when calling ->next::method on non-existing package From: ilmari@vesla.ilmari.org (via RT) <perlbug-followup@perl.org> Date: Thu, 21 Feb 2008 20:29:42 -0800 Message-ID: <rt-3.6.HEAD-15287-1203654581-377.51092-75-0@perl.org> [ 33369] Ensure that constant folding runs with IN_PERL_RUNTIME true, by copying the current compiling cop to a different address. This ensures that lexical hints are correctly honoured, and allows us to fold sprintf. [ 33377] If we have malloced_size() available, then avoid rounding up the string to the next (guessed) plausible alignment size, and instead find out how much memory was actually allocated, so that we can set this in the scalar's SvLEN(). This way, sv_grow() will be called far less often. [ 33378] In Perl_sv_usepvn_flags(), with MYMALLOC, use the actual malloc()ed size for SvLEN(), rather than an estimate. [ 33379] If the C library provides malloc_size(), we can use that in the same places as Perl's malloced_size(), except that we need to be careful of any PERL_TRACK_MEMPOOL manipulations in force. Wrap both as Perl_safesysmalloc_size(), to give a consistent name and interface. [ 33380] Fix preprocessor syntax [ 33383] Comment on why I don't think changing Perl_safesysmalloc_size() in av.c analagous to the change in sv.c is a good idea. [It's not a language design issue, so sadly I can't get a talk out of it. Or is that fortunately? :-)] [ 33389] Add Perl_malloc_good_size to malloc.c. (A routine that rounds up the passed in request to the size that will actually be allocated. It's the same interface as Darwin already provides with malloc_good_size().) [ 33390] Use malloc_good_size() to round up the size of requested arenas to the size that will actually be allocated, to squeeze last few bytes into use. p4raw-link: @33390 on //depot/perl: d8fca4022b56f335fb492e336b5d155376eb1bf7 p4raw-link: @33389 on //depot/perl: 641071807211a3969bcad26ac3f2a39f4550a11c p4raw-link: @33383 on //depot/perl: e050cc0e6db974512bccc84746c68ba4ed3e4079 p4raw-link: @33380 on //depot/perl: cfe5289891381086cbb4d57f93a59ba02c2cd726 p4raw-link: @33379 on //depot/perl: ca7c1a2998b2bece800791e0ee5cce600e2f647a p4raw-link: @33378 on //depot/perl: 5d487c263b0c0c7fb6c50dee3540f1838c4ab067 p4raw-link: @33377 on //depot/perl: 98653f182f8d34d630c65229237c0d55f664e886 p4raw-link: @33369 on //depot/perl: c427f4d2d4575fbc8a5190932fe321136c7597b3 p4raw-link: @33367 on //depot/perl: 5fa9f95182cd3e9dfed1f750408ef8b876d6a9c6 p4raw-link: @33363 on //depot/perl: c13076132a20419dab956060b96f9d3ef3b25ad7 p4raw-link: @33342 on //depot/perl: 50edf520be9fa4c0e7982006bec3a6939b2f61a7 p4raw-link: @33337 on //depot/perl: 1518d620d80f21c46a5f3757b2ebf28b92c1d602 p4raw-id: //depot/maint-5.10/perl@33942 p4raw-integrated: from //depot/perl@33941 'copy in' t/lib/warnings/7fatal (@30124..) t/mro/next_edgecases.t (@30998..) ext/B/B/Debug.pm (@33230..) 'edit in' opcode.h (@33356..) 'merge in' makedef.pl (@32835..) handy.h (@33045..) p4raw-integrated: from //depot/perl@33390 'edit in' sv.c (@33385..) 'merge in' hv.c (@33291..) p4raw-integrated: from //depot/perl@33389 'merge in' malloc.c (@33291..) embed.h (@33365..) embed.fnc proto.h (@33384..) p4raw-integrated: from //depot/perl@33383 'edit in' av.c (@33379..) p4raw-integrated: from //depot/perl@33379 'edit in' perl.h (@33376..) p4raw-integrated: from //depot/perl@33369 'merge in' op.c (@33368..) p4raw-integrated: from //depot/perl@33367 'merge in' mro.c (@33291..) p4raw-integrated: from //depot/perl@33342 'merge in' t/lib/warnings/9uninit (@33310..) p4raw-integrated: from //depot/perl@33337 'edit in' opcode.pl (@33267..)
* Integrate:Nicholas Clark2008-01-311-3/+0
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | [ 33051] Deprecate (and remove core use of ) Nullav, Nullcv, Nullgv, Nullhe, Nullhek and Nullhv. Nullop is going to be a bit less simple. [ 33052] Purge all use of Nullch in non-dual life modules. Exterminate! Exterminate! Exterminate! [ 33053] Change 33052 missed one Nullch. Oops. Exterminate! Exterminate! Exterminate! [for maint, the "remove core use of" part, not the deprecating] p4raw-link: @33053 on //depot/perl: 9bdb0282d4f16fcaf7658ba3709d04ef5f50dba3 p4raw-link: @33052 on //depot/perl: 9849c14cd91dea2f36cd3d2a79984145cc69648c p4raw-link: @33051 on //depot/perl: 3ae1b22641a16d4d08aba688616c0f7cefb7d1f5 p4raw-id: //depot/maint-5.10/perl@33161 p4raw-integrated: from //depot/perl@33160 'copy in' epoc/epoc.c (@16598..) pod/perlapio.pod (@25253..) ext/Opcode/Opcode.xs (@28797..) ext/PerlIO/scalar/scalar.xs (@29751..) ext/PerlIO/encoding/encoding.xs (@30213..) malloc.c (@30964..) win32/vdir.h (@31211..) 'merge in' ext/DynaLoader/dl_symbian.xs ext/PerlIO/via/via.xs (@32703..) ext/Storable/Storable.xs (@32734..) ext/B/B.xs (@32822..) ext/Data/Dumper/Dumper.xs (@32881..)
* get rid of warning due to empty dangling else in malloc.cDave Mitchell2007-04-151-1/+2
| | | p4raw-id: //depot/perl@30964
* Changes to get perl to compile with g++ on Cygwin. Some additionalSteve Peters2006-10-301-4/+4
| | | | | changes will be needed to get it to link though. p4raw-id: //depot/perl@29142
* two [PATCH]es: dVAR for malloc.c, and a signed/unsigned char*Jarkko Hietaniemi2006-04-281-0/+6
| | | | | Message-ID: <4452594B.4040609@gmail.com> p4raw-id: //depot/perl@28007
* Patch from Jarkko to fix breakage caused by change #27649Steve Hay2006-04-071-1/+1
| | | | | | see: http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2006-04/msg00144.html p4raw-link: @27649 on //depot/perl: 9ddc1e7af8675795ad0346c1274fd40d4096c50f p4raw-id: //depot/perl@27735
* Redo PERL_UNUSED_DECLAndy Lester2006-03-311-1/+1
| | | | | Message-ID: <20060331065458.GA28571@petdance.com> p4raw-id: //depot/perl@27649
* Re: [PATCH] s/Null(av|ch)/NULL/gSteven Schubiger2006-02-021-5/+5
| | | | | Message-ID: <20060202093849.GD12591@accognoscere.homeunix.org> p4raw-id: //depot/perl@27054
* hv_fetchs() supportAndy Lester2006-01-061-2/+2
| | | | | Message-ID: <20060106155719.GB9035@petdance.com> p4raw-id: //depot/perl@26676
* Re: [PATCH] Random constings and printf cleanupAndy Lester2005-10-051-1/+1
| | | | | Message-ID: <20051004201605.GA31682@petdance.com> p4raw-id: //depot/perl@25693
* Remove the n_aNicholas Clark2005-06-081-2/+1
| | | p4raw-id: //depot/perl@24762
* Random constingAndy Lester2005-06-031-4/+4
| | | | | Message-ID: <20050602171943.GA16553@petdance.com> p4raw-id: //depot/perl@24689
* Quotes fixed, see also perl #36079Andy Lester2005-06-021-4/+4
| | | | | Message-ID: <20050602050238.GA4001@petdance.com> p4raw-id: //depot/perl@24666
* Updated lint infrastructureAndy Lester2005-05-261-14/+12
| | | | | Message-ID: <20050525173139.GB1701@petdance.com> p4raw-id: //depot/perl@24580
* Attribute configurationAndy Lester2005-05-201-1/+1
| | | | | Message-ID: <20050519173256.GA29039@petdance.com> p4raw-id: //depot/perl@24508
* consting-eleventy.patch: More consts, plus actual bug fixAndy Lester2005-05-161-4/+4
| | | | | Message-ID: <20050516151353.GA25387@petdance.com> p4raw-id: //depot/perl@24489
* Include vim/emacs modelines in generated files to open themRafael Garcia-Suarez2005-05-111-2/+2
| | | | | | in read-only mode. Make vi modelines compatible with non-vim vi versions. p4raw-id: //depot/perl@24445
* Add editor boilerplates to all C filesRafael Garcia-Suarez2005-05-101-0/+10
| | | | | (except the generated ones) p4raw-id: //depot/perl@24440
* Refactoring to Sv*_set() macros - patch #6Steve Peters2005-04-201-1/+2
| | | | | | Message-ID: <20050420112720.GA31042@mccoy.peters.homeunix.org> Date: Wed, 20 Apr 2005 06:27:20 -0500 p4raw-id: //depot/perl@24260
* Refactoring to Sv*_set() macros - patch #4Steve Peters2005-04-181-1/+1
| | | | | | | Message-ID: <20050416160502.GA26957@mccoy.peters.homeunix.org> plus fix to Perl_rvpv_dup assigning to an RV with SvPVX p4raw-id: //depot/perl@24239
* Another Win32 compilation clean-up (for when using Perl's malloc)Steve Hay2005-03-311-4/+5
| | | p4raw-id: //depot/perl@24108
* Add comment to the top of most .c files explaining their purposeDave Mitchell2004-07-311-0/+6
| | | p4raw-id: //depot/perl@23176
* Encourage compilers to tail call optimise in sv_savepv, sv_savepvnNicholas Clark2004-07-161-2/+2
| | | | | | and sv_savesharedpv. Need to create non-void returning versions of Copy and Zero, as the existing macros deliberately cast to (void) p4raw-id: //depot/perl@23126
* malloc cleanupIlya Zakharevich2003-07-241-3/+11
| | | | | Message-ID: <20030715144657.GA21313@math.berkeley.edu> p4raw-id: //depot/perl@20184
* malloc alignment patch from Spider, needed for Tru64 + longdouble.Jarkko Hietaniemi2003-07-101-0/+3
| | | p4raw-id: //depot/perl@20118
* format 'botched' in malloc.cAdrian M. Enache2003-07-081-1/+1
| | | | | Message-ID: <20030707185706.GB7017@ratsnest.hole> p4raw-id: //depot/perl@20069
* Re: your malloc patchesIlya Zakharevich2003-06-281-46/+55
| | | | | | | Message-ID: <20030627135406.GA8914@math.berkeley.edu> More malloc patches: now they seem to work even in Tru64. p4raw-id: //depot/perl@19876
* Allow for things like -DFILL_CHECK_DEFAULT=0 (from Ilya).Jarkko Hietaniemi2003-06-201-3/+13
| | | p4raw-id: //depot/perl@19834
* Don't do sprintf().Jarkko Hietaniemi2003-06-201-4/+10
| | | p4raw-id: //depot/perl@19833
* Show the source code location of an "assertion botch".Jarkko Hietaniemi2003-06-201-5/+12
| | | p4raw-id: //depot/perl@19832
* More Perl malloc debugging magic from Ilya. Seems to work inJarkko Hietaniemi2003-06-201-50/+456
| | | | | | | | | | Linux, Solaris, AIX. Had to do #ifdef OS2 for the <io.h> in malloc.c, found in AIX since there is no such header. In Tru64 miniperl fails an assert: "free()ed/realloc()ed-away memory was overwritten?" (In IRIX compiles but that doesn't prove much since in IRIX Perl's malloc is simply not used.) p4raw-id: //depot/perl@19831
* for -DmSlaven Rezic2002-10-121-1/+1
| | | | | Message-Id: <200210082249.g98MnXqM076566@vran.herceg.de> p4raw-id: //depot/perl@18013
* fixes for various warnings identified by Visual C++Gurusamy Sarathy2002-05-071-2/+2
| | | p4raw-id: //depot/perl@16460
* Re: [ID 20020425.009] perlio & -Dm dumps coreHugo van der Sanden2002-05-021-7/+14
| | | | | Message-Id: <200205020322.g423M2p19726@crypt.compulink.co.uk> p4raw-id: //depot/perl@16342
* more warnings tidyupPaul Marquess2002-03-111-4/+4
| | | | | | From: "Paul Marquess" <paul_marquess@yahoo.co.uk> Message-ID: <AIEAJICLCBDNAAOLLOKLMEEGDPAA.paul_marquess@yahoo.co.uk> p4raw-id: //depot/perl@15155
* Add missing Tolkien quotes to *.cAudrey Tang2002-02-201-0/+4
| | | | | Message-Id: <20020220231312.GA775@not.autrijus.org> p4raw-id: //depot/perl@14802
* Get rid of the _() macro since (1) we require ANSI anywayJarkko Hietaniemi2002-01-221-1/+0
| | | | | | (2) Other software (GNU) seems to use it and we don't need it, so let's give it up. p4raw-id: //depot/perl@14374
* Make malloc.c errors more usefulRichard Soderberg2001-10-301-3/+3
| | | | | Message-Id: <200110300628.WAA11025@oregonnet.com> p4raw-id: //depot/perl@12778
* Hide __attribute__((unused)) behind PERL_UNUSED_DECL asJarkko Hietaniemi2001-06-131-1/+1
| | | | | suggested by NI-S. p4raw-id: //depot/perl@10561
* Medley of -Wall cleanups from Michael Schwen, Hugo van der Sanden,Jarkko Hietaniemi2001-05-301-0/+2
| | | | | and Abhijit Menon-Sen. p4raw-id: //depot/perl@10321
* Re: Making perl with -WallMichael G. Schwern2001-05-241-1/+5
| | | | | Message-ID: <20010524154028.B1988@blackrider.blackstar.co.uk> p4raw-id: //depot/perl@10197
* Re: [ PATCH perl@8956 ] new debug option -DR shows ref countsDave Mitchell2001-03-091-1/+1
| | | | | Message-Id: <200103081206.MAA06281@tiree.fdgroup.co.uk> p4raw-id: //depot/perl@9084
* malloc message address offsetCharles Lane2001-02-231-1/+1
| | | | | Message-Id: <010222075625.9d22e@DUPHY4.Physics.Drexel.Edu> p4raw-id: //depot/perl@8901
* Go ahead and #include <unistd.h> in perl.h.Jarkko Hietaniemi2000-11-221-9/+3
| | | p4raw-id: //depot/perl@7816
* Add HAS_SBRK_PROTO.Jarkko Hietaniemi2000-11-161-0/+2
| | | p4raw-id: //depot/perl@7710