[pure-lang-svn] SF.net SVN: pure-lang:[621] pure/trunk/symtable.cc

[<ag...@us...>]

Revision: 621
          http://pure-lang.svn.sourceforge.net/pure-lang/?rev=621&view=rev
Author:   agraef
Date:     2008-08-27 07:12:55 +0000 (Wed, 27 Aug 2008)

Log Message:
-----------
Create global rather than private symbols by default.

Modified Paths:
--------------
    pure/trunk/symtable.cc

Modified: pure/trunk/symtable.cc
===================================================================
--- pure/trunk/symtable.cc	2008-08-27 00:32:31 UTC (rev 620)
+++ pure/trunk/symtable.cc	2008-08-27 07:12:55 UTC (rev 621)
@@ -59,7 +59,7 @@
 symbol& symtable::sym(const string& s, int32_t modno)
 {
   symbol* _symp = lookup(s, modno);
-  if (_symp) modno = _symp->modno;
+  modno = _symp?_symp->modno:-1;
   symbol& _sym = tab[modno][s];
   if (_sym.f == 0) {
     if ((uint32_t)++fno > rtab.capacity())
@@ -75,7 +75,7 @@
 {
   assert(prec <= 10);
   symbol* _symp = lookup(s, modno);
-  if (_symp) modno = _symp->modno;
+  modno = _symp?_symp->modno:-1;
   symbol& _sym = tab[modno][s];
   if (_sym.f == 0) {
     if ((uint32_t)++fno > rtab.capacity())


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.