From 768fa031448f6e4103bb5fd856f1142946df178c Mon Sep 17 00:00:00 2001
From: Luigi Ballabio <luigi.ballabio@fastwebnet.it>
Date: Thu, 11 Sep 2003 08:19:27 +0000
Subject: [PATCH] Fixed Perl std::vector::at problem with gcc < 3.0

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@5100 626c5289-ae23-0410-ae9c-e8d60b6d4f22
---
 Lib/perl5/std_vector.i | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Lib/perl5/std_vector.i b/Lib/perl5/std_vector.i
index e66a56f4f..bb28cee2b 100644
--- a/Lib/perl5/std_vector.i
+++ b/Lib/perl5/std_vector.i
@@ -140,7 +140,7 @@ namespace std {
             SV **svs = new SV*[len];
             for (unsigned int i=0; i<len; i++) {
                 svs[i] = sv_newmortal();
-                SWIG_MakePtr(svs[i], (void*)&($1.at(i)), 
+                SWIG_MakePtr(svs[i], (void*)&($1[i]), 
                              $descriptor(T *), 0);
             }
             AV *myav = av_make(len, svs);
@@ -313,7 +313,7 @@ namespace std {
             SV **svs = new SV*[len];
             for (unsigned int i=0; i<len; i++) {
                 svs[i] = sv_newmortal();
-                FROM_T(svs[i], $1.at(i));
+                FROM_T(svs[i], $1[i]);
             }
             AV *myav = av_make(len, svs);
             delete[] svs;