Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Function to compare two scripts?

From: SunandaDH::aol::com at: 21-Aug-2003 11:49

Hi there, I think something like this has been posted before, but I can't find it. I'd like to be able to compare two scripts (or any pair of newline-separated text items) and get a block of the differences. Can anyone help? As an example of the sort of thing I'm looking for: version-1: { rebol [ name: "fred" title: "test script" ] print "test" haltt} version-2: { REBOL [ name: "fred" title: "test script" history: [21-aug-2003 "Fixed exit problem"] halt} differences: delta-script version-1 version-2 ;; I'd like output something like: foreach diff differences [print diff] line 1 replace "rebol [" "REBOL [" line 4 insert {history: [21-aug-2003 "Fixed exit problem"]} line 6 delete {print "test"} line 7 replace "hallt" "halt" Thanks! Sunanda.