Changeset 15327 for src/Pugs/Prim.hs

Show
Ignore:
Timestamp:
02/22/07 20:20:59 (21 months ago)
Author:
lwall
Message:

Y -> Z, XX -> X

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • src/Pugs/Prim.hs

    r15307 r15327  
    7777    return . VList $ map (castV . (% (clocksPerSecond :: VInt)) . toInteger . fromEnum) 
    7878        [u, s, cu, cs] 
    79 op0 "\xA5" = op0Zip -- ¥ 
    80 op0 "Y" = op0 "\xA5" 
    81 op0 "XX" = op0Cross 
     79op0 "Z" = op0Zip 
     80op0 "X" = op0Cross 
     81    -- op0 "minmax" = op0Minmax 
    8282op0 "File::Spec::cwd" = const $ do 
    8383    cwd <- guardIO getCurrentDirectory 
    … …  
    20892089\\n   Scalar    left    .[]     safe   (Array, Int)\ 
    20902090\\n   Scalar    left    .{}     safe   (Hash, Str)\ 
    2091 \\n   List      list    \xA5    safe   (Array)\ 
    20922091\\n   List      list    Y       safe   (Array)\ 
    2093 \\n   List      list    XX      safe   (Array)\ 
     2092\\n   List      list    X       safe   (Array)\ 
    20942093\\n   List      spre    <==     safe   (List)\ 
    20952094\\n   List      left    ==>     safe   (List, Code)\