one.dylan

// This outputs a/
define function one ()
  let a = as (<directory-locator>, "a/");
  let b = as (<file-locator>, "b");
  let c = merge-locators(a, b);
  format-out("%s\n", as(<string>, c));
end;

two.dylan

// This outputs a/b
define function two ()
  let a = as (<directory-locator>, "a/");
  let b = as (<file-locator>, "b");
  let c = merge-locators(b, a);
  format-out("%s\n", as(<string>, c));
end;