added #expandMacrosWith:with:
authorClaus Gittinger <cg@exept.de>
Mon, 06 Jul 1998 21:59:18 +0200
changeset 3630 dd2f2db42638
parent 3629 e26cadd7ede5
child 3631 26a44b284912
added #expandMacrosWith:with:
CharArray.st
CharacterArray.st
--- a/CharArray.st	Sat Jun 20 18:19:10 1998 +0200
+++ b/CharArray.st	Mon Jul 06 21:59:18 1998 +0200
@@ -2122,6 +2122,17 @@
     "Modified: / 1.11.1997 / 13:30:50 / cg"
 !
 
+expandMacrosWith:arg1 with:arg2
+    "ST80 compatibility - expand '<..>' macros with
+     argument strings. Similar to #bindWith:.
+     Read the comment in #expandMacrosWithArguments: about
+     limited compatibility issues."
+
+    ^ self expandMacrosWithArguments:(Array with:arg1 with:arg2)
+
+    "Modified: / 6.7.1998 / 21:58:14 / cg"
+!
+
 expandMacrosWithArguments:argArray
     "ST80 compatibility - expand '<..>' macros with
      argument strings. Similar to #bindWith:.
@@ -5166,6 +5177,6 @@
 !CharacterArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/CharArray.st,v 1.150 1998-06-18 14:05:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/CharArray.st,v 1.151 1998-07-06 19:59:18 cg Exp $'
 ! !
 CharacterArray initialize!
--- a/CharacterArray.st	Sat Jun 20 18:19:10 1998 +0200
+++ b/CharacterArray.st	Mon Jul 06 21:59:18 1998 +0200
@@ -2122,6 +2122,17 @@
     "Modified: / 1.11.1997 / 13:30:50 / cg"
 !
 
+expandMacrosWith:arg1 with:arg2
+    "ST80 compatibility - expand '<..>' macros with
+     argument strings. Similar to #bindWith:.
+     Read the comment in #expandMacrosWithArguments: about
+     limited compatibility issues."
+
+    ^ self expandMacrosWithArguments:(Array with:arg1 with:arg2)
+
+    "Modified: / 6.7.1998 / 21:58:14 / cg"
+!
+
 expandMacrosWithArguments:argArray
     "ST80 compatibility - expand '<..>' macros with
      argument strings. Similar to #bindWith:.
@@ -5166,6 +5177,6 @@
 !CharacterArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.150 1998-06-18 14:05:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.151 1998-07-06 19:59:18 cg Exp $'
 ! !
 CharacterArray initialize!