Changeset 310

Show
Ignore:
Timestamp:
02/26/05 11:24:00 (4 years ago)
Author:
autrijus
svk:copy_cache_prev:
1041
Message:

* utf8

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • src/builtins.pod

    • Property svn:mime-type set to text/plain; charset=UTF-8
    r309 r310  
    3939    multi sub *infix:<+^>($x, $y) returns Num is equiv(&*infix:<+>) { ... } 
    4040    multi sub *infix:<+&>($x, $y) returns Num is equiv(&*infix:<*>) { ... } 
    41     multi sub *infix:�+<<�($x, $y) returns Num is equiv(&*infix:<*>) { ... } 
    42     multi sub *infix:�+>>�($x, $y) returns Num is equiv(&*infix:<*>) { ... } 
     41    multi sub *infix:«+<<»($x, $y) returns Num is equiv(&*infix:<*>) { ... } 
     42    multi sub *infix:«+>>»($x, $y) returns Num is equiv(&*infix:<*>) { ... } 
    4343 
    4444    # unary ops 
     
    5959    multi sub *infix:<~^>($x, $y) returns Str is equiv(&*infix:<+>) { ... } 
    6060    multi sub *infix:<~&>($x, $y) returns Str is equiv(&*infix:<*>) { ... } 
    61     multi sub *infix:�~<<�($x, $y) returns Str is equiv(&*infix:<*>) { ... } 
    62     multi sub *infix:�~>>�($x, $y) returns Str is equiv(&*infix:<*>) { ... } 
     61    multi sub *infix:«~<<»($x, $y) returns Str is equiv(&*infix:<*>) { ... } 
     62    multi sub *infix:«~>>»($x, $y) returns Str is equiv(&*infix:<*>) { ... } 
    6363 
    6464    # unary ops 
     
    8585        is assoc('chain') { ... } 
    8686    multi sub infix:<!=>($x, $y) returns bit is equiv(&*infix:<==>) { ... } 
    87     multi sub infix:�<�($x, $y) returns bit is equiv(&*infix:<==>) { ... } 
    88     multi sub infix:�<=�($x, $y) returns bit is equiv(&*infix:<==>) { ... } 
    89     multi sub infix:�>�($x, $y) returns bit is equiv(&*infix:<==>) { ... } 
    90     multi sub infix:�>=�($x, $y) returns bit is equiv(&*infix:<==>) { ... } 
     87    multi sub infix:«<»($x, $y) returns bit is equiv(&*infix:<==>) { ... } 
     88    multi sub infix:«<=»($x, $y) returns bit is equiv(&*infix:<==>) { ... } 
     89    multi sub infix:«>»($x, $y) returns bit is equiv(&*infix:<==>) { ... } 
     90    multi sub infix:«>=»($x, $y) returns bit is equiv(&*infix:<==>) { ... } 
    9191 
    9292    multi sub infix:<eq>($x, $y) returns bit is equiv(&*$infix:<==>) { ... } 
     
    106106    multi sub infix:<//>($x, $y) returns Scalar is equiv(&*infix:<||>) { ... } 
    107107 
    108     multi sub infix:<and>($x, $y) returns Scalar is looser(&*infix:�==>�)  
     108    multi sub infix:<and>($x, $y) returns Scalar is looser(&*infix:«==>»)  
    109109        { ... } 
    110110    multi sub infix:<or>($x, $y) returns Scalar is looser(&*infix:<and>)