Permalink
Browse files

[STD,Cursor] implement internal import correctly

[Cursor] reorganize methods into appropriate sections
[CORE.setting] remove import hack now that import works
[CORE.pad] fix parsefail


git-svn-id: http://svn.pugscode.org/pugs@28539 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent 0bb0d75 commit 4955089554420163cf1bf75c3fd6d12bbba8924b lwall committed Oct 1, 2009
Showing with 2,112 additions and 2,099 deletions.
  1. +1 −1 CORE.pad
  2. +1 −4 CORE.setting
  3. +2,087 −2,084 Cursor.pmc
  4. +23 −10 STD.pm
View
@@ -4,7 +4,7 @@ use STASH;
use NAME;
my $file = { name => 'CORE.pad' };
my $core = STASH::->new( _file => $file, _line => __LINE__,
- '!id' => [$id];
+ '!id' => [$id],
Bool => NAME::->new( name => 'Bool', file => $file, line => __LINE__ ),
'Bool::' => STASH::->new( _file => $file, _line => __LINE__,
True => NAME::->new( name => 'True', file => $file, line => __LINE__ ),
View
@@ -64,15 +64,12 @@ my class StrPos { }
my class StrLen { }
my class Version { }
-class Num {
+my class Num {
constant pi is export = 3.14159_26535_89793_23846_26433_83279_50288;
constant e is export = 2.71828_18284_59045_23536_02874_71352_66249;
constant i is export = 1i;
}
import Num <pi e i>;
-constant pi = 3.14159_26535_89793_23846_26433_83279_50288;
-constant e = 2.71828_18284_59045_23536_02874_71352_66249;
-constant i = 1i;
my class num { }
my class num16 { }
Oops, something went wrong.

0 comments on commit 4955089

Please sign in to comment.