Listener method code assignment was starting at zero but needed to start

at one. Whoopskidoodle.


git-svn-id: svn+ssh://src.earth.threerings.net/narya/trunk@1656 542714f4-19e9-0310-aa3c-eee0fc999fb1

bin/genservice

@@ -1,6 +1,6 @@
 #!/usr/bin/perl -w
 #
-# $Id: genservice,v 1.3 2002/08/14 19:07:48 mdb Exp $
+# $Id: genservice,v 1.4 2002/08/20 19:26:23 mdb Exp $
 #
 # This script is used to generate invocation service marshaller and
 # unmarshaller classes based on invocation service interface definitions.
@@ -156,7 +156,7 @@ while ($srcfile = shift) {
             my $lmethod = {
                 "mname" => $methname,
                 "mcode" => to_caps($methname),
-                "mcodeval" => $lmethcount++,
+                "mcodeval" => ++$lmethcount,
                 "arglist" => gen_arglist(@trimmed_args),
                 "wrapped_args" => wrap_arglist(0, @trimmed_args),
                 "unwrapped_args" => unwrap_arglist(@trimmed_args),