Bloofer

int c;
c = 12;

if (true) {
  c = 2;
}
return c * 2;

Bloofer

return 4;

Bloofer

#############################################################
# Configuration file for clone detection.
#

############################################################ 
# Often, need to change these common parameters:
# - FILE_PATTERN : for source files in different languages
# - SRC_DIR : the root directory containing the source files
# - DECKARD_DIR : Where is the home directory of DECKARD
# - clone detection parameters: c.f. DECKARD's paper

Bloofer

	private int getDefaultRowSize() {
		
		int rowSize = DebugUITools.getPreferenceStore().getInt(IDebugPreferenceConstants.PREF_ROW_SIZE);
		int bytePerLine = rowSize * getAddressableSize();
		
		// check synchronized row size
		Integer size = (Integer)getSynchronizedProperty(AbstractAsyncTableRendering.PROPERTY_ROW_SIZE);
		if (size != null)
		{
			// row size is stored as actual number of bytes in synchronizer

Bloofer

				if (data instanceof MemorySegment) {
					MemorySegment line = (MemorySegment) data;

					if (col > 0) {
						int start = (col - 1) * getBytesPerColumn();
						int end = start + getBytesPerColumn();
						MemoryByte[] bytes = line.getBytes(start, end);

						String str = getToolTipText((BigInteger)address, bytes);

Bloofer

			if (address != null) {
				Object data = item.getData();
				if (data instanceof TableRenderingLine) {
					TableRenderingLine line = (TableRenderingLine) data;

					if (col > 0) {
						int start = (col - 1) * getBytesPerColumn();
						int end = start + getBytesPerColumn();
						MemoryByte[] bytes = line.getBytes(start, end);

Bloofer

open Core.Std

let find_mismatches map1 map2 =
  Map.to_sequence map1
  |> Sequence.filter_map ~f:(fun (key, data) ->
    match Map.find map2 key with
    | None -> None
    | Some data' -> 
      if data' <> data then Some key 
      else None 

Bloofer

def find_mismatches(d1,d2):
  mismatches = [];
  for (key,data) in d1.items():
    if data != d2[key]:
      mismatches.append(key)
  return mismatches

Bloofer

let%expect_test _ =
  let test l =
    let stringify l = List.map ~f:Int.to_string |> String.concat ~sep:"-" in
    List.group l ~break:(fun x y -> y < x)
    |> List.iter ~f:(fun sub -> print_endline (stringify sub))
  in
  test [1;2;3;2;3;3;6;1;2;36;7];
  [%expect {|
    1-2-3
    2-3-3-6

Bloofer

int a, b = 0;
bool t, f = false;