Ignore:
Timestamp:
Jul 30, 2011, 8:57:28 PM (8 years ago)
Author:
shermer
Message:

v0.6.2
Made if-error compatible with python/pablo.
Cleaned up instruction printing and pythonating.
Fixed bug in copying ConditionASTN.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • proto/pebble/trunk/inputs/input-10.pbl

    r1242 r1248  
    1010
    1111macro first {
    12         ccc = ddd
    13         eee = fff
    14         while eee not allzero {
    15                 ggg = hhh
    16                 iii = jjj
     12        a = b & c
     13        d = e | f
     14        g = h ^ i
     15        j = ~k
     16        l = m
     17        n = >>>o
     18        p = q +> r
     19        s = t <> u
     20       
     21        if v & w | x not allone then {
     22                x = 0
     23        }
     24        else {
     25                x = 1
     26        }
     27
     28        if y not allzero
     29                error <<this is an error>>
     30       
     31        z = 0
     32       
     33        while alpha not allone {
     34                beta = 0
     35                gamma = 1
     36                delta = 2
    1737        }
    1838}
     
    2242}
    2343
    24 macro normalize_line_breaks {
    25         control.CRLF = "\r\n"
    26        
    27         # Convert CRs to LFs (flip bits 5, 6 and 7 with xor).
    28         basis_bits.bit_5 ^= [\r]
    29         basis_bits.bit_6 ^= [\r]
    30         basis_bits.bit_7 ^= [\r]
    31 }
    32 
    33 macro add_multiliterals {
    34         PI_start = "<?"
    35         CtCD_start = "<!"
    36         EndTag_start = "</"
    37         CD_End = "]]>"
    38         DoubleHyphen = "--"
    39         PI_end = "?>"
    40 }
    41 
    42 macro parse_CtCDPI {
    43         CD_span = 0
    44         Ct_span = 0
    45        
    46         while CtCDPI_Cursor not allzero {
    47                 CtCDPI_starts |= CtCDPI_Cursor
    48                 PI_Cursor = CtCDPI_Cursor & "<?"
    49                 CD_Ct_Cursor = >(CtCDPI_Cursor & ~PI_Cursor)
    50                 CD_Cursor = CD_Ct_Cursor & [<]
    51 
    52                 PI_Cursor = PI_name_end +> PI_end_scan
    53                 CD_Cursor +>= CD_end_scan
    54                 Ct_Cursor = >(Ct_Cursor +> Ct_end_scan)
    55                
    56                 PI_ends |= PI_Cursor
    57                 CD_ends |= CD_Cursor
    58                 Ct_ends |= Ct_Cursor
    59         }
    60 }
    61 
    62 
    63 macro validate_no_CD_end {
    64          e = lex.CD_end & ~(markup1.CtCDPI_mask | tags.Tags)
    65 }
    6644
    6745
Note: See TracChangeset for help on using the changeset viewer.