Ignore:
Timestamp:
Nov 23, 2011, 1:55:12 PM (8 years ago)
Author:
tranquil
Message:

branch up to date

File:
1 edited

Legend:

Unmodified
Added
Removed
  • Deliverables/D2.2/8051-indexed-labels-branch/src/common/costLabel.ml

    r1433 r1539  
    11module Atom =
    2         struct
    3                 include StringTools
    4         end
     2  struct
     3    include StringTools
     4  end
    55
    66module StringMap = Map.Make(String)
     
    3535
    3636let continue_loop_single indexing n =
    37         try
    38                 ExtArray.set indexing n (ExtArray.get indexing n + 1)
    39         with | _ ->
    40           invalid_arg "uninitialized loop index"
     37  try
     38    ExtArray.set indexing n (ExtArray.get indexing n + 1)
     39  with | _ ->
     40    invalid_arg "uninitialized loop index"
    4141
    4242let curr_ind = function
     
    172172let constant_map d x =
    173173  Set.fold (fun k accu -> Map.add k x accu) d Map.empty
    174 
    175        
    176                 (**  **)
Note: See TracChangeset for help on using the changeset viewer.