diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 92d6ee3fb1..df9fb8a952 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,63 @@ The license applies to all entries newer than 2009-04-28. */ +2012-07-30 01:58 UTC+0200 Viktor Szakats (harbour syenar.net) + * contrib/hbct/doc/en/addascii.txt + * contrib/hbct/doc/en/asciisum.txt + * contrib/hbct/doc/en/ascpos.txt + * contrib/hbct/doc/en/atadjust.txt + * contrib/hbct/doc/en/atnum.txt + * contrib/hbct/doc/en/atrepl.txt + * contrib/hbct/doc/en/charevod.txt + * contrib/hbct/doc/en/charlihb.txt + * contrib/hbct/doc/en/charlist.txt + * contrib/hbct/doc/en/charmirr.txt + * contrib/hbct/doc/en/charmix.txt + * contrib/hbct/doc/en/charone.txt + * contrib/hbct/doc/en/charonly.txt + * contrib/hbct/doc/en/charop.txt + * contrib/hbct/doc/en/charophb.txt + * contrib/hbct/doc/en/charrepl.txt + * contrib/hbct/doc/en/charsort.txt + * contrib/hbct/doc/en/charswap.txt + * contrib/hbct/doc/en/color.txt + * contrib/hbct/doc/en/count.txt + * contrib/hbct/doc/en/ct.txt + * contrib/hbct/doc/en/ctc.txt + * contrib/hbct/doc/en/ctmath.txt + * contrib/hbct/doc/en/ctmath2.txt + * contrib/hbct/doc/en/ctpad.txt + * contrib/hbct/doc/en/ctstr.txt + * contrib/hbct/doc/en/datetime.txt + * contrib/hbct/doc/en/dattime2.txt + * contrib/hbct/doc/en/dattime3.txt + * contrib/hbct/doc/en/exponent.txt + * contrib/hbct/doc/en/finan.txt + * contrib/hbct/doc/en/justify.txt + * contrib/hbct/doc/en/keyset.txt + * contrib/hbct/doc/en/num1.txt + * contrib/hbct/doc/en/numat.txt + * contrib/hbct/doc/en/numconv.txt + * contrib/hbct/doc/en/pos1.txt + * contrib/hbct/doc/en/pos2.txt + * contrib/hbct/doc/en/posdiff.txt + * contrib/hbct/doc/en/print.txt + * contrib/hbct/doc/en/range.txt + * contrib/hbct/doc/en/relation.txt + * contrib/hbct/doc/en/remove.txt + * contrib/hbct/doc/en/replace.txt + * contrib/hbct/doc/en/screen1.txt + * contrib/hbct/doc/en/strdiff.txt + * contrib/hbct/doc/en/strswap.txt + * contrib/hbct/doc/en/tab.txt + * contrib/hbct/doc/en/token1.txt + * contrib/hbct/doc/en/token2.txt + * contrib/hbct/doc/en/trig.txt + * contrib/hbct/doc/en/video.txt + * contrib/hbct/doc/en/wordrepl.txt + * contrib/hbct/doc/en/wordtoch.txt + * code formatting, minor cleanups + 2012-07-30 01:40 UTC+0200 Viktor Szakats (harbour syenar.net) * contrib/hbide/resources/b_1.png * contrib/hbide/resources/b_10.png diff --git a/harbour/contrib/hbct/doc/en/addascii.txt b/harbour/contrib/hbct/doc/en/addascii.txt index d067ca7431..e4332fad78 100644 --- a/harbour/contrib/hbct/doc/en/addascii.txt +++ b/harbour/contrib/hbct/doc/en/addascii.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Add an integer value to an ascii value of a string * $SYNTAX$ - * ADDASCII (<[@]cString>, , [], []) --> cString + * ADDASCII( <[@]cString>, , [], [] ) --> cString * $ARGUMENTS$ * <[@]cString> is the string that should be edited * is a integer value that should be added to the @@ -40,17 +40,17 @@ * // Add 32 to the ASCII value of the character at the last position * // in the string * - * ? addascii ("SmitH", 32) --> "Smith" + * ? addascii( "SmitH", 32 ) // --> "Smith" * $TESTS$ - * addascii ("0000", 1, 1) == "1000" - * addascii ("0000", 1) == "0001" - * addascii ("AAAA", -255, 1) == "BAAA" - * addascii ("AAAA", -255) == "AAAB" - * addascii ("AAAA", 1, 2, .T.) == "ABAA" - * addascii ("AAAA", 257, 2, .T.) == "BBAA" - * addascii ("AAAA", 257, 2, .F.) == "ABAA" - * addascii ("AAAA", 258,, .T.) == "AABC" - * addascii ("ABBA", -257, 3, .T.) == "AAAA" + * addascii( "0000", 1, 1 ) == "1000" + * addascii( "0000", 1 ) == "0001" + * addascii( "AAAA", -255, 1 ) == "BAAA" + * addascii( "AAAA", -255 ) == "AAAB" + * addascii( "AAAA", 1, 2, .T. ) == "ABAA" + * addascii( "AAAA", 257, 2, .T. ) == "BBAA" + * addascii( "AAAA", 257, 2, .F. ) == "ABAA" + * addascii( "AAAA", 258,, .T. ) == "AABC" + * addascii( "ABBA", -257, 3, .T. ) == "AAAA" * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/asciisum.txt b/harbour/contrib/hbct/doc/en/asciisum.txt index 6d971907a9..eba1e86789 100644 --- a/harbour/contrib/hbct/doc/en/asciisum.txt +++ b/harbour/contrib/hbct/doc/en/asciisum.txt @@ -10,7 +10,7 @@ * $ONELINER$ * calculate the sum of the ASCII values of the characters in a string * $SYNTAX$ - * ASCIISUM () --> nAsciiSum + * ASCIISUM( ) --> nAsciiSum * $ARGUMENTS$ * the string to be processed * $RETURNS$ @@ -21,12 +21,12 @@ * i.e. a change of position of a certain character in the string does * not change the ascii sum. * $EXAMPLES$ - * ? asciisum ("ABC") --> 197 - * ? asciisum ("ACB") --> 197 + * ? asciisum( "ABC" ) // --> 197 + * ? asciisum( "ACB" ) // --> 197 * $TESTS$ - * asciisum (replicate ("A", 10000)) == 650000 - * asciisum ("0123456789") == 525 - * asciisum (nil) == 0 + * asciisum( Replicate( "A", 10000 ) ) == 650000 + * asciisum( "0123456789" ) == 525 + * asciisum( NIL ) == 0 * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/ascpos.txt b/harbour/contrib/hbct/doc/en/ascpos.txt index b8a901337e..880b37ef37 100644 --- a/harbour/contrib/hbct/doc/en/ascpos.txt +++ b/harbour/contrib/hbct/doc/en/ascpos.txt @@ -10,7 +10,7 @@ * $ONELINER$ * ASCII value of a character at a certain position * $SYNTAX$ - * ASCPOS (, []) --> nAsciiValue + * ASCPOS( , [] ) --> nAsciiValue * $ARGUMENTS$ * is the processed string * [] is an optional position within @@ -23,12 +23,12 @@ * can be found at the position in . If * is larger than the length of , 0 is returned. * $EXAMPLES$ - * ? ascpos ("0123456789") --> 57 - * ? ascpos ("0123456789",1) --> 48 + * ? ascpos( "0123456789" ) // --> 57 + * ? ascpos( "0123456789", 1 ) // --> 48 * $TESTS$ - * ascpos ("0123456789") == 57 - * ascpos ("0123456789",1) == 48 - * ascpos ("0123456789",11) == 0 // to large ! + * ascpos( "0123456789" ) == 57 + * ascpos( "0123456789", 1 ) == 48 + * ascpos( "0123456789", 11 ) == 0 // to large ! * $STATUS$ * Ready * $COMPLIANCE$ @@ -50,7 +50,7 @@ * $ONELINER$ * Numerical value of a character at a certain position * $SYNTAX$ - * VALPOS (, []) --> nDigitValue + * VALPOS( , [] ) --> nDigitValue * $ARGUMENTS$ * is the processed string * [] is an optional position within @@ -64,13 +64,13 @@ * can be found at this position or if * is larger than the length of , 0 is returned. * $EXAMPLES$ - * ? valpos ("1234x56789") --> 9 - * ? valpos ("1234x56789",1) --> 1 + * ? valpos( "1234x56789" ) // --> 9 + * ? valpos( "1234x56789", 1 ) // --> 1 * $TESTS$ - * valpos ("1234x56789") == 9 - * valpos ("1234x56789",1) == 1 - * valpos ("1234x56789",11) == 0 // to large ! - * valpos ("1234x56789",5) == 0 // "x" is not a digit ! + * valpos( "1234x56789" ) == 9 + * valpos( "1234x56789", 1 ) == 1 + * valpos( "1234x56789", 11 ) == 0 // to large ! + * valpos( "1234x56789", 5 ) == 0 // "x" is not a digit ! * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/atadjust.txt b/harbour/contrib/hbct/doc/en/atadjust.txt index bf566b08ca..9419e3a4bc 100644 --- a/harbour/contrib/hbct/doc/en/atadjust.txt +++ b/harbour/contrib/hbct/doc/en/atadjust.txt @@ -10,9 +10,9 @@ * $ONELINER$ * Adjusts a sequence within a string to a specified position * $SYNTAX$ - * ATADJUST (, , , + * ATADJUST( , , , * [], [], - * []) -> cString + * [] ) -> cString * $ARGUMENTS$ * is the sequence to be adjusted within * is the string that contains diff --git a/harbour/contrib/hbct/doc/en/atnum.txt b/harbour/contrib/hbct/doc/en/atnum.txt index ac6ccf4142..9743655d80 100644 --- a/harbour/contrib/hbct/doc/en/atnum.txt +++ b/harbour/contrib/hbct/doc/en/atnum.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Returns string portion after nth occurence of substring * $SYNTAX$ - * AFTERATNUM (, , [], + * AFTERATNUM( , , [], * [] ) --> cRestString * $ARGUMENTS$ * is the substring scanned for @@ -38,13 +38,13 @@ * second character of the matched substring otherwise. * The function will also consider the settings of SETATLIKE(). * $EXAMPLES$ - * ? AFTERATNUM ("!", "What is the answer ? 4 ! 5 !") -> "" - * ? AFTERATNUM ("!", "What is the answer ? 4 ! 5 ?") -> " 5 ?" + * ? AFTERATNUM( "!", "What is the answer ? 4 ! 5 !" ) // -> "" + * ? AFTERATNUM( "!", "What is the answer ? 4 ! 5 ?" ) // -> " 5 ?" * * $TESTS$ - * AFTERATNUM ("..", "..This..is..a..test!") == "test!" - * AFTERATNUM ("..", "..This..is..a..test!", 2) == "is..a..test!" - * AFTERATNUM ("..", "..This..is..a..test!", 2, 2) == "a..test!" + * AFTERATNUM( "..", "..This..is..a..test!" ) == "test!" + * AFTERATNUM( "..", "..This..is..a..test!", 2 ) == "is..a..test!" + * AFTERATNUM( "..", "..This..is..a..test!", 2, 2 ) == "a..test!" * $STATUS$ * Ready * $COMPLIANCE$ @@ -66,7 +66,7 @@ * $ONELINER$ * Returns string portion before nth occurence of substring * $SYNTAX$ - * BEFORATNUM (, , [], + * BEFORATNUM( , , [], * [] ) --> cRestString * $ARGUMENTS$ * is the substring scanned for @@ -94,13 +94,13 @@ * second character of the matched substring otherwise. * The function will also consider the settings of SETATLIKE(). * $EXAMPLES$ - * ? BEFORATNUM ("!", "What is the answer ? 4 ! 5 !") -> "What is the answer ? 4 ! 5 " - * ? BEFORATNUM ("!", "What is the answer ? 4 ! 5 ?") -> "What is the answer ? 4 " + * ? BEFORATNUM( "!", "What is the answer ? 4 ! 5 !" ) // -> "What is the answer ? 4 ! 5 " + * ? BEFORATNUM( "!", "What is the answer ? 4 ! 5 ?" ) // -> "What is the answer ? 4 " * * $TESTS$ - * BEFORATNUM ("..", "..This..is..a..test!") == "..This..is..a" - * BEFORATNUM ("..", "..This..is..a..test!", 2) == "..This" - * BEFORATNUM ("..", "..This..is..a..test!", 2, 2) == "..This..is" + * BEFORATNUM( "..", "..This..is..a..test!" ) == "..This..is..a" + * BEFORATNUM( "..", "..This..is..a..test!", 2 ) == "..This" + * BEFORATNUM( "..", "..This..is..a..test!", 2, 2 ) == "..This..is" * $STATUS$ * Ready * $COMPLIANCE$ @@ -149,13 +149,13 @@ * second character of the matched substring otherwise. * The function will also consider the settings of SETATLIKE(). * $EXAMPLES$ - * ? ATNUM ("!", "What is the answer ? 4 ! 5 !") -> 28 - * ? ATNUM ("!", "What is the answer ? 4 ! 5 ?") -> 24 + * ? ATNUM( "!", "What is the answer ? 4 ! 5 !" ) // -> 28 + * ? ATNUM( "!", "What is the answer ? 4 ! 5 ?" ) // -> 24 * * $TESTS$ - * ATNUM ("..", "..This..is..a..test!") == 14 - * ATNUM ("..", "..This..is..a..test!", 2) == 7 - * ATNUM ("..", "..This..is..a..test!", 2, 2) == 11 + * ATNUM( "..", "..This..is..a..test!" ) == 14 + * ATNUM( "..", "..This..is..a..test!", 2 ) == 7 + * ATNUM( "..", "..This..is..a..test!", 2, 2 ) == 11 * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/atrepl.txt b/harbour/contrib/hbct/doc/en/atrepl.txt index 36893e5327..bd7aa03869 100644 --- a/harbour/contrib/hbct/doc/en/atrepl.txt +++ b/harbour/contrib/hbct/doc/en/atrepl.txt @@ -10,8 +10,8 @@ * $ONELINER$ * Search and replace sequences in a string * $SYNTAX$ - * ATREPL (, , , [], - * [], []) --> cString + * ATREPL( , , , [], + * [], [] ) --> cString * $ARGUMENTS$ * is the substring searched for in * is the processed string @@ -44,15 +44,15 @@ * The function allows the use of wildcards in * and looks for the settings of SETATLIKE(). * $EXAMPLES$ - * ? ATREPL("ABC", "ABCDABCDABC", "xx") --> "xxDxxDxx" - * ? ATREPL("ABC", "ABCDABC", "ZYXW") --> "ZYXWDZYXW" - * ? ATREPL("ABC", "ABCDABCDABC", "xx", 2) --> "xxDxxDABC" - * ? ATREPL("ABC", "ABCDABCDABC", "xx", 2, .T.) --> "ABCDxxDABC" + * ? ATREPL( "ABC", "ABCDABCDABC", "xx" ) // --> "xxDxxDxx" + * ? ATREPL( "ABC", "ABCDABC", "ZYXW" ) // --> "ZYXWDZYXW" + * ? ATREPL( "ABC", "ABCDABCDABC", "xx", 2 ) // --> "xxDxxDABC" + * ? ATREPL( "ABC", "ABCDABCDABC", "xx", 2, .T. ) // --> "ABCDxxDABC" * $TESTS$ - * ATREPL("ABC", "ABCDABCDABC", "xx") == "xxDxxDxx" - * ATREPL("ABC", "ABCDABC", "ZYXW") == "ZYXWDZYXW" - * ATREPL("ABC", "ABCDABCDABC", "xx", 2) == "xxDxxDABC" - * ATREPL("ABC", "ABCDABCDABC", "xx", 2, .T.) == "ABCDxxDABC" + * ATREPL( "ABC", "ABCDABCDABC", "xx" ) == "xxDxxDxx" + * ATREPL( "ABC", "ABCDABC", "ZYXW" ) == "ZYXWDZYXW" + * ATREPL( "ABC", "ABCDABCDABC", "xx", 2 ) == "xxDxxDABC" + * ATREPL( "ABC", "ABCDABCDABC", "xx", 2, .T. ) == "ABCDxxDABC" * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/charevod.txt b/harbour/contrib/hbct/doc/en/charevod.txt index b05baf39b2..8c11d494d3 100644 --- a/harbour/contrib/hbct/doc/en/charevod.txt +++ b/harbour/contrib/hbct/doc/en/charevod.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Returns the characters on the even positions in a string * $SYNTAX$ - * CHAREVEN () --> cEvenString + * CHAREVEN( ) --> cEvenString * $ARGUMENTS$ * processed string * $RETURNS$ @@ -20,11 +20,11 @@ * The CHAREVEN() function looks for the characters on the even positions * in a given string, collects them and returns them as a string. * $EXAMPLES$ - * ? CHAREVEN (" H E L L O !") -> "HELLO!" + * ? CHAREVEN( " H E L L O !" ) // -> "HELLO!" * $TESTS$ - * CHAREVEN (" 1 2 3 4 5") == "12345" - * CHAREVEN (" 1 2 3 4 ") == "1234" - * CHAREVEN (" ") == "" + * CHAREVEN( " 1 2 3 4 5" ) == "12345" + * CHAREVEN( " 1 2 3 4 " ) == "1234" + * CHAREVEN( " " ) == "" * $STATUS$ * Ready * $COMPLIANCE$ @@ -46,7 +46,7 @@ * $ONELINER$ * Returns the characters on the odd positions in a string * $SYNTAX$ - * CHARODD () --> cOddString + * CHARODD( ) --> cOddString * $ARGUMENTS$ * processed string * $RETURNS$ @@ -56,10 +56,10 @@ * The CHARODD() function looks for the characters on the odd positions * in a given string, collects them and returns them as a string. * $EXAMPLES$ - * ? CHARODD ("H E L L O ! ") -> "HELLO!" + * ? CHARODD( "H E L L O ! " ) // -> "HELLO!" * $TESTS$ - * CHARODD ("1A2B3C4D5E") == "12345" - * CHARODD ("1A2B3C4D5") == "12345" + * CHARODD( "1A2B3C4D5E" ) == "12345" + * CHARODD( "1A2B3C4D5" ) == "12345" * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/charlihb.txt b/harbour/contrib/hbct/doc/en/charlihb.txt index ea04501d8f..4a02616c96 100644 --- a/harbour/contrib/hbct/doc/en/charlihb.txt +++ b/harbour/contrib/hbct/doc/en/charlihb.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Generates a sorted list of all characters in a string * $SYNTAX$ - * CHARSLIST ([]) -> cSortedCharacterList + * CHARSLIST( [] ) -> cSortedCharacterList * $ARGUMENTS$ * [] is the string for whom the function generates a * sorted list of all characters @@ -23,11 +23,11 @@ * only once, so that its maximum length is 256. The function * gives the same result as CHARSORT(CHARLIST()) * $EXAMPLES$ - * ? charslist ("Hello World !") --> " !HWdelor" + * ? charslist( "Hello World !" ) // --> " !HWdelor" * $TESTS$ - * charslist ("Hello World !") == " !HWdelor" - * charslist ("Hello World !") == charsort (charlist ("Hello World !")) - * charslist (nil) == "" + * charslist( "Hello World !" ) == " !HWdelor" + * charslist( "Hello World !" ) == charsort (charlist ("Hello World !")) + * charslist( NIL ) == "" * $STATUS$ * Ready * $COMPLIANCE$ @@ -49,7 +49,7 @@ * $ONELINER$ * Generates a character histogram of a string * $SYNTAX$ - * CHARHIST ([]) -> aCharacterCount + * CHARHIST( [] ) -> aCharacterCount * $ARGUMENTS$ * [] is the string for whom the function generates a * character histogram @@ -63,10 +63,10 @@ * in an 256-element array where the nth element contains the count * of ASCII character #(n-1) in . * $EXAMPLES$ - * ? charhist ("Hello World !")[109] --> 3 // chr(108)=="l" + * ? charhist( "Hello World !" )[ 109 ] // --> 3 // Chr( 108 ) == "l" * $TESTS$ - * charhist ("Hello World !")[109] == 3 - * eval ({||aeval (charhist ("Hello World !"),{|x|nTotal+=x}),nTotal==len("Hello World !")} + * charhist( "Hello World !" )[ 109 ] == 3 + * eval( {|| AEval( charhist( "Hello World !" ), {| x | nTotal += x } ), nTotal == Len( "Hello World !" ) } * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/charlist.txt b/harbour/contrib/hbct/doc/en/charlist.txt index c51007eef3..18d4f2736a 100644 --- a/harbour/contrib/hbct/doc/en/charlist.txt +++ b/harbour/contrib/hbct/doc/en/charlist.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Generates a list of all characters in a string * $SYNTAX$ - * CHARLIST ([]) -> cCharacterList + * CHARLIST( [] ) -> cCharacterList * $ARGUMENTS$ * [] is the string for whom the function generates a list * of all characters @@ -23,10 +23,10 @@ * only once, so that its maximum length is 256. The list lists those * characters first that are occuring in first. * $EXAMPLES$ - * ? charlist ("Hello World !") --> "Helo Wrd!" + * ? charlist( "Hello World !" ) // --> "Helo Wrd!" * $TESTS$ - * charlist ("Hello World !") == "Helo Wrd!" - * charlist (nil) == "" + * charlist( "Hello World !" ) == "Helo Wrd!" + * charlist( NIL ) == "" * $STATUS$ * Ready * $COMPLIANCE$ @@ -48,7 +48,7 @@ * $ONELINER$ * Generates a list of all characters not contained in a string * $SYNTAX$ - * CHARNOLIST ([]) -> cCharacterList + * CHARNOLIST( [] ) -> cCharacterList * $ARGUMENTS$ * [] is the string for whom the function generates a list * of all characters not contained in that string @@ -61,10 +61,10 @@ * only once, so that its maximum length is 256. The list is alphabetically * sorted. * $EXAMPLES$ - * ? charnolist (charnolist ("Hello World !")) --> " !HWdelor" + * ? charnolist( charnolist( "Hello World !" ) ) // --> " !HWdelor" * $TESTS$ - * charnolist (charnolist ("Hello World !")) == charslist ("Hello World !") - * charnolist (charnolist (nil)) == "" + * charnolist( charnolist( "Hello World !" ) ) == charslist( "Hello World !" ) + * charnolist( charnolist( NIL ) ) == "" * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/charmirr.txt b/harbour/contrib/hbct/doc/en/charmirr.txt index 2be1392fe3..16d86deeab 100644 --- a/harbour/contrib/hbct/doc/en/charmirr.txt +++ b/harbour/contrib/hbct/doc/en/charmirr.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Mirror a string * $SYNTAX$ - * CHARMIRR (<[@]cString>, []) -> cMirroredString + * CHARMIRR( <[@]cString>, [] ) -> cMirroredString * $ARGUMENTS$ * <[@]cString> is the string that should be mirrored * [] if set to .T., spaces at the end of @@ -27,13 +27,13 @@ * switch to .T., but must then be passed by reference to get * a result. * $EXAMPLES$ - * ? charmirr ("racecar") // "racecar" - * ? charmirr ("racecar ", .T.) // "racecar " - * ? charmirr ("racecar ", .F.) // " racecar" + * ? charmirr( "racecar" ) // "racecar" + * ? charmirr( "racecar ", .T. ) // "racecar " + * ? charmirr( "racecar ", .F. ) // " racecar" * $TESTS$ - * charmirr ("racecar") == "racecar" - * charmirr ("racecar ", .T.) == "racecar " - * charmirr ("racecar ", .F.) == " racecar" + * charmirr( "racecar" ) == "racecar" + * charmirr( "racecar ", .T. ) == "racecar " + * charmirr( "racecar ", .F. ) == " racecar" * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/charmix.txt b/harbour/contrib/hbct/doc/en/charmix.txt index 0575d6cbab..d51baa43a0 100644 --- a/harbour/contrib/hbct/doc/en/charmix.txt +++ b/harbour/contrib/hbct/doc/en/charmix.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Mix two strings * $SYNTAX$ - * CHARMIX ([, ]) --> cMixedString + * CHARMIX( [, ] ) --> cMixedString * $ARGUMENTS$ * String that will be mixed with the characters from * [] String whose characters will be mixed with the one from @@ -27,17 +27,17 @@ * the begin of again. If on the other hand is * longer than , the surplus characters will be omitted. * $EXAMPLES$ - * ? CHARMIX("ABC", "123") // "A1B2C3" - * ? CHARMIX("ABCDE", "12") // "A1B2C1D2E1" - * ? CHARMIX("AB", "12345") // "A1B2" - * ? CHARMIX("HELLO", " ") // "H E L L O " - * ? CHARMIX("HELLO", "") // "HELLO" + * ? CHARMIX( "ABC", "123" ) // "A1B2C3" + * ? CHARMIX( "ABCDE", "12" ) // "A1B2C1D2E1" + * ? CHARMIX( "AB", "12345" ) // "A1B2" + * ? CHARMIX( "HELLO", " " ) // "H E L L O " + * ? CHARMIX( "HELLO", "" ) // "HELLO" * $TESTS$ - * CHARMIX("ABC", "123") == "A1B2C3" - * CHARMIX("ABCDE", "12") == "A1B2C1D2E1" - * CHARMIX("AB", "12345") == "A1B2" - * CHARMIX("HELLO", " ") == "H E L L O " - * CHARMIX("HELLO", "") == "HELLO" + * CHARMIX( "ABC", "123" ) == "A1B2C3" + * CHARMIX( "ABCDE", "12" ) == "A1B2C1D2E1" + * CHARMIX( "AB", "12345") == "A1B2" + * CHARMIX( "HELLO", " " ) == "H E L L O " + * CHARMIX( "HELLO", "" ) == "HELLO" * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/charone.txt b/harbour/contrib/hbct/doc/en/charone.txt index 38325ec650..1505ecd8c2 100644 --- a/harbour/contrib/hbct/doc/en/charone.txt +++ b/harbour/contrib/hbct/doc/en/charone.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Reduce multiple occurences of a character to one * $SYNTAX$ - * CHARONE ([,] ) -> cReducedString + * CHARONE( [,] ) -> cReducedString * $ARGUMENTS$ * [] specifies the characters the multiple * occurences of which should be reduced to one @@ -24,15 +24,15 @@ * occurences must occur directly one behind the other. This behaviour is * is in contrast to the CHARLIST() function. * $EXAMPLES$ - * ? CHARONE("122333a123") // "123a123" - * ? CHARONE("A B CCCD") // "A B CD" - * ? CHARONE(" ", "A B A B") // "A B A B" - * ? CHARONE("o", "122oooB12o") // "122oB12o" + * ? CHARONE( "122333a123" ) // "123a123" + * ? CHARONE( "A B CCCD" ) // "A B CD" + * ? CHARONE( " ", "A B A B" ) // "A B A B" + * ? CHARONE( "o", "122oooB12o" ) // "122oB12o" * $TESTS$ - * CHARONE("122333a123") == "123a123" - * CHARONE("A B CCCD") == "A B CD" - * CHARONE(" ", "A B A B") == "A B A B" - * CHARONE("o", "122oooB12o") == "122oB12o" + * CHARONE( "122333a123" ) == "123a123" + * CHARONE( "A B CCCD" ) == "A B CD" + * CHARONE( " ", "A B A B" ) == "A B A B" + * CHARONE( "o", "122oooB12o" ) == "122oB12o" * $STATUS$ * Ready * $COMPLIANCE$ @@ -54,7 +54,7 @@ * $ONELINER$ * Reduce multiple occurences of a double character to one * $SYNTAX$ - * WORDONE ([,] ) -> cReducedString + * WORDONE( [,] ) -> cReducedString * $ARGUMENTS$ * [] specifies the double characters the multiple * occurences of which should be reduced to one @@ -67,13 +67,13 @@ * to a single one. It is important to note that the multiple * occurences must occur directly one behind the other. * $EXAMPLES$ - * ? WORDONE("12ABAB12") // "12AB12" - * ? WORDONE("1AAAA2") // "1AAAA2" - * ? WORDONE("12", "1212ABAB") // "12ABAB" + * ? WORDONE( "12ABAB12" ) // "12AB12" + * ? WORDONE( "1AAAA2" ) // "1AAAA2" + * ? WORDONE( "12", "1212ABAB" ) // "12ABAB" * $TESTS$ - * WORDONE("12ABAB12") == "12AB12" - * WORDONE("1AAAA2") == "1AAAA2" - * WORDONE("12", "1212ABAB") == "12ABAB" + * WORDONE( "12ABAB12" ) == "12AB12" + * WORDONE( "1AAAA2" ) == "1AAAA2" + * WORDONE( "12", "1212ABAB" ) == "12ABAB" * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/charonly.txt b/harbour/contrib/hbct/doc/en/charonly.txt index 48adeae624..565a708e20 100644 --- a/harbour/contrib/hbct/doc/en/charonly.txt +++ b/harbour/contrib/hbct/doc/en/charonly.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Intersectional set of two strings based on characters * $SYNTAX$ - * CHARONLY (, ) -> cReducedString + * CHARONLY( , ) -> cReducedString * $ARGUMENTS$ * specifies the characters that must not be * deleted in . @@ -23,11 +23,11 @@ * strings. To do this, it deletes all characters from that * do not appear in . * $EXAMPLES$ - * ? CHARONLY("0123456789", "0211 - 38 99 77") // "0211389977" - * ? CHARONLY("0123456789", "0211/ 389 977") // "0211389977" + * ? CHARONLY( "0123456789", "0211 - 38 99 77" ) // "0211389977" + * ? CHARONLY( "0123456789", "0211/ 389 977" ) // "0211389977" * $TESTS$ - * CHARONLY("0123456789", "0211 - 38 99 77") == "0211389977" - * CHARONLY("0123456789", "0211/ 389 977") == "0211389977" + * CHARONLY( "0123456789", "0211 - 38 99 77" ) == "0211389977" + * CHARONLY( "0123456789", "0211/ 389 977" ) == "0211389977" * $STATUS$ * Ready * $COMPLIANCE$ @@ -49,7 +49,7 @@ * $ONELINER$ * Intersectional set of two strings based on double characters * $SYNTAX$ - * WORDONLY (, ) -> cReducedString + * WORDONLY( , ) -> cReducedString * $ARGUMENTS$ * specifies the double characters that must * not be deleted in . @@ -62,11 +62,11 @@ * strings based on double characters. To do this, it deletes all double * characters from that do not appear in . * $EXAMPLES$ - * ? WORDONLY("AABBCCDD", "XXAAYYBBZZ") // "AABB" - * ? WORDONLY("AABBCCDD", "XAAYYYBBZZ") // "BB" + * ? WORDONLY( "AABBCCDD", "XXAAYYBBZZ" ) // "AABB" + * ? WORDONLY( "AABBCCDD", "XAAYYYBBZZ" ) // "BB" * $TESTS$ - * WORDONLY("AABBCCDD", "XXAAYYBBZZ") == "AABB" - * WORDONLY("AABBCCDD", "XAAYYYBBZZ") == "BB" + * WORDONLY( "AABBCCDD", "XXAAYYBBZZ" ) == "AABB" + * WORDONLY( "AABBCCDD", "XAAYYYBBZZ" ) == "BB" * $STATUS$ * Ready * $COMPLIANCE$ @@ -88,7 +88,7 @@ * $ONELINER$ * Removes characters from a string * $SYNTAX$ - * CHARREM (, ) -> cReducedString + * CHARREM( , ) -> cReducedString * $ARGUMENTS$ * specifies the characters that should * be deleted in @@ -100,11 +100,11 @@ * The CHARREM() function deletes the characters specified in * from . * $EXAMPLES$ - * ? CHARREM(" ", " 1 2 ") // "12" - * ? CHARREM("3y", "xyz123") // "xz12" + * ? CHARREM( " ", " 1 2 " ) // "12" + * ? CHARREM( "3y", "xyz123" ) // "xz12" * $TESTS$ - * CHARREM(" ", " 1 2 ") == "12" - * CHARREM("3y", "xyz123") == "xz12" + * CHARREM( " ", " 1 2 " ) == "12" + * CHARREM( "3y", "xyz123" ) == "xz12" * $STATUS$ * Ready * $COMPLIANCE$ @@ -126,7 +126,7 @@ * $ONELINER$ * Removes characters from a string * $SYNTAX$ - * WORDREM (, ) -> cReducedString + * WORDREM( , ) -> cReducedString * $ARGUMENTS$ * specifies the double characters that * should be deleted in @@ -139,11 +139,11 @@ * The WORDREM() function deletes the double characters specified in * from . * $EXAMPLES$ - * ? WORDREM("abcd", "0ab1cd") // "0ab1" - * ? WORDREM("abcd", "ab0cd1") // "0cd1" + * ? WORDREM( "abcd", "0ab1cd" ) // "0ab1" + * ? WORDREM( "abcd", "ab0cd1" ) // "0cd1" * $TESTS$ - * WORDREM("abcd", "0ab1cd") == "0ab1" - * WORDREM("abcd", "ab0cd1") == "0cd1" + * WORDREM( "abcd", "0ab1cd" ) == "0ab1" + * WORDREM( "abcd", "ab0cd1" ) == "0cd1" * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/charop.txt b/harbour/contrib/hbct/doc/en/charop.txt index 5f73619f3e..fdb8d663c3 100644 --- a/harbour/contrib/hbct/doc/en/charop.txt +++ b/harbour/contrib/hbct/doc/en/charop.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Adds corresponding ASCII value of two strings * $SYNTAX$ - * CHARADD (<[@]cString1>, ) --> cAddString + * CHARADD( <[@]cString1>, ) --> cAddString * $ARGUMENTS$ * <[@]cString1> first string * second string @@ -28,14 +28,14 @@ * has been processed, the function restarts with the first * character of . * $EXAMPLES$ - * ? charadd ("012345678", chr(1)) --> "123456789" - * ? charadd ("123456789", chr(255)) --> "012345678" - * ? charadd ("0000", chr(0)+chr(1)+chr(2)+chr(3)) --> "0123" + * ? charadd( "012345678", chr( 1 ) ) // --> "123456789" + * ? charadd( "123456789", chr( 255 ) ) // --> "012345678" + * ? charadd( "0000", chr( 0 ) + chr( 1 ) + chr( 2 ) + chr( 3 ) ) // --> "0123" * $TESTS$ - * charadd ("012345678", chr(1)) == "123456789" - * charadd ("012345678", chr(1)+chr(2)) == "133557799" - * charadd ("123456789", chr(255)) == "012345678" - * charadd ("123456789", chr(255)+chr(254)) == "002244668" + * charadd( "012345678", chr( 1 ) ) == "123456789" + * charadd( "012345678", chr( 1 ) + chr( 2 ) ) == "133557799" + * charadd( "123456789", chr( 255 ) ) == "012345678" + * charadd( "123456789", chr( 255 ) + chr( 254 ) ) == "002244668" * $STATUS$ * Ready * $COMPLIANCE$ @@ -60,7 +60,7 @@ * $ONELINER$ * Combine corresponding ASCII value of two strings with bitwise AND * $SYNTAX$ - * CHARAND (<[@]cString1>, ) --> cAndString + * CHARAND( <[@]cString1>, ) --> cAndString * $ARGUMENTS$ * <[@]cString1> first string * second string @@ -80,11 +80,11 @@ * character of . * $EXAMPLES$ * // clear the LSB - * ? charand ("012345678", chr(254)) --> "002244668" - * ? charand ("012345678", chr(254)+chr(252)) --> "002044648" + * ? charand( "012345678", chr( 254 ) ) // --> "002244668" + * ? charand( "012345678", chr( 254 ) + chr( 252 ) ) // --> "002044648" * $TESTS$ - * charand ("012345678", chr(254)) == "002244668" - * charand ("012345678", chr(254)+chr(252)) == "002044648" + * charand( "012345678", chr( 254 ) ) == "002244668" + * charand( "012345678", chr( 254 ) + chr( 252 ) ) == "002044648" * $STATUS$ * Ready * $COMPLIANCE$ @@ -109,7 +109,7 @@ * $ONELINER$ * Process each character in a string with bitwise NOT operation * $SYNTAX$ - * CHARNOT (<[@]cString>) --> cNotString + * CHARNOT( <[@]cString> ) --> cNotString * $ARGUMENTS$ * <[@]cString> string to be processed * $RETURNS$ @@ -125,11 +125,11 @@ * stored in , too. By setting the CSETREF()-switch to .T., * the return value can be omitted. * $EXAMPLES$ - * ? charnot (chr(85)+chr(128)+chr(170)+chr(1)) --> chr(170)+chr(127)+chr(85)+chr(254) - * ? charnot (charnot ("This is a test!")) --> "This is a test!" + * ? charnot( chr( 85 ) + chr( 128 ) + chr( 170 ) + chr( 1 ) ) // --> chr( 170 ) + chr( 127 ) + chr( 85 ) + chr( 254 ) + * ? charnot( charnot( "This is a test!" ) ) --> "This is a test!" * $TESTS$ - * charnot (chr(85)+chr(128)+chr(170)+chr(1)) == chr(170)+chr(127)+chr(85)+chr(254) - * charnot (charnot ("This is a test!")) == "This is a test!" + * charnot( chr( 85 ) + chr( 128 ) + chr( 170 ) + chr( 1 ) ) == chr( 170 ) + chr( 127 ) + chr( 85 ) + chr( 254 ) + * charnot( charnot( "This is a test!" ) ) == "This is a test!" * $STATUS$ * Ready * $COMPLIANCE$ @@ -154,7 +154,7 @@ * $ONELINER$ * Combine corresponding ASCII value of two strings with bitwise OR * $SYNTAX$ - * CHAROR (<[@]cString1>, ) --> cOrString + * CHAROR( <[@]cString1>, ) --> cOrString * $ARGUMENTS$ * <[@]cString1> first string * second string @@ -174,11 +174,11 @@ * character of . * $EXAMPLES$ * // set the LSB - * ? charor ("012345678", chr(1)) --> "113355779" - * ? charor ("012345678", chr(1)+chr(3)) --> "133357779" + * ? charor( "012345678", chr( 1 ) ) // --> "113355779" + * ? charor( "012345678", chr( 1 ) + chr( 3 ) ) // --> "133357779" * $TESTS$ - * charor ("012345678", chr(1)) == "113355779" - * charor ("012345678", chr(1)+chr(3)) == "133357779" + * charor( "012345678", chr( 1 ) ) == "113355779" + * charor( "012345678", chr( 1 ) + chr( 3 ) ) == "133357779" * $STATUS$ * Ready * $COMPLIANCE$ @@ -203,7 +203,7 @@ * $ONELINER$ * Combine corresponding ASCII value of two strings with bitwise XOR * $SYNTAX$ - * CHARXOR (<[@]cString1>, ) --> cXOrString + * CHARXOR( <[@]cString1>, ) --> cXOrString * $ARGUMENTS$ * <[@]cString1> first string * second string @@ -223,9 +223,9 @@ * character of . * $EXAMPLES$ * // easy encryption - * ? charxor ("This is top secret !", "My Password") --> + * ? charxor( "This is top secret !", "My Password" ) // --> * $TESTS$ - * charxor (charxor ("This is top secret !", "My Password"), "My Password") == "This is top secret !" + * charxor( charxor( "This is top secret !", "My Password" ), "My Password" ) == "This is top secret !" * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/charophb.txt b/harbour/contrib/hbct/doc/en/charophb.txt index 64cfaaf423..94b3431f0c 100644 --- a/harbour/contrib/hbct/doc/en/charophb.txt +++ b/harbour/contrib/hbct/doc/en/charophb.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Subtracts corresponding ASCII value of two strings * $SYNTAX$ - * CHARSUB (<[@]cString1>, ) --> cSubString + * CHARSUB( <[@]cString1>, ) --> cSubString * $ARGUMENTS$ * <[@]cString1> first string * second string @@ -28,14 +28,14 @@ * has been processed, the function restarts with the first * character of . * $EXAMPLES$ - * ? charsub ("012345678", chr(1)) --> "/01234567" - * ? charsub ("123456789", chr(255)) --> "23456789:" - * ? charsub ("9999", chr(0)+chr(1)+chr(2)+chr(3)) --> "9876" + * ? charsub( "012345678", Chr( 1 ) ) // --> "/01234567" + * ? charsub( "123456789", Chr( 255 ) ) // --> "23456789:" + * ? charsub( "9999", Chr( 0 ) + Chr( 1 ) + Chr( 2 ) + Chr( 3 ) ) // --> "9876" * $TESTS$ - * charsub ("123456789", chr(1)) == "012345678" - * charsub ("123456789", chr(1)+chr(2)) == "002244668" - * charsub ("012345678", chr(255)) == "123456789" - * charsub ("012345678", chr(255)+chr(254)) == "133557799" + * charsub( "123456789", Chr( 1 ) ) == "012345678" + * charsub( "123456789", Chr( 1 ) + Chr( 2 ) ) == "002244668" + * charsub( "012345678", Chr( 255 ) ) == "123456789" + * charsub( "012345678", Chr( 255 ) + Chr( 254 ) ) == "133557799" * $STATUS$ * Ready * $COMPLIANCE$ @@ -60,7 +60,7 @@ * $ONELINER$ * Process each character in a string with bitwise SHIFT LEFT operation * $SYNTAX$ - * CHARSHL (<[@]cString>, ) --> cSHLString + * CHARSHL( <[@]cString>, ) --> cSHLString * $ARGUMENTS$ * <[@]cString> string to be processed * number of bit positions to be shifted to the left @@ -78,10 +78,10 @@ * stored in , too. By setting the CSETREF()-switch to .T., * the return value can be omitted. * $EXAMPLES$ - * ? charshl (chr(1)+chr(2)+chr(4)+chr(8)+chr(16)+chr(32)+chr(64)+chr(128), 3) - * --> chr(8)+chr(16)+chr(32)+chr(64)+chr(128)+chr(0)+chr(0)+chr(0) + * ? charshl( Chr(1)+Chr(2)+Chr(4)+Chr(8)+Chr(16)+Chr(32)+Chr(64)+Chr(128), 3 ) + * // --> Chr(8)+Chr(16)+Chr(32)+Chr(64)+Chr(128)+Chr(0)+Chr(0)+Chr(0) * $TESTS$ - * charshl (chr(1)+chr(2)+chr(4)+chr(8)+chr(16)+chr(32)+chr(64)+chr(128), 3) == chr(8)+chr(16)+chr(32)+chr(64)+chr(128)+chr(0)+chr(0)+chr(0) + * charshl( Chr(1)+Chr(2)+Chr(4)+Chr(8)+Chr(16)+Chr(32)+Chr(64)+Chr(128), 3 ) == Chr(8)+Chr(16)+Chr(32)+Chr(64)+Chr(128)+Chr(0)+Chr(0)+Chr(0) * $STATUS$ * Ready * $COMPLIANCE$ @@ -106,7 +106,7 @@ * $ONELINER$ * Process each character in a string with bitwise SHIFT RIGHT operation * $SYNTAX$ - * CHARSHR (<[@]cString>, ) --> cSHRString + * CHARSHR( <[@]cString>, ) --> cSHRString * $ARGUMENTS$ * <[@]cString> string to be processed * number of bit positions to be shifted to the right @@ -124,10 +124,10 @@ * stored in , too. By setting the CSETREF()-switch to .T., * the return value can be omitted. * $EXAMPLES$ - * ? charshr (chr(1)+chr(2)+chr(4)+chr(8)+chr(16)+chr(32)+chr(64)+chr(128), 3) - * --> chr(0)+chr(0)+chr(0)+chr(1)+chr(2)+chr(4)+chr(8)+chr(16) + * ? charshr( Chr(1)+Chr(2)+Chr(4)+Chr(8)+Chr(16)+Chr(32)+Chr(64)+Chr(128), 3 ) + * // --> Chr(0)+Chr(0)+Chr(0)+Chr(1)+Chr(2)+Chr(4)+Chr(8)+Chr(16) * $TESTS$ - * charshr (chr(1)+chr(2)+chr(4)+chr(8)+chr(16)+chr(32)+chr(64)+chr(128), 3) == chr(0)+chr(0)+chr(0)+chr(1)+chr(2)+chr(4)+chr(8)+chr(16) + * charshr( Chr(1)+Chr(2)+Chr(4)+Chr(8)+Chr(16)+Chr(32)+Chr(64)+Chr(128), 3 ) == Chr(0)+Chr(0)+Chr(0)+Chr(1)+Chr(2)+Chr(4)+Chr(8)+Chr(16) * $STATUS$ * Ready * $COMPLIANCE$ @@ -152,7 +152,7 @@ * $ONELINER$ * Process each character in a string with bitwise ROLL LEFT operation * $SYNTAX$ - * CHARRLL (<[@]cString>, ) --> cRLLString + * CHARRLL( <[@]cString>, ) --> cRLLString * $ARGUMENTS$ * <[@]cString> string to be processed * number of bit positions to be rolled to the left @@ -170,10 +170,10 @@ * stored in , too. By setting the CSETREF()-switch to .T., * the return value can be omitted. * $EXAMPLES$ - * ? charrll (chr(1)+chr(2)+chr(4)+chr(8)+chr(16)+chr(32)+chr(64)+chr(128), 3) - * --> chr(8)+chr(16)+chr(32)+chr(64)+chr(128)+chr(1)+chr(2)+chr(4) + * ? charrll( Chr(1)+Chr(2)+Chr(4)+Chr(8)+Chr(16)+Chr(32)+Chr(64)+Chr(128), 3 ) + * // --> Chr(8)+Chr(16)+Chr(32)+Chr(64)+Chr(128)+Chr(1)+Chr(2)+Chr(4) * $TESTS$ - * charrll (chr(1)+chr(2)+chr(4)+chr(8)+chr(16)+chr(32)+chr(64)+chr(128), 3) == chr(8)+chr(16)+chr(32)+chr(64)+chr(128)+chr(1)+chr(2)+chr(4) + * charrll( Chr(1)+Chr(2)+Chr(4)+Chr(8)+Chr(16)+Chr(32)+Chr(64)+Chr(128), 3 ) == Chr(8)+Chr(16)+Chr(32)+Chr(64)+Chr(128)+Chr(1)+Chr(2)+Chr(4) * $STATUS$ * Ready * $COMPLIANCE$ @@ -198,7 +198,7 @@ * $ONELINER$ * Process each character in a string with bitwise ROLL RIGHT operation * $SYNTAX$ - * CHARRLR (<[@]cString>, ) --> cRLRString + * CHARRLR( <[@]cString>, ) --> cRLRString * $ARGUMENTS$ * <[@]cString> string to be processed * number of bit positions to be rolled to the right @@ -216,10 +216,10 @@ * stored in , too. By setting the CSETREF()-switch to .T., * the return value can be omitted. * $EXAMPLES$ - * ? charrlr (chr(1)+chr(2)+chr(4)+chr(8)+chr(16)+chr(32)+chr(64)+chr(128), 3) - * --> chr(32)+chr(64)+chr(128)+chr(1)+chr(2)+chr(4)+chr(8)+chr(16) + * ? charrlr( Chr(1)+Chr(2)+Chr(4)+Chr(8)+Chr(16)+Chr(32)+Chr(64)+Chr(128), 3 ) + * // --> Chr(32)+Chr(64)+Chr(128)+Chr(1)+Chr(2)+Chr(4)+Chr(8)+Chr(16) * $TESTS$ - * charrlr (chr(1)+chr(2)+chr(4)+chr(8)+chr(16)+chr(32)+chr(64)+chr(128), 3) == chr(32)+chr(64)+chr(128)+chr(1)+chr(2)+chr(4)+chr(8)+chr(16) + * charrlr( Chr(1)+Chr(2)+Chr(4)+Chr(8)+Chr(16)+Chr(32)+Chr(64)+Chr(128), 3 ) == Chr(32)+Chr(64)+Chr(128)+Chr(1)+Chr(2)+Chr(4)+Chr(8)+Chr(16) * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/charrepl.txt b/harbour/contrib/hbct/doc/en/charrepl.txt index 93fd5df026..f3be5f560f 100644 --- a/harbour/contrib/hbct/doc/en/charrepl.txt +++ b/harbour/contrib/hbct/doc/en/charrepl.txt @@ -10,8 +10,8 @@ * $ONELINER$ * Replacement of characters * $SYNTAX$ - * CHARREPL (, <[@]cString>, - * , []) -> cString + * CHARREPL( , <[@]cString>, + * , [] ) -> cString * $ARGUMENTS$ * is a string of characters that should be replaced * <[@]cString> is the processed string @@ -41,17 +41,17 @@ * One can omit the return value by setting the CSETREF() switch to .T., * but then one must pass by reference to get the result. * $EXAMPLES$ - * ? charrepl ("1234", "1x2y3z", "abcd") // "axbycz" - * ? charrepl ("abcdefghij", "jhfdb", "1234567890") // "08642" - * ? charrepl ("abcdefghij", "jhfdb", "12345") // "55542" - * ? charrepl ("1234", "1234", "234A") // "AAAA" - * ? charrepl ("1234", "1234", "234A", .T.) // "234A" + * ? charrepl( "1234", "1x2y3z", "abcd" ) // "axbycz" + * ? charrepl( "abcdefghij", "jhfdb", "1234567890" ) // "08642" + * ? charrepl( "abcdefghij", "jhfdb", "12345" ) // "55542" + * ? charrepl( "1234", "1234", "234A" ) // "AAAA" + * ? charrepl( "1234", "1234", "234A", .T. ) // "234A" * $TESTS$ - * charrepl ("1234", "1x2y3z", "abcd") == "axbycz" - * charrepl ("abcdefghij", "jhfdb", "1234567890") == "08642" - * charrepl ("abcdefghij", "jhfdb", "12345") == "55542" - * charrepl ("1234", "1234", "234A") == "AAAA" - * charrepl ("1234", "1234", "234A", .T.) == "234A" + * charrepl( "1234", "1x2y3z", "abcd" ) == "axbycz" + * charrepl( "abcdefghij", "jhfdb", "1234567890" ) == "08642" + * charrepl( "abcdefghij", "jhfdb", "12345" ) == "55542" + * charrepl( "1234", "1234", "234A" ) == "AAAA" + * charrepl( "1234", "1234", "234A", .T. ) == "234A" * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/charsort.txt b/harbour/contrib/hbct/doc/en/charsort.txt index fae2b08dfa..b0aefab612 100644 --- a/harbour/contrib/hbct/doc/en/charsort.txt +++ b/harbour/contrib/hbct/doc/en/charsort.txt @@ -10,9 +10,9 @@ * $ONELINER$ * Sort sequences within a string. * $SYNTAX$ - * CHARSORT (<[@]cString>, [], [], + * CHARSORT( <[@]cString>, [], [], * [], [], [], - * []) -> cSortedString + * [] ) -> cSortedString * $ARGUMENTS$ * <[@]cString> is the string that should be processed * [] specifies the length of the elements that @@ -55,21 +55,21 @@ * By setting the CSETREF() switch to .T., one can omit the return value * of the function, but one must then pass by reference. * $EXAMPLES$ - * ? CHARSORT("qwert") // "eqrtw" - * ? CHARSORT("qwert", 2) // "erqwt" - * ? CHARSORT("b1a4a3a2a1", 2, 1) // "a2a1a3a4b1" - * ? CHARSORT("XXXqwert", 1, 1, 3) // "XXXeqrtw" - * ? CHARSORT("b1a4a3a2a1", 2, 1, 0, 1) // "a1b1a2a3a4" - * ? CHARSORT("384172852", 1, 1, 0, 0, 4) // "134872852" - * ? CHARSORT("qwert", .T.) // "wtrqe" + * ? CHARSORT( "qwert" ) // "eqrtw" + * ? CHARSORT( "qwert", 2 ) // "erqwt" + * ? CHARSORT( "b1a4a3a2a1", 2, 1 ) // "a2a1a3a4b1" + * ? CHARSORT( "XXXqwert", 1, 1, 3 ) // "XXXeqrtw" + * ? CHARSORT( "b1a4a3a2a1", 2, 1, 0, 1 ) // "a1b1a2a3a4" + * ? CHARSORT( "384172852", 1, 1, 0, 0, 4 ) // "134872852" + * ? CHARSORT( "qwert", .T. ) // "wtrqe" * $TESTS$ - * CHARSORT("qwert") == "eqrtw" - * CHARSORT("qwert", 2) == "erqwt" - * CHARSORT("b1a4a3a2a1", 2, 1) == "a2a1a3a4b1" - * CHARSORT("XXXqwert", 1, 1, 3) == "XXXeqrtw" - * CHARSORT("b1a4a3a2a1", 2, 1, 0, 1) == "a1b1a2a3a4" - * CHARSORT("384172852", 1, 1, 0, 0, 4) == "134872852" - * CHARSORT("qwert", .T.) == "wtrqe" + * CHARSORT( "qwert" ) == "eqrtw" + * CHARSORT( "qwert", 2 ) == "erqwt" + * CHARSORT( "b1a4a3a2a1", 2, 1 ) == "a2a1a3a4b1" + * CHARSORT( "XXXqwert", 1, 1, 3 ) == "XXXeqrtw" + * CHARSORT( "b1a4a3a2a1", 2, 1, 0, 1 ) == "a1b1a2a3a4" + * CHARSORT( "384172852", 1, 1, 0, 0, 4 ) == "134872852" + * CHARSORT( "qwert", .T. ) == "wtrqe" * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/charswap.txt b/harbour/contrib/hbct/doc/en/charswap.txt index fe93ddb155..c3db6e8d14 100644 --- a/harbour/contrib/hbct/doc/en/charswap.txt +++ b/harbour/contrib/hbct/doc/en/charswap.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Swap neighbouring characters in a string * $SYNTAX$ - * CHARSWAP (<[@]cString>) -> cSwappedString + * CHARSWAP( <[@]cString> ) -> cSwappedString * $ARGUMENTS$ * <[@]cString> is the string that should be processed * $RETURNS$ @@ -22,11 +22,11 @@ * By setting the CSETREF() switch to .T., one can omit the return value * of this functin, but one must then pass by reference. * $EXAMPLES$ - * ? CHARSWAP("0123456789") // "1032547698" - * ? CHARSWAP("ABCDEFGHIJK") // "BADCFEHGJIK" + * ? CHARSWAP( "0123456789" ) // "1032547698" + * ? CHARSWAP( "ABCDEFGHIJK" ) // "BADCFEHGJIK" * $TESTS$ - * CHARSWAP("0123456789") == "1032547698" - * CHARSWAP("ABCDEFGHIJK") == "BADCFEHGJIK" + * CHARSWAP( "0123456789" ) == "1032547698" + * CHARSWAP( "ABCDEFGHIJK" ) == "BADCFEHGJIK" * $STATUS$ * Ready * $COMPLIANCE$ @@ -48,7 +48,7 @@ * $ONELINER$ * Swap neighbouring double characters in a string * $SYNTAX$ - * WORDSWAP (<[@]cString> [, ]) -> cSwappedString + * WORDSWAP( <[@]cString> [, ] ) -> cSwappedString * $ARGUMENTS$ * <[@]cString> is the string that should be processed * [] specifies whether an additional swap should be @@ -66,11 +66,11 @@ * By setting the CSETREF() switch to .T., one can omit the return value * of this functin, but one must then pass by reference. * $EXAMPLES$ - * ? WORDSWAP("1234567890") // "3412785690" - * ? WORDSWAP("1234567890", .t.) // "4321876590" + * ? WORDSWAP( "1234567890" ) // "3412785690" + * ? WORDSWAP( "1234567890", .T. ) // "4321876590" * $TESTS$ - * WORDSWAP("1234567890") == "3412785690" - * WORDSWAP("1234567890", .t.) == "4321876590" + * WORDSWAP( "1234567890" ) == "3412785690" + * WORDSWAP( "1234567890", .T. ) == "4321876590" * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/color.txt b/harbour/contrib/hbct/doc/en/color.txt index 32205ef2ae..278caf4260 100644 --- a/harbour/contrib/hbct/doc/en/color.txt +++ b/harbour/contrib/hbct/doc/en/color.txt @@ -42,7 +42,7 @@ * $ONELINER$ * * $SYNTAX$ - * COLORTON ( ) -> + * COLORTON( ) -> * $ARGUMENTS$ * Designates the alphanumeric color attribute that is * converted in NN/NN or CC/CC form. @@ -85,7 +85,7 @@ * $ONELINER$ * * $SYNTAX$ - * NTOCOLOR ( , [] ) -> + * NTOCOLOR( , [] ) -> * $ARGUMENTS$ * Designates the value for the combined numeric color * attributes. @@ -130,7 +130,7 @@ * $ONELINER$ * Select the "ENHANCED" color value for output * $SYNTAX$ - * ENHANCED () -> + * ENHANCED() -> * $ARGUMENTS$ * * $RETURNS$ @@ -162,7 +162,7 @@ * $ONELINER$ * Select the "STANDARD" color value for output * $SYNTAX$ - * STANDARD () -> + * STANDARD() -> * $ARGUMENTS$ * * $RETURNS$ @@ -194,7 +194,7 @@ * $ONELINER$ * Select the "UNSELECTED" color value for output * $SYNTAX$ - * UNSELECTED () -> + * UNSELECTED() -> * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/count.txt b/harbour/contrib/hbct/doc/en/count.txt index b19f21e127..98c93b8409 100644 --- a/harbour/contrib/hbct/doc/en/count.txt +++ b/harbour/contrib/hbct/doc/en/count.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Count a certain character at the beginning of a string * $SYNTAX$ - * COUNTLEFT (, []) -> nCount + * COUNTLEFT( , [] ) -> nCount * $ARGUMENTS$ * * $RETURNS$ @@ -42,7 +42,7 @@ * $ONELINER$ * Count a certain character at the end of a string * $SYNTAX$ - * COUNTRIGHT (, []) -> nCount + * COUNTRIGHT( , [] ) -> nCount * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/ct.txt b/harbour/contrib/hbct/doc/en/ct.txt index 3aacfac39f..01ce6c52f7 100644 --- a/harbour/contrib/hbct/doc/en/ct.txt +++ b/harbour/contrib/hbct/doc/en/ct.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Initializes the CT3 library * $SYNTAX$ - * CTINIT () -> lInitialized + * CTINIT() -> lInitialized * $ARGUMENTS$ * None * $RETURNS$ @@ -46,7 +46,7 @@ * $ONELINER$ * Uninitializes the CT3 library * $SYNTAX$ - * CTEXIT () -> nil + * CTEXIT() -> nil * $ARGUMENTS$ * none * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/ctc.txt b/harbour/contrib/hbct/doc/en/ctc.txt index 29ae8e8144..5211b88bfd 100644 --- a/harbour/contrib/hbct/doc/en/ctc.txt +++ b/harbour/contrib/hbct/doc/en/ctc.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Sets argument error behaviour * $SYNTAX$ - * CSETARGERR ([]) -> + * CSETARGERR( [] ) -> * $ARGUMENTS$ * [] New argument error throwing mode * $RETURNS$ @@ -53,7 +53,7 @@ * $ONELINER$ * Initializes the CT3 library, C part * $SYNTAX$ - * CTCINIT () -> lInitialized + * CTCINIT() -> lInitialized * $ARGUMENTS$ * None * $RETURNS$ @@ -86,7 +86,7 @@ * $ONELINER$ * Uninitializes the CT3 library, C part * $SYNTAX$ - * CTCEXIT () -> nil + * CTCEXIT() -> NIL * $ARGUMENTS$ * none * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/ctmath.txt b/harbour/contrib/hbct/doc/en/ctmath.txt index c118db1cd8..a4b645c056 100644 --- a/harbour/contrib/hbct/doc/en/ctmath.txt +++ b/harbour/contrib/hbct/doc/en/ctmath.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Set precision of math functions * $SYNTAX$ - * SETPREC () -> cEmptyString + * SETPREC( ) -> cEmptyString * $ARGUMENTS$ * digit count between 1 and 16, defaults to 16 * $RETURNS$ @@ -43,7 +43,7 @@ * $ONELINER$ * Get precision of math functions * $SYNTAX$ - * GETPREC () -> nDigits + * GETPREC() -> nDigits * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/ctmath2.txt b/harbour/contrib/hbct/doc/en/ctmath2.txt index d79e0cf168..f101a0c035 100644 --- a/harbour/contrib/hbct/doc/en/ctmath2.txt +++ b/harbour/contrib/hbct/doc/en/ctmath2.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Rounds down a number to the next integer * $SYNTAX$ - * FLOOR (nNumber) -> nDownRoundedNumber + * FLOOR( ) -> nDownRoundedNumber * $ARGUMENTS$ * number to round down * $RETURNS$ @@ -19,11 +19,11 @@ * The function FLOOR() determines the biggest integer that is smaller * than . * $EXAMPLES$ - * ? floor (1.1) --> 1.0 - * ? floor (-1.1) --> -2.0 + * ? floor( 1.1 ) // --> 1.0 + * ? floor( -1.1 ) // --> -2.0 * $TESTS$ - * floor (1.1) == 1.0 - * floor (-1.1) == -2.0 + * floor( 1.1 ) == 1.0 + * floor( -1.1 ) == -2.0 * $STATUS$ * Ready * $COMPLIANCE$ @@ -45,7 +45,7 @@ * $ONELINER$ * Rounds up a number to the next integer * $SYNTAX$ - * CEILING (nNumber) -> nUpRoundedNumber + * CEILING( ) -> nUpRoundedNumber * $ARGUMENTS$ * number to round up * $RETURNS$ @@ -54,11 +54,11 @@ * The function CEILING() determines the smallest integer that is bigger * than . * $EXAMPLES$ - * ? ceiling (1.1) --> 2.0 - * ? ceiling (-1.1) --> -1.0 + * ? ceiling( 1.1 ) // --> 2.0 + * ? ceiling( -1.1 ) // --> -1.0 * $TESTS$ - * ceiling (1.1) == 2.0 - * ceiling (-1.1) == -1.0 + * ceiling( 1.1 ) == 2.0 + * ceiling( -1.1 ) == -1.0 * $STATUS$ * Ready * $COMPLIANCE$ @@ -80,7 +80,7 @@ * $ONELINER$ * Sign of a number * $SYNTAX$ - * SIGN (nNumber) -> nSign + * SIGN( ) -> nSign * $ARGUMENTS$ * a number * $RETURNS$ @@ -91,13 +91,13 @@ * If is < 0, then SIGN() returns -1 * If is == 0, then SIGN() returns 0 * $EXAMPLES$ - * ? sign (1.1) --> 1 - * ? sign (-1.1) --> -1 - * ? sign (0.0) --> 0 + * ? sign( 1.1 ) // --> 1 + * ? sign( -1.1 ) // --> -1 + * ? sign( 0.0 ) // --> 0 * $TESTS$ - * sign (1.1) == 1 - * sign (-1.1) == -1 - * sign (0.0) == 0 + * sign( 1.1 ) == 1 + * sign( -1.1 ) == -1 + * sign( 0.0 ) == 0 * $STATUS$ * Ready * $COMPLIANCE$ @@ -119,7 +119,7 @@ * $ONELINER$ * Decadic logarithm of a number * $SYNTAX$ - * LOG10 (nNumber) -> nLogarithm + * LOG10( ) -> nLogarithm * $ARGUMENTS$ * number to logarithm * $RETURNS$ @@ -128,11 +128,11 @@ * The function LOG10() calculates the decadic logarithm of , * i.e. 10^ == . * $EXAMPLES$ - * ? log10 (10.0) --> 1.0 - * ? log10 (sqrt(10.0)) --> 0.5 + * ? log10( 10.0 ) // --> 1.0 + * ? log10( sqrt( 10.0 ) ) // --> 0.5 * $TESTS$ - * log10 (10.0) == 1.0 - * log10 (sqrt(10.0)) == 0.5 + * log10( 10.0 ) == 1.0 + * log10( sqrt( 10.0 ) ) == 0.5 * $STATUS$ * Ready * $COMPLIANCE$ @@ -154,7 +154,7 @@ * $ONELINER$ * Calculates faculty * $SYNTAX$ - * FACT (nNumber) -> nFaculty + * FACT( ) -> nFaculty * $ARGUMENTS$ * number between 0 and 21 * $RETURNS$ @@ -165,13 +165,13 @@ * used in statistics. Note, that faculties above 21 are too big * so that the function must return a -1. * $EXAMPLES$ - * ? fact (0) --> 1 - * ? fact (1) --> 1 - * ? fact (4) --> 24 + * ? fact( 0 ) // --> 1 + * ? fact( 1 ) // --> 1 + * ? fact( 4 ) // --> 24 * $TESTS$ - * fact (0) == 1 - * fact (1) == 1 - * fact (4) == 24 + * fact( 0 ) == 1 + * fact( 1 ) == 1 + * fact( 4 ) == 24 * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/ctpad.txt b/harbour/contrib/hbct/doc/en/ctpad.txt index 9d34472fd7..deae287d78 100644 --- a/harbour/contrib/hbct/doc/en/ctpad.txt +++ b/harbour/contrib/hbct/doc/en/ctpad.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Fills string to a certain length on the left * $SYNTAX$ - * PADLEFT (,, []) -> cString + * PADLEFT( , , [] ) -> cString * $ARGUMENTS$ * * $RETURNS$ @@ -42,7 +42,7 @@ * $ONELINER$ * Fills string to a certain length on the right * $SYNTAX$ - * PADRIGHT (,, []) -> cString + * PADRIGHT( , , [] ) -> cString * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/ctstr.txt b/harbour/contrib/hbct/doc/en/ctstr.txt index 380e912853..54d147c71b 100644 --- a/harbour/contrib/hbct/doc/en/ctstr.txt +++ b/harbour/contrib/hbct/doc/en/ctstr.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Determine return value of reference sensitive CT3 string functions * $SYNTAX$ - * CSETREF ([]) -> lOldSwitch + * CSETREF( [] ) -> lOldSwitch * $ARGUMENTS$ * [] .T. -> suppress return value * .F. -> do not suppress return value @@ -72,7 +72,7 @@ * $ONELINER$ * Determine "multi-pass" behaviour in some string functions * $SYNTAX$ - * CSETATMUPA ([]) -> lOldSwitch + * CSETATMUPA( [] ) -> lOldSwitch * $ARGUMENTS$ * [] .T. -> turn "multi-pass" on * .F. -> turn "multi-pass" off diff --git a/harbour/contrib/hbct/doc/en/datetime.txt b/harbour/contrib/hbct/doc/en/datetime.txt index 77d9a53693..f06f17a2dd 100644 --- a/harbour/contrib/hbct/doc/en/datetime.txt +++ b/harbour/contrib/hbct/doc/en/datetime.txt @@ -10,7 +10,7 @@ * $ONELINER$ * _B_egin _O_f _M_onth * $SYNTAX$ - * BOM ([]) -> dDateBeginOfMonth + * BOM( [] ) -> dDateBeginOfMonth * $ARGUMENTS$ * * $RETURNS$ @@ -42,7 +42,7 @@ * $ONELINER$ * _E_nd _O_f _M_onth * $SYNTAX$ - * EOM ([]) -> dDateEndOfMonth + * EOM( [] ) -> dDateEndOfMonth * $ARGUMENTS$ * * $RETURNS$ @@ -74,7 +74,7 @@ * $ONELINER$ * _B_egin _O_f _Q_uarter * $SYNTAX$ - * BOQ ([]) -> dDateBeginOfQuarter + * BOQ( [] ) -> dDateBeginOfQuarter * $ARGUMENTS$ * * $RETURNS$ @@ -106,7 +106,7 @@ * $ONELINER$ * _E_nd _O_f _Q_uarter * $SYNTAX$ - * EOQ ([]) -> dDateEndOfQuarter + * EOQ( [] ) -> dDateEndOfQuarter * $ARGUMENTS$ * * $RETURNS$ @@ -138,7 +138,7 @@ * $ONELINER$ * _B_egin _O_f _Y_ear * $SYNTAX$ - * BOY ([]) -> dDateBeginOfYear + * BOY( [] ) -> dDateBeginOfYear * $ARGUMENTS$ * * $RETURNS$ @@ -170,7 +170,7 @@ * $ONELINER$ * _E_nd _O_f _Y_ear * $SYNTAX$ - * EOY ([]) -> dDateEndOfYear + * EOY( [] ) -> dDateEndOfYear * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/dattime2.txt b/harbour/contrib/hbct/doc/en/dattime2.txt index bd8b1778b4..026e1b2969 100644 --- a/harbour/contrib/hbct/doc/en/dattime2.txt +++ b/harbour/contrib/hbct/doc/en/dattime2.txt @@ -10,7 +10,7 @@ * $ONELINER$ * convert name of day of the week to its ordinal number * $SYNTAX$ - * CTODOW () -> nOrdinal + * CTODOW( ) -> nOrdinal * $ARGUMENTS$ * * $RETURNS$ @@ -42,7 +42,7 @@ * $ONELINER$ * convert name of month to its ordinal number * $SYNTAX$ - * CTOMONTH () -> nOrdinal + * CTOMONTH( ) -> nOrdinal * $ARGUMENTS$ * * $RETURNS$ @@ -74,7 +74,7 @@ * $ONELINER$ * Returns the date as a string in DD Month YY format * $SYNTAX$ - * DMY ([][, ]) -> cDateString + * DMY( [][, ] ) -> cDateString * $ARGUMENTS$ * * $RETURNS$ @@ -108,7 +108,7 @@ * $ONELINER$ * Returns the date as a string in Month DD, YY or Month DD, YYYY * $SYNTAX$ - * MDY ([]) -> cDateString + * MDY( [] ) -> cDateString * $ARGUMENTS$ * * $RETURNS$ @@ -142,7 +142,7 @@ * $ONELINER$ * add months to a date * $SYNTAX$ - * ADDMONTH ([,] ) -> dShiftedDate + * ADDMONTH( [,] ) -> dShiftedDate * $ARGUMENTS$ * * $RETURNS$ @@ -174,7 +174,7 @@ * $ONELINER$ * Determines the day of the year for a specific date * $SYNTAX$ - * DMY ([]) -> nDayOfYear + * DMY( [] ) -> nDayOfYear * $ARGUMENTS$ * * $RETURNS$ @@ -208,7 +208,7 @@ * $ONELINER$ * determines of year of date is a leap year * $SYNTAX$ - * ISLEAP ([]) -> lIsLeap + * ISLEAP( [] ) -> lIsLeap * $ARGUMENTS$ * * $RETURNS$ @@ -240,7 +240,7 @@ * $ONELINER$ * Total number of days from first of Jan to beginning of nMonth. * $SYNTAX$ - * DAYSTOMONTH (, ) -> nDaysToMonth + * DAYSTOMONTH( , ) -> nDaysToMonth * $ARGUMENTS$ * * $RETURNS$ @@ -306,7 +306,7 @@ * $ONELINER$ * Returns a number equal to the quarter in which a date falls * $SYNTAX$ - * QUARTER ([]) -> nQuarter + * QUARTER( [] ) -> nQuarter * $ARGUMENTS$ * * $RETURNS$ @@ -340,7 +340,7 @@ * $ONELINER$ * Returns the the number of days in the month. * $SYNTAX$ - * LASTDAYOM ([]) -> nDaysInMonth + * LASTDAYOM( [] ) -> nDaysInMonth * $ARGUMENTS$ * * $RETURNS$ @@ -375,7 +375,7 @@ * $ONELINER$ * (num of day) -> day name * $SYNTAX$ - * NTOCDOW () -> cDay + * NTOCDOW( ) -> cDay * $ARGUMENTS$ * * $RETURNS$ @@ -407,7 +407,7 @@ * $ONELINER$ * (num of month ) -> Month Name * $SYNTAX$ - * NTOCMONTH () -> cMonth + * NTOCMONTH( ) -> cMonth * $ARGUMENTS$ * * $RETURNS$ @@ -439,14 +439,14 @@ * $ONELINER$ * Returns the calendar week a number * $SYNTAX$ - * WEEK ([][, ]) -> nWeek + * WEEK( [][, ] ) -> nWeek * $ARGUMENTS$ * * $RETURNS$ * * $DESCRIPTION$ * Returns the calendar week a number. If no date is specified, - * the system date is used. An empty date viz ctod(" / / ") + * the system date is used. An empty date via hb_SToD("") * returns 0. * If is .T., week() will calculate the "simple week number", defined by * - week #1 starts on January, 1st diff --git a/harbour/contrib/hbct/doc/en/dattime3.txt b/harbour/contrib/hbct/doc/en/dattime3.txt index e829dc5256..01e04c4b39 100644 --- a/harbour/contrib/hbct/doc/en/dattime3.txt +++ b/harbour/contrib/hbct/doc/en/dattime3.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Pauses a specified time in increments of 1/100 seconds * $SYNTAX$ - * WAITPERIOD([]) --> lNotElapsed + * WAITPERIOD( [] ) --> lNotElapsed * $ARGUMENTS$ * Designates the waiting period at initialization in * 1/100ths of seconds. Values from 1 to 8, 640, 000 (one day) are @@ -35,9 +35,9 @@ * $EXAMPLES$ * Run a loop for 5 seconds: * - * WAITPERIOD(500) // Initialization, 5 seconds + * WAITPERIOD( 500 ) // Initialization, 5 seconds * DO WHILE .AND. .AND. WAITPERIOD() - * *... + * *... * ENDDO * $TESTS$ * @@ -62,7 +62,7 @@ * $ONELINER$ * Determines whether a specIFied time is valid * $SYNTAX$ - * TIMEVALID() --> lValid + * TIMEVALID( ) --> lValid * $ARGUMENTS$ * Designates a character string that contains the time to * test. @@ -89,17 +89,17 @@ * Using the VALID clause with TRIM, all valid times are * accepted, even IF no seconds or minutes are specIFied: * - * cBegin := SPACE(11) + * cBegin := SPACE( 11 ) * @ 5, 10 SAY "Please input time for beginning work:"; - * GET cBegin VALID TIMEVALID(TRIM(cBegin)) + * GET cBegin VALID TIMEVALID( TRIM( cBegin ) ) * READ * * Using a VALID clause without TRIM, hours and minutes must be * specified, so that TIMEVALID() can confirm a valid time: * - * cBegin := SPACE(5) + * cBegin := SPACE( 5 ) * @ 5, 10 SAY "Please input time for beginning work:"; - * GET cBegin VALID TIMEVALID(cBegin) + * GET cBegin VALID TIMEVALID( cBegin ) * READ * $TESTS$ * @@ -124,7 +124,7 @@ * $ONELINER$ * Sets the system clock * $SYNTAX$ - * SETTIME(, []) --> lSet + * SETTIME( , [] ) --> lSet * $ARGUMENTS$ * Designates a character string that contains the time that * is to become the system time. @@ -143,16 +143,16 @@ * Set the system time in each case; but the hardware clock only * on an AT: * - * cNewTime := "10:20:00" + * cNewTime := "10:20:00" * IF ISAT() - * SETTIME(cNewTime, .T.) + * SETTIME( cNewTime, .T. ) * ELSE - * SETTIME(cNewTime) + * SETTIME( cNewTime ) * ENDIF * * Or, more compactly: * - * SETTIME(cNewTime, ISAT()) + * SETTIME( cNewTime, ISAT() ) * $TESTS$ * * $STATUS$ @@ -176,7 +176,7 @@ * $ONELINER$ * Sets the system date * $SYNTAX$ - * SETDATE(, []) --> lSet + * SETDATE( , [] ) --> lSet * $ARGUMENTS$ * Designates which date to use to set the system date. * diff --git a/harbour/contrib/hbct/doc/en/exponent.txt b/harbour/contrib/hbct/doc/en/exponent.txt index 35430cb6da..f718134b82 100644 --- a/harbour/contrib/hbct/doc/en/exponent.txt +++ b/harbour/contrib/hbct/doc/en/exponent.txt @@ -23,7 +23,7 @@ * * The following calculation reproduces the original value: * - * MANTISSA()* 2^EXPONENT() = + * MANTISSA( ) * 2 ^ EXPONENT( ) = * * * TODO: add documentation diff --git a/harbour/contrib/hbct/doc/en/finan.txt b/harbour/contrib/hbct/doc/en/finan.txt index e312e483d7..bf41f3e229 100644 --- a/harbour/contrib/hbct/doc/en/finan.txt +++ b/harbour/contrib/hbct/doc/en/finan.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Future value of a capital * $SYNTAX$ - * FV (nDeposit, nInterest, nPeriods) --> nFutureValue + * FV( nDeposit, nInterest, nPeriods ) --> nFutureValue * $ARGUMENTS$ * amount of money invested per period * rate of interest per period, 1 == 100% @@ -37,10 +37,10 @@ * // Payment of 1000 per year for 10 years at a interest rate * // of 5 per cent per year * - * ? fv (1000, 0.05, 10) --> 12577.893 + * ? fv( 1000, 0.05, 10 ) // --> 12577.893 * $TESTS$ - * fv (1000, 0.00, 10) == 10000.0 - * fv (1000, 0.05, 10) == 12577.893 + * fv( 1000, 0.00, 10 ) == 10000.0 + * fv( 1000, 0.05, 10 ) == 12577.893 * $STATUS$ * Ready * $COMPLIANCE$ @@ -62,7 +62,7 @@ * $ONELINER$ * Present value of a loan * $SYNTAX$ - * PV (nPayment, nInterest, nPeriods) --> nPresentValue + * PV( nPayment, nInterest, nPeriods ) --> nPresentValue * $ARGUMENTS$ * amount of money paid back per period * rate of interest per period, 1 == 100% @@ -88,10 +88,10 @@ * // of 6000 Dollars (the amount you will pay back) the bank will pay * // you * - * ? pv (100, 0.005, 60) --> 5172.56 + * ? pv( 100, 0.005, 60 ) // --> 5172.56 * $TESTS$ - * pv (100, 0.0, 60) == 6000.0 - * pv (100, 0.005, 60) == 5172.56 + * pv( 100, 0.0, 60 ) == 6000.0 + * pv( 100, 0.005, 60 ) == 5172.56 * $STATUS$ * Ready * $COMPLIANCE$ @@ -113,7 +113,7 @@ * $ONELINER$ * Payments for a loan * $SYNTAX$ - * PAYMENT (nLoan, nInterest, nPeriods) --> nPayment + * PAYMENT( nLoan, nInterest, nPeriods ) --> nPayment * $ARGUMENTS$ * amount of money you get from the bank * rate of interest per period, 1 == 100% @@ -137,10 +137,10 @@ * // month (6% per year). * // For 5 years, you have to pay back every month * - * ? payment (5172.56, 0.005, 60) --> 100.00 + * ? payment( 5172.56, 0.005, 60 ) // --> 100.00 * $TESTS$ - * payment (5172.56, 0.0, 60) == 86.21 - * payment (5172.56, 0.005, 60) == 100.00 + * payment( 5172.56, 0.0, 60 ) == 86.21 + * payment( 5172.56, 0.005, 60 ) == 100.00 * $STATUS$ * Ready * $COMPLIANCE$ @@ -162,7 +162,7 @@ * $ONELINER$ * Number of periods for a loan * $SYNTAX$ - * PERIODS (nLoan, nPayment, nInterest) --> nPeriods + * PERIODS( nLoan, nPayment, nInterest ) --> nPeriods * $ARGUMENTS$ * amount of money you get from the bank * amount of money you pay back per period @@ -189,12 +189,12 @@ * // month (6% per year). * // You can afford to pay 100 back every month, so you need * - * ? periods (5172.56, 100, 0.005) --> 60.0 + * ? periods( 5172.56, 100, 0.005 ) // --> 60.0 * * // months to cancel the loan. * $TESTS$ - * periods (5172.56, 100, 0.005) == 60.0 - * periods (5172.56, 100, 0.0) == 51.7256 + * periods( 5172.56, 100, 0.005 ) == 60.0 + * periods( 5172.56, 100, 0.0 ) == 51.7256 * $STATUS$ * Ready * $COMPLIANCE$ @@ -216,7 +216,7 @@ * $ONELINER$ * Estimate rate of interest for a loan * $SYNTAX$ - * RATE (nLoan, nPayment, nPeriods) --> nRate + * RATE( nLoan, nPayment, nPeriods ) --> nRate * $ARGUMENTS$ * amount of money you get from the bank * amount of money you pay back per period @@ -237,11 +237,11 @@ * // 5 years (60 months). The effective interest rate per * // period (=month) is * - * ? rate (5172.56, 100, 60) --> 0.005 + * ? rate( 5172.56, 100, 60 ) // --> 0.005 * * $TESTS$ - * rate (5172.56, 100, 60.0) == 0.005 - * rate (6000.0, 100, 60.0) == 0.0 + * rate( 5172.56, 100, 60.0 ) == 0.005 + * rate( 6000.0, 100, 60.0 ) == 0.0 * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/justify.txt b/harbour/contrib/hbct/doc/en/justify.txt index 819d9b7321..e5c9360489 100644 --- a/harbour/contrib/hbct/doc/en/justify.txt +++ b/harbour/contrib/hbct/doc/en/justify.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Move characters from the beginning to the end of a string * $SYNTAX$ - * JUSTLEFT (<[@]cString>, [|]) -> cJustifiedString + * JUSTLEFT( <[@]cString>, [|] ) -> cJustifiedString * $ARGUMENTS$ * * $RETURNS$ @@ -42,7 +42,7 @@ * $ONELINER$ * Move characters from the end to the beginning of a string * $SYNTAX$ - * JUSTRIGHT (<[@]cString>, [|]) -> cJustifiedString + * JUSTRIGHT( <[@]cString>, [|] ) -> cJustifiedString * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/keyset.txt b/harbour/contrib/hbct/doc/en/keyset.txt index 04da60e907..687ab37c9c 100644 --- a/harbour/contrib/hbct/doc/en/keyset.txt +++ b/harbour/contrib/hbct/doc/en/keyset.txt @@ -10,7 +10,7 @@ * $ONELINER$ * * $SYNTAX$ - * KSETINS ([]) -> lOldSwitch + * KSETINS( [] ) -> lOldSwitch * $ARGUMENTS$ * * $RETURNS$ @@ -42,7 +42,7 @@ * $ONELINER$ * * $SYNTAX$ - * KSETCAPS ([]) -> lOldSwitch + * KSETCAPS( [] ) -> lOldSwitch * $ARGUMENTS$ * * $RETURNS$ @@ -74,7 +74,7 @@ * $ONELINER$ * * $SYNTAX$ - * KSETNUM ([]) -> lOldSwitch + * KSETNUM( [] ) -> lOldSwitch * $ARGUMENTS$ * * $RETURNS$ @@ -106,7 +106,7 @@ * $ONELINER$ * * $SYNTAX$ - * KSETSCROLL ([]) -> lOldSwitch + * KSETSCROLL( [] ) -> lOldSwitch * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/num1.txt b/harbour/contrib/hbct/doc/en/num1.txt index 2cf0cb4dd9..3682f85bb0 100644 --- a/harbour/contrib/hbct/doc/en/num1.txt +++ b/harbour/contrib/hbct/doc/en/num1.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Temperature conversion Fahrenheit to Celsius * $SYNTAX$ - * CELSIUS (nDegreeFahrenheit) --> nDegreeCelsius + * CELSIUS( nDegreeFahrenheit ) --> nDegreeCelsius * $ARGUMENTS$ * temperature in degree Fahrenheit * $RETURNS$ @@ -20,12 +20,12 @@ * to the Celsius scale. * $EXAMPLES$ * // melting point of water in standard conditions - * ? celsius (32.0) --> 0.0 + * ? celsius( 32.0 ) // --> 0.0 * // boiling point of water in standard conditions - * ? celsius (212.0) --> 100.0 + * ? celsius( 212.0 ) // --> 100.0 * $TESTS$ - * celsius (32.0) == 0.0 - * celsius (212.0) == 100.0 + * celsius( 32.0 ) == 0.0 + * celsius( 212.0 ) == 100.0 * $STATUS$ * Ready * $COMPLIANCE$ @@ -47,7 +47,7 @@ * $ONELINER$ * Temperature conversion Celsius to Fahrenheit * $SYNTAX$ - * FAHRENHEIT (nDegreeCelsius) --> nDegreeFahrenheit + * FAHRENHEIT( nDegreeCelsius ) --> nDegreeFahrenheit * $ARGUMENTS$ * temperate in degree Celsius * $RETURNS$ @@ -57,12 +57,12 @@ * to the Fahrenheit scale. * $EXAMPLES$ * // melting point of water in standard conditions - * ? fahrenheit (0.0) --> 32.0 + * ? fahrenheit( 0.0 ) // --> 32.0 * // boiling point of water in standard conditions - * ? fahrenheit (100.0) --> 212.0 + * ? fahrenheit( 100.0 ) // --> 212.0 * $TESTS$ - * fahrenheit (0.0) == 32.0 - * celsius (100.0) == 212.0 + * fahrenheit( 0.0 ) == 32.0 + * celsius( 100.0 ) == 212.0 * $STATUS$ * Ready * $COMPLIANCE$ @@ -84,7 +84,7 @@ * $ONELINER$ * Returns the largest floating point number available in the system * $SYNTAX$ - * INFINITY ([]) --> nLargestNumber + * INFINITY( [] ) --> nLargestNumber * $ARGUMENTS$ * [] .T., if the function should return * the maximum floating point value diff --git a/harbour/contrib/hbct/doc/en/numat.txt b/harbour/contrib/hbct/doc/en/numat.txt index 2e603f1fba..35d2807835 100644 --- a/harbour/contrib/hbct/doc/en/numat.txt +++ b/harbour/contrib/hbct/doc/en/numat.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Number of occurrences of a sequence in a string * $SYNTAX$ - * NUMAT (, , []) --> nCount + * NUMAT( , , [] ) --> nCount * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/numconv.txt b/harbour/contrib/hbct/doc/en/numconv.txt index 92292b398e..da97bb6c86 100644 --- a/harbour/contrib/hbct/doc/en/numconv.txt +++ b/harbour/contrib/hbct/doc/en/numconv.txt @@ -10,7 +10,7 @@ * $ONELINER$ * * $SYNTAX$ - * NTOC ([, ][,][,]) -> + * NTOC( [, ][,][,] ) -> * $ARGUMENTS$ * * $RETURNS$ @@ -42,7 +42,7 @@ * $ONELINER$ * * $SYNTAX$ - * CTON ([, ][,]) -> + * CTON( [, ][,] ) -> * $ARGUMENTS$ * * $RETURNS$ @@ -74,7 +74,7 @@ * $ONELINER$ * * $SYNTAX$ - * BITTOC (, [,]) -> + * BITTOC( , [,] ) -> * $ARGUMENTS$ * * $RETURNS$ @@ -106,7 +106,7 @@ * $ONELINER$ * * $SYNTAX$ - * CTOBIT (, ) -> + * CTOBIT( , ) -> * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/pos1.txt b/harbour/contrib/hbct/doc/en/pos1.txt index 905be46314..ef8cb1bc8b 100644 --- a/harbour/contrib/hbct/doc/en/pos1.txt +++ b/harbour/contrib/hbct/doc/en/pos1.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Left-most position of a letter in a string * $SYNTAX$ - * POSALPHA (, [], []) -> nPosition + * POSALPHA( , [], [] ) -> nPosition * $ARGUMENTS$ * * $RETURNS$ @@ -42,7 +42,7 @@ * $ONELINER$ * Left-most position of a lowercase letter in a string * $SYNTAX$ - * POSLOWER (, [], []) -> nPosition + * POSLOWER( , [], [] ) -> nPosition * $ARGUMENTS$ * * $RETURNS$ @@ -74,8 +74,8 @@ * $ONELINER$ * Left-most position of a character from a set in a string * $SYNTAX$ - * POSRANGE (, , , [], - * []) -> nPosition + * POSRANGE( , , , [], + * [] ) -> nPosition * $ARGUMENTS$ * * $RETURNS$ @@ -107,7 +107,7 @@ * $ONELINER$ * Left-most position of an uppercase letter in a string * $SYNTAX$ - * POSUPPER (, [], []) -> nPosition + * POSUPPER( , [], [] ) -> nPosition * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/pos2.txt b/harbour/contrib/hbct/doc/en/pos2.txt index 81ec783f63..c12a1933ed 100644 --- a/harbour/contrib/hbct/doc/en/pos2.txt +++ b/harbour/contrib/hbct/doc/en/pos2.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Replace character at a certain position within a string * $SYNTAX$ - * POSCHAR (<[@]cString>, , []) -> cString + * POSCHAR( <[@]cString>, , [] ) -> cString * $ARGUMENTS$ * * $RETURNS$ @@ -42,7 +42,7 @@ * $ONELINER$ * Delete characters at a certain position within a string * $SYNTAX$ - * POSDEL (, [], ) -> cString + * POSDEL( , [], ) -> cString * $ARGUMENTS$ * * $RETURNS$ @@ -74,7 +74,7 @@ * $ONELINER$ * Insert characters at a certain position within a string * $SYNTAX$ - * POSINS (, , []) -> cString + * POSINS( , , [] ) -> cString * $ARGUMENTS$ * * $RETURNS$ @@ -106,7 +106,7 @@ * $ONELINER$ * Replace characters at a certain position within a string * $SYNTAX$ - * POSREPL (<[@]cString>, , []) -> cString + * POSREPL( <[@]cString>, , [] ) -> cString * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/posdiff.txt b/harbour/contrib/hbct/doc/en/posdiff.txt index 05c540a582..5eb54fed75 100644 --- a/harbour/contrib/hbct/doc/en/posdiff.txt +++ b/harbour/contrib/hbct/doc/en/posdiff.txt @@ -10,7 +10,7 @@ * $ONELINER$ * The left-most position there two string differ * $SYNTAX$ - * POSDIFF (, , []) -> nPosition + * POSDIFF( , , [] ) -> nPosition * $ARGUMENTS$ * * $RETURNS$ @@ -42,7 +42,7 @@ * $ONELINER$ * The left-most position there two string begin to be equal * $SYNTAX$ - * POSEQUAL (, , [], []) -> nPosition + * POSEQUAL( , , [], [] ) -> nPosition * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/print.txt b/harbour/contrib/hbct/doc/en/print.txt index f94829c832..d6e88254f1 100644 --- a/harbour/contrib/hbct/doc/en/print.txt +++ b/harbour/contrib/hbct/doc/en/print.txt @@ -10,7 +10,7 @@ * $ONELINER$ * * $SYNTAX$ - * PRINTSTAT ([]) -> nState + * PRINTSTAT( [] ) -> nState * $ARGUMENTS$ * * $RETURNS$ @@ -42,7 +42,7 @@ * $ONELINER$ * * $SYNTAX$ - * PRINTREADY ([]) -> lPrinterReady + * PRINTREADY( [] ) -> lPrinterReady * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/range.txt b/harbour/contrib/hbct/doc/en/range.txt index f47e890891..6e8b663a34 100644 --- a/harbour/contrib/hbct/doc/en/range.txt +++ b/harbour/contrib/hbct/doc/en/range.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Remove characters within a certain ASCII range from a string * $SYNTAX$ - * RANGEREM (, , ) -> cString + * RANGEREM( , , ) -> cString * $ARGUMENTS$ * * $RETURNS$ @@ -18,14 +18,14 @@ * $DESCRIPTION$ * TODO: add documentation * $EXAMPLES$ - * ? rangerem ("0","9","year2002.dbf") // "year.dbf", remove all digits - * ? rangerem ("9","0","year2002.dbf") // "22", testing removal from "9" to chr(255) - * // and from chr(0) to "0" - * ? rangerem ("0","9","yearcurr.dbf") // "yearcurr.dbf", test leaving string untouched + * ? rangerem( "0", "9", "year2002.dbf" ) // "year.dbf", remove all digits + * ? rangerem( "9", "0", "year2002.dbf" ) // "22", testing removal from "9" to chr(255) + * // and from chr(0) to "0" + * ? rangerem( "0", "9", "yearcurr.dbf" ) // "yearcurr.dbf", test leaving string untouched * $TESTS$ - * rangerem ("0","9","year2002.dbf") == "year.dbf" - * rangerem ("9","0","year2002.dbf") == "22" - * rangerem ("0","9","yearcurr.dbf") == "yearcurr.dbf" + * rangerem( "0", "9", "year2002.dbf" ) == "year.dbf" + * rangerem( "9", "0", "year2002.dbf" ) == "22" + * rangerem( "0", "9", "yearcurr.dbf" ) == "yearcurr.dbf" * $STATUS$ * Started * $COMPLIANCE$ @@ -47,8 +47,8 @@ * $ONELINER$ * Replace characters within a certain ASCII range from a string * $SYNTAX$ - * RANGEREPL (, , - * <[@]cString>, ) -> cString + * RANGEREPL( , , + * <[@]cString>, ) -> cString * $ARGUMENTS$ * * $RETURNS$ @@ -56,14 +56,14 @@ * $DESCRIPTION$ * TODO: add documentation * $EXAMPLES$ - * ? rangerepl ("0","9","year2002.dbf","?") // "year????.dbf", replace all digits - * ? rangerepl ("9","0","year2002.dbf","?") // "????2??2????", testing replacement from "9" to chr(255) - * // and from chr(0) to "0" - * ? rangerepl ("0","9","yearcurr.dbf","?") // "yearcurr.dbf", test leaving string untouched + * ? rangerepl( "0", "9", "year2002.dbf", "?" ) // "year????.dbf", replace all digits + * ? rangerepl( "9", "0", "year2002.dbf", "?" ) // "????2??2????", testing replacement from "9" to chr(255) + * // and from chr(0) to "0" + * ? rangerepl( "0", "9", "yearcurr.dbf", "?" ) // "yearcurr.dbf", test leaving string untouched * $TESTS$ - * rangerepl ("0","9","year2002.dbf","?") == "year????.dbf" - * rangerepl ("9","0","year2002.dbf","?") == "????2??2????" - * rangerepl ("0","9","yearcurr.dbf","?") == "yearcurr.dbf" + * rangerepl( "0", "9", "year2002.dbf", "?" ) == "year????.dbf" + * rangerepl( "9", "0", "year2002.dbf", "?" ) == "????2??2????" + * rangerepl( "0", "9", "yearcurr.dbf", "?" ) == "yearcurr.dbf" * $STATUS$ * Started * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/relation.txt b/harbour/contrib/hbct/doc/en/relation.txt index d4183ddf18..21c23ee9e1 100644 --- a/harbour/contrib/hbct/doc/en/relation.txt +++ b/harbour/contrib/hbct/doc/en/relation.txt @@ -10,8 +10,8 @@ * $ONELINER$ * Character relation of two strings * $SYNTAX$ - * CHARRELA (, , - * , ) -> nPosition + * CHARRELA( , , + * , ) -> nPosition * $ARGUMENTS$ * * $RETURNS$ @@ -43,9 +43,9 @@ * $ONELINER$ * Relation dependant character replacement * $SYNTAX$ - * CHARRELREP (, , + * CHARRELREP( , , * , <[@]cString2>, - * ) -> cString + * ) -> cString * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/remove.txt b/harbour/contrib/hbct/doc/en/remove.txt index d97fde8056..5479ed6277 100644 --- a/harbour/contrib/hbct/doc/en/remove.txt +++ b/harbour/contrib/hbct/doc/en/remove.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Remove certain characters at the left and right of a string * $SYNTAX$ - * REMALL (, []) -> cString + * REMALL( , [] ) -> cString * $ARGUMENTS$ * * $RETURNS$ @@ -42,7 +42,7 @@ * $ONELINER$ * Remove certain characters at the left of a string * $SYNTAX$ - * REMLEFT (, []) -> cString + * REMLEFT( , [] ) -> cString * $ARGUMENTS$ * * $RETURNS$ @@ -74,7 +74,7 @@ * $ONELINER$ * Remove certain characters at the right of a string * $SYNTAX$ - * REMRIGHT (, []) -> cString + * REMRIGHT( , [] ) -> cString * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/replace.txt b/harbour/contrib/hbct/doc/en/replace.txt index 8a57d90f49..4b6746d66b 100644 --- a/harbour/contrib/hbct/doc/en/replace.txt +++ b/harbour/contrib/hbct/doc/en/replace.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Replace certain characters at the left and right of a string * $SYNTAX$ - * REPLALL (, , []) -> cString + * REPLALL( , , [] ) -> cString * $ARGUMENTS$ * * $RETURNS$ @@ -42,7 +42,7 @@ * $ONELINER$ * Replace certain characters at the left of a string * $SYNTAX$ - * REPLLEFT (, , []) -> cString + * REPLLEFT( , , [] ) -> cString * $ARGUMENTS$ * * $RETURNS$ @@ -74,7 +74,7 @@ * $ONELINER$ * Replace certain characters at the right of a string * $SYNTAX$ - * REPLRIGHT (, , []) -> cString + * REPLRIGHT( , , [] ) -> cString * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/screen1.txt b/harbour/contrib/hbct/doc/en/screen1.txt index 62b9486acb..9629188632 100644 --- a/harbour/contrib/hbct/doc/en/screen1.txt +++ b/harbour/contrib/hbct/doc/en/screen1.txt @@ -10,7 +10,7 @@ * $ONELINER$ * * $SYNTAX$ - * SCREENATTR ( [],[] ) -> + * SCREENATTR( [],[] ) -> * $ARGUMENTS$ * Designates the line from which to determine the attribute. * The default is the cursor line. @@ -52,7 +52,7 @@ * $ONELINER$ * * $SYNTAX$ - * SCREENMIX (, , [], []) -> + * SCREENMIX( , , [], [] ) -> * $ARGUMENTS$ * * $RETURNS$ @@ -151,10 +151,10 @@ * $ONELINER$ * * $SYNTAX$ - * UNTEXTWIN(, , , , - * , - * [], - * []) --> cNull + * UNTEXTWIN( , , , , + * , + * [], + * [] ) --> cNull * $ARGUMENTS$ * Designates the line for the upper-left corner of the * area. @@ -204,8 +204,8 @@ * $ONELINER$ * * $SYNTAX$ - * CHARWIN (, , , , [], - * []) --> + * CHARWIN( , , , , [], + * [] ) --> * $ARGUMENTS$ * - top row number, default 0 * - left column number, default 0 @@ -247,8 +247,8 @@ * $ONELINER$ * * $SYNTAX$ - * COLORWIN([], [], [], [], - * [], []) --> cNull + * COLORWIN( [], [], [], [], + * [], [] ) --> cNull * $ARGUMENTS$ * Designates the topmost line to begin processing. The * default is the cursor line. @@ -292,7 +292,7 @@ * $ONELINER$ * * $SYNTAX$ - * SCREENTEXT(, , , ) + * SCREENTEXT( , , , ) * $ARGUMENTS$ * - top row number, default 0 * - left column number, default 0 @@ -328,7 +328,7 @@ * $ONELINER$ * * $SYNTAX$ - * COLORREPL([], []) --> cNull + * COLORREPL( [], [] ) --> cNull * $ARGUMENTS$ * Designates the new attribute. The default is * CLEARA. diff --git a/harbour/contrib/hbct/doc/en/strdiff.txt b/harbour/contrib/hbct/doc/en/strdiff.txt index 5475603c98..b5f425ffa7 100644 --- a/harbour/contrib/hbct/doc/en/strdiff.txt +++ b/harbour/contrib/hbct/doc/en/strdiff.txt @@ -10,8 +10,8 @@ * $ONELINER$ * Evaluate the "Edit (Levensthein) Distance" of two strings * $SYNTAX$ - * STRDIFF (, , [], [], - * []) -> + * STRDIFF( , , [], [], + * [] ) -> * $ARGUMENTS$ * string at the "starting point" of the transformation process, default is "" * string at the "end point" of the transformation process, default is "" @@ -44,19 +44,19 @@ * is considered equal to ALL characters. * * $EXAMPLES$ - * ? strdiff("ABC", "ADC") // 3, one character replaced - * ? strdiff("ABC", "AEC") // 3, dito - * ? strdiff("CBA", "ABC") // 6, two characters replaced - * ? strdiff("ABC", "AXBC") // 1, one character inserted - * ? strdiff("AXBC", "ABC") // 6, one character removed - * ? strdiff("AXBC", "ADC") // 9, one character removed and one replaced + * ? strdiff( "ABC", "ADC" ) // 3, one character replaced + * ? strdiff( "ABC", "AEC" ) // 3, dito + * ? strdiff( "CBA", "ABC" ) // 6, two characters replaced + * ? strdiff( "ABC", "AXBC" ) // 1, one character inserted + * ? strdiff( "AXBC", "ABC" ) // 6, one character removed + * ? strdiff( "AXBC", "ADC" ) // 9, one character removed and one replaced * $TESTS$ - * strdiff("ABC", "ADC") == 3 - * strdiff("ABC", "AEC") == 3 - * strdiff("CBA", "ABC") == 6 - * strdiff("ABC", "AXBC") == 1 - * strdiff("AXBC", "ABC") == 6 - * strdiff("AXBC", "ADC") == 9 + * strdiff( "ABC", "ADC" ) == 3 + * strdiff( "ABC", "AEC" ) == 3 + * strdiff( "CBA", "ABC" ) == 6 + * strdiff( "ABC", "AXBC" ) == 1 + * strdiff( "AXBC", "ABC" ) == 6 + * strdiff( "AXBC", "ADC" ) == 9 * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/strswap.txt b/harbour/contrib/hbct/doc/en/strswap.txt index 7d21d37989..88f660eef4 100644 --- a/harbour/contrib/hbct/doc/en/strswap.txt +++ b/harbour/contrib/hbct/doc/en/strswap.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Swap the contents of two strings * $SYNTAX$ - * STRSWAP (<[@]cString1>, <[@]cString2>) -> cString + * STRSWAP( <[@]cString1>, <[@]cString2> ) -> cString * $ARGUMENTS$ * * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/tab.txt b/harbour/contrib/hbct/doc/en/tab.txt index 3559db7178..c87a41062a 100644 --- a/harbour/contrib/hbct/doc/en/tab.txt +++ b/harbour/contrib/hbct/doc/en/tab.txt @@ -62,9 +62,9 @@ * $ONELINER$ * Pack fill characters to appropriate tab characters * $SYNTAX$ - * TABPACK (, [], [], + * TABPACK( , [], [], * [], [], - * []) -> cPackedString + * [] ) -> cPackedString * $ARGUMENTS$ * * diff --git a/harbour/contrib/hbct/doc/en/token1.txt b/harbour/contrib/hbct/doc/en/token1.txt index 828cc1ecf8..d66ab96ab4 100644 --- a/harbour/contrib/hbct/doc/en/token1.txt +++ b/harbour/contrib/hbct/doc/en/token1.txt @@ -10,8 +10,8 @@ * $ONELINER$ * Position of a token in a string * $SYNTAX$ - * ATTOKEN (, [], - * [], []) -> nPosition + * ATTOKEN( , [], + * [], [] ) -> nPosition * $ARGUMENTS$ * is the processed string * [] is a list of characters separating the tokens @@ -42,13 +42,13 @@ * empty tokens, simply look if the character at the returned position * is within the tokenizer list. * $EXAMPLES$ - * attoken ("Hello, World!") --> 8 // empty strings after tokenizer - * // are not a token ! + * attoken( "Hello, World!" ) // --> 8 // empty strings after tokenizer + * // are not a token ! * $TESTS$ - * attoken ("Hello, World!") == 8 - * attoken ("Hello, World!",,2) == 8 - * attoken ("Hello, World!",,2,1) == 7 - * attoken ("Hello, World!"," ",2,1) == 8 + * attoken( "Hello, World!" ) == 8 + * attoken( "Hello, World!",, 2 ) == 8 + * attoken( "Hello, World!",, 2, 1 ) == 7 + * attoken( "Hello, World!", " ", 2, 1 ) == 8 * $STATUS$ * Ready * $COMPLIANCE$ @@ -72,9 +72,9 @@ * $ONELINER$ * Tokens of a string * $SYNTAX$ - * TOKEN (, [], + * TOKEN( , [], * [], - * [<@cPreTokenSep>], [<@cPostTokenSep>]) -> cToken + * [<@cPreTokenSep>], [<@cPostTokenSep>] ) -> cToken * $ARGUMENTS$ * is the processed string * [] is a list of characters separating the tokens @@ -108,15 +108,15 @@ * Therefore, additional calls to the TOKENSEP() function are not * necessary. * $EXAMPLES$ - * ? token ("Hello, World!") --> "World" - * ? token ("Hello, World!",,2,1) --> "" - * ? token ("Hello, World!",",",2,1) --> " World!" - * ? token ("Hello, World!"," ",2,1) --> "World!" + * ? token( "Hello, World!" ) --> "World" + * ? token( "Hello, World!",, 2, 1 ) --> "" + * ? token( "Hello, World!", ",", 2, 1 ) --> " World!" + * ? token( "Hello, World!", " ", 2, 1 ) --> "World!" * $TESTS$ - * token ("Hello, World!") == "World" - * token ("Hello, World!",,2,1) == "" - * token ("Hello, World!",",",2,1) == " World!" - * token ("Hello, World!"," ",2,1) == "World!" + * token( "Hello, World!" ) == "World" + * token( "Hello, World!",, 2, 1 ) == "" + * token( "Hello, World!", ",", 2, 1 ) == " World!" + * token( "Hello, World!", " ", 2, 1 ) == "World!" * $STATUS$ * Ready * $COMPLIANCE$ @@ -140,7 +140,7 @@ * $ONELINER$ * Retrieves the number of tokens in a string * $SYNTAX$ - * NUMTOKEN (, [], []) -> nTokenCount + * NUMTOKEN( , [], [] ) -> nTokenCount * $ARGUMENTS$ * * $RETURNS$ @@ -150,9 +150,9 @@ * $EXAMPLES$ * * $TESTS$ - * numtoken ("Hello, World!") == 2 - * numtoken ("This is good. See you! How do you do?",".!?") == 3 - * numtoken ("one,,three,four,,six",",",1) == 6 + * numtoken( "Hello, World!" ) == 2 + * numtoken( "This is good. See you! How do you do?", ".!?" ) == 3 + * numtoken( "one,,three,four,,six", ",", 1 ) == 6 * $STATUS$ * Ready * $COMPLIANCE$ @@ -174,8 +174,8 @@ * $ONELINER$ * Change the first letter of tokens to lower case * $SYNTAX$ - * TOKENLOWER (<[@]cString>, [], [], - * []) -> cString + * TOKENLOWER( <[@]cString>, [], [], + * [] ) -> cString * $ARGUMENTS$ * <[@]cString> is the processed string * [] is a list of characters separating the tokens @@ -203,15 +203,15 @@ * switch to .T., but you must then pass by reference to get * the result. * $EXAMPLES$ - * ? tokenlower("Hello, World, here I am!") // "hello, world, here i am!" - * ? tokenlower("Hello, World, here I am!",,3) // "hello, world, here I am!" - * ? tokenlower("Hello, World, here I am!",",",3) // "hello, World, here I am!" - * ? tokenlower("Hello, World, here I am!"," W") // "hello, World, here i am!" + * ? tokenlower( "Hello, World, here I am!" ) // "hello, world, here i am!" + * ? tokenlower( "Hello, World, here I am!",, 3 ) // "hello, world, here I am!" + * ? tokenlower( "Hello, World, here I am!", ",", 3 ) // "hello, World, here I am!" + * ? tokenlower( "Hello, World, here I am!", " W" ) // "hello, World, here i am!" * $TESTS$ - * tokenlower("Hello, World, here I am!") == "hello, world, here i am!" - * tokenlower("Hello, World, here I am!",,3) == "hello, world, here I am!" - * tokenlower("Hello, World, here I am!",",",3) == "hello, World, here I am!" - * tokenlower("Hello, World, here I am!"," W") == "hello, World, here i am!" + * tokenlower( "Hello, World, here I am!" ) == "hello, world, here i am!" + * tokenlower( "Hello, World, here I am!",, 3 ) == "hello, world, here I am!" + * tokenlower( "Hello, World, here I am!", ",", 3 ) == "hello, World, here I am!" + * tokenlower( "Hello, World, here I am!", " W" ) == "hello, World, here i am!" * $STATUS$ * Ready * $COMPLIANCE$ @@ -235,8 +235,8 @@ * $ONELINER$ * Change the first letter of tokens to upper case * $SYNTAX$ - * TOKENUPPER (<[@]cString>, [], [], - * []) -> cString + * TOKENUPPER( <[@]cString>, [], [], + * [] ) -> cString * $ARGUMENTS$ * <[@]cString> is the processed string * [] is a list of characters separating the tokens @@ -264,15 +264,15 @@ * switch to .T., but you must then pass by reference to get * the result. * $EXAMPLES$ - * ? tokenupper("Hello, world, here I am!") // "Hello, World, Here I Am!" - * ? tokenupper("Hello, world, here I am!",,3) // "Hello, World, Here I am!" - * ? tokenupper("Hello, world, here I am!",",",3) // "Hello, world, here I am!" - * ? tokenupper("Hello, world, here I am!"," w") // "Hello, wOrld, Here I Am!" + * ? tokenupper( "Hello, world, here I am!" ) // "Hello, World, Here I Am!" + * ? tokenupper( "Hello, world, here I am!",, 3 ) // "Hello, World, Here I am!" + * ? tokenupper( "Hello, world, here I am!", ",", 3 ) // "Hello, world, here I am!" + * ? tokenupper( "Hello, world, here I am!", " w" ) // "Hello, wOrld, Here I Am!" * $TESTS$ - * tokenupper("Hello, world, here I am!") == "Hello, World, Here I Am!" - * tokenupper("Hello, world, here I am!",,3) == "Hello, World, Here I am!" - * tokenupper("Hello, world, here I am!",",",3) == "Hello, world, here I am!" - * tokenupper("Hello, world, here I am!"," w") == "Hello, wOrld, Here I Am!" + * tokenupper( "Hello, world, here I am!" ) == "Hello, World, Here I Am!" + * tokenupper( "Hello, world, here I am!",, 3 ) == "Hello, World, Here I am!" + * tokenupper( "Hello, world, here I am!", ",", 3 ) == "Hello, world, here I am!" + * tokenupper( "Hello, world, here I am!", " w" ) == "Hello, wOrld, Here I Am!" * $STATUS$ * Ready * $COMPLIANCE$ @@ -296,7 +296,7 @@ * $ONELINER$ * Retrieves the token separators of the last token() call * $SYNTAX$ - * TOKENSEP ([]) -> cSeparator + * TOKENSEP( [] ) -> cSeparator * $ARGUMENTS$ * [] if set to .T., the token separator BEHIND the token * retrieved from the token() call will be returned. diff --git a/harbour/contrib/hbct/doc/en/token2.txt b/harbour/contrib/hbct/doc/en/token2.txt index 70b9697b34..10f8d1a0dc 100644 --- a/harbour/contrib/hbct/doc/en/token2.txt +++ b/harbour/contrib/hbct/doc/en/token2.txt @@ -10,8 +10,8 @@ * $ONELINER$ * Initializes a token environment * $SYNTAX$ - * TOKENINIT (<[@]cString>], [], [], - * [<@cTokenEnvironment>]) -> lState + * TOKENINIT( <[@]cString>], [], [], + * [<@cTokenEnvironment>] ) -> lState * $ARGUMENTS$ * <[@]cString> is the processed string * is a list of characters separating the tokens @@ -57,19 +57,19 @@ * to be passed by reference, since one must provide the * string in calls to TOKENNEXT() again. * $EXAMPLES$ - * tokeninit (cString) // tokenize the string with default - * // rules and store the token environment globally - * // and eventually delete an old global TE - * tokeninit (@cString) // no difference in result, but eventually faster, - * // since the string must not be copied - * tokeninit() // rewind counter of global TE to 1 - * tokeninit ("1,2,3",",",1) // tokenize constant string, store in global TE - * tokeninit (cString,,1,@cTE1) // tokenize cString and store TE in - * // cTE1 only without overriding global TE - * tokeninit (cString,,1,cTE1) // tokenize cString and store TE in - * // GLOBAL TE since 4th parameter is - * // not given by reference !!! - * tokeninit (,,,@cTE1) // set counter in TE stored in cTE1 to 1 + * tokeninit( cString ) // tokenize the string with default + * // rules and store the token environment globally + * // and eventually delete an old global TE + * tokeninit( @cString ) // no difference in result, but eventually faster, + * // since the string must not be copied + * tokeninit() // rewind counter of global TE to 1 + * tokeninit( "1,2,3", "," , 1 ) // tokenize constant string, store in global TE + * tokeninit( cString, , 1, @cTE1) // tokenize cString and store TE in + * // cTE1 only without overriding global TE + * tokeninit( cString, , 1, cTE1 ) // tokenize cString and store TE in + * // GLOBAL TE since 4th parameter is + * // not given by reference !!! + * tokeninit( ,,, @cTE1 ) // set counter in TE stored in cTE1 to 1 * $TESTS$ * * $STATUS$ @@ -94,8 +94,8 @@ * $ONELINER$ * Successivly obtains tokens from a string * $SYNTAX$ - * TOKENNEXT (<[@]cString>, [], - * [<@cTokenEnvironment>]) -> cToken + * TOKENNEXT( <[@]cString>, [], + * [<@cTokenEnvironment>] ) -> cToken * $ARGUMENTS$ * <[@]cString> the processed string * a token number @@ -122,12 +122,12 @@ * give first "CC" and then "EE" (because "CCCEE" is not long enough). * $EXAMPLES$ * // default behavhiour - * tokeninit (cString) // initialize a TE - * do while (!tokenend()) - * ? tokennext (cString) // get all tokens successivly - * enddo - * ? tokennext (cString, 3) // get the 3rd token, counter will remain the same - * tokenexit() // free the memory used for the global TE + * tokeninit( cString ) // initialize a TE + * DO WHILE ! tokenend() + * ? tokennext( cString ) // get all tokens successivly + * ENDDO + * ? tokennext( cString, 3 ) // get the 3rd token, counter will remain the same + * tokenexit() // free the memory used for the global TE * $TESTS$ * * $STATUS$ @@ -153,7 +153,7 @@ * $ONELINER$ * Get the total number of tokens in a token environment * $SYNTAX$ - * TOKENNUM ([<@cTokenEnvironment>]) -> nNumberofTokens + * TOKENNUM( [<@cTokenEnvironment>] ) -> nNumberofTokens * $ARGUMENTS$ * <@cTokenEnvironment> a token environment * $RETURNS$ @@ -165,7 +165,7 @@ * reference), the information from this token environment is used, * otherwise the global TE is used. * $EXAMPLES$ - * tokeninit ("a.b.c.d", ".", 1) // initialize global TE + * tokeninit( "a.b.c.d", ".", 1 ) // initialize global TE * ? tokennum() // --> 4 * $TESTS$ * @@ -190,7 +190,7 @@ * $ONELINER$ * Check whether additional tokens are available with TOKENNEXT() * $SYNTAX$ - * TOKENEND ([<@cTokenEnvironment>]) -> lTokenEnd + * TOKENEND( [<@cTokenEnvironment>] ) -> lTokenEnd * $ARGUMENTS$ * <@cTokenEnvironment> a token environment * $RETURNS$ @@ -206,10 +206,10 @@ * With a combination of TOKENEND() and TOKENNEXT(), all tokens from a * string can be retrieved successivly (see example). * $EXAMPLES$ - * tokeninit ("a.b.c.d", ".", 1) // initialize global TE - * do while (!tokenend()) - * ? tokennext ("a.b.c.d") // get all tokens successivly - * enddo + * tokeninit( "a.b.c.d", ".", 1 ) // initialize global TE + * DO WHILE ! tokenend() + * ? tokennext( "a.b.c.d" ) // get all tokens successivly + * ENDDO * $TESTS$ * * $STATUS$ @@ -234,7 +234,7 @@ * $ONELINER$ * Release global token environment * $SYNTAX$ - * TOKENEXIT () -> lStaticEnvironmentReleased + * TOKENEXIT() -> lStaticEnvironmentReleased * $ARGUMENTS$ * * $RETURNS$ @@ -245,12 +245,12 @@ * using the global TE. Additionally, TOKENEXIT() is implicitly called * from CTEXIT() to free the memory at library shutdown. * $EXAMPLES$ - * tokeninit (cString) // initialize a TE - * do while (!tokenend()) - * ? tokennext (cString) // get all tokens successivly - * enddo - * ? tokennext (cString, 3) // get the 3rd token, counter will remain the same - * tokenexit() // free the memory used for the global TE + * tokeninit( cString ) // initialize a TE + * DO WHILE ! tokenend() + * ? tokennext( cString ) // get all tokens successivly + * ENDDO + * ? tokennext( cString, 3 ) // get the 3rd token, counter will remain the same + * tokenexit() // free the memory used for the global TE * $TESTS$ * * $STATUS$ @@ -274,8 +274,8 @@ * $ONELINER$ * Get start and end positions of tokens in a token environment * $SYNTAX$ - * TOKENAT ([], [], - * [<@cTokenEnvironment>]) -> nPosition + * TOKENAT( [], [], + * [<@cTokenEnvironment>] ) -> nPosition * $ARGUMENTS$ * .T., if TOKENAT() should return * the position of the separator character @@ -301,13 +301,13 @@ * $EXAMPLES$ * * $TESTS$ - * tokeninit (cString) // initialize a TE - * do while (!tokenend()) - * ? "From", tokenat(), "to", tokenat(.T.)-1 - * ? tokennext (cString) // get all tokens successivly - * enddo - * ? tokennext (cString, 3) // get the 3rd token, counter will remain the same - * tokenexit() // free the memory used for the global TE + * tokeninit( cString ) // initialize a TE + * DO WHILE ! tokenend() + * ? "From", tokenat(), "to", tokenat( .T. ) - 1 + * ? tokennext( cString ) // get all tokens successivly + * ENDDO + * ? tokennext( cString, 3 ) // get the 3rd token, counter will remain the same + * tokenexit() // free the memory used for the global TE * $STATUS$ * Ready * $COMPLIANCE$ @@ -331,7 +331,7 @@ * $ONELINER$ * Save the global token environment * $SYNTAX$ - * SAVETOKEN () -> cStaticTokenEnvironment + * SAVETOKEN() -> cStaticTokenEnvironment * $ARGUMENTS$ * * $RETURNS$ @@ -366,7 +366,7 @@ * $ONELINER$ * Restore global token environment * $SYNTAX$ - * RESTTOKEN () -> cOldStaticEnvironment + * RESTTOKEN( ) -> cOldStaticEnvironment * $ARGUMENTS$ * a binary string encoding a TE * $RETURNS$ diff --git a/harbour/contrib/hbct/doc/en/trig.txt b/harbour/contrib/hbct/doc/en/trig.txt index 7e4d7ee5f9..0b6a57d2e7 100644 --- a/harbour/contrib/hbct/doc/en/trig.txt +++ b/harbour/contrib/hbct/doc/en/trig.txt @@ -10,7 +10,7 @@ * $ONELINER$ * Returns Pi, the perimeter-to-diameter-ratio of a circle * $SYNTAX$ - * PI () -> nPi + * PI() -> nPi * $ARGUMENTS$ * * $RETURNS$ @@ -23,7 +23,7 @@ * // the diameter of a circle-like swimming pool is 3.4 meters, how * // long is the perimeter ? * - * ? str(PI()*3.4,5,3)+" meters" --> 10.681 meters + * ? Str( PI() * 3.4, 5, 3 ) + " meters" // --> 10.681 meters * $TESTS$ * * $STATUS$ @@ -59,13 +59,13 @@ * A common geometric interpretation of the SIN() function is the * counterkathede-hypotenuse-ratio of a right-angled triangle. * $EXAMPLES$ - * ? sin (0.0) --> 0.0 - * ? sin (1.0) --> 0.8414... + * ? sin( 0.0 ) // --> 0.0 + * ? sin( 1.0 ) // --> 0.8414... * $TESTS$ - * sin (0.0) == 0.0 - * sin (PI()/4) == sqrt(1/2) - * sin (PI()/2) == 1.0 - * sin (PI()) == 0.0 + * sin( 0.0 ) == 0.0 + * sin( PI() / 4 ) == sqrt( 1 / 2 ) + * sin( PI() / 2 ) == 1.0 + * sin( PI() ) == 0.0 * $STATUS$ * Ready * $COMPLIANCE$ @@ -87,7 +87,7 @@ * $ONELINER$ * Cosine of the argument * $SYNTAX$ - * COS (nRadiant) -> nCosine + * COS( nRadiant ) -> nCosine * $ARGUMENTS$ * an angle size given in radiants * $RETURNS$ @@ -99,13 +99,13 @@ * A common geometric interpretation of the COS() function is the * ankathede-hypotenuse-ratio of a right-angled triangle. * $EXAMPLES$ - * ? cos (0.0) --> 1.0 - * ? cos (1.0) --> 0.5403... + * ? cos( 0.0 ) // --> 1.0 + * ? cos( 1.0 ) // --> 0.5403... * $TESTS$ - * cos (0.0) == 1.0 - * cos (PI()/4) == sqrt(1/2) - * cos (PI()/2) == 0.0 - * cos (PI()) == -1.0 + * cos( 0.0) == 1.0 + * cos( PI() / 4 ) == sqrt( 1 / 2 ) + * cos( PI() / 2 ) == 0.0 + * cos( PI() ) == -1.0 * $STATUS$ * Ready * $COMPLIANCE$ @@ -127,7 +127,7 @@ * $ONELINER$ * Tangent of the argument * $SYNTAX$ - * TAN (nRadiant) -> nTangent + * TAN( nRadiant ) -> nTangent * $ARGUMENTS$ * an angle size given in radiants * $RETURNS$ @@ -140,12 +140,12 @@ * counterkathede-ankathede-ratio of a right-angled triangle, or, * tan(x) = sin(x)/cos(x). * $EXAMPLES$ - * ? tan (0.0) --> 0.0 - * ? tan (1.0) --> 1.5574... + * ? tan( 0.0 ) // --> 0.0 + * ? tan( 1.0 ) // --> 1.5574... * $TESTS$ - * tan (0.0) == 0.0 - * tan (PI()/4) == 1 - * tan (PI()) == 0.0 + * tan( 0.0 ) == 0.0 + * tan( PI() / 4 ) == 1 + * tan( PI() ) == 0.0 * $STATUS$ * Ready * $COMPLIANCE$ @@ -167,7 +167,7 @@ * $ONELINER$ * Cotangent of the argument * $SYNTAX$ - * COT (nRadiant) -> nCotangent + * COT( nRadiant ) -> nCotangent * $ARGUMENTS$ * an angle size given in radiants * $RETURNS$ @@ -180,10 +180,10 @@ * ankathede-counterkathede-ratio of a right-angled triangle, or, * cot(x) = cos(x)/sin(x)=1/tan(x). * $EXAMPLES$ - * ? cot (1.0) --> 0.6420... + * ? cot( 1.0 ) // --> 0.6420... * $TESTS$ - * cot (PI()/4) == 1 - * cot (PI()/2) == 0 + * cot( PI() / 4 ) == 1 + * cot( PI() / 2 ) == 0 * $STATUS$ * Ready * $COMPLIANCE$ @@ -205,7 +205,7 @@ * $ONELINER$ * Arcus sine of the argument * $SYNTAX$ - * ASIN (nSine) -> nRadiant + * ASIN( nSine ) -> nRadiant * $ARGUMENTS$ * the sine of an angle * $RETURNS$ @@ -218,13 +218,13 @@ * Note, that must be between -1 and 1 and that * is always between -PI()/2 and PI()/2. * $EXAMPLES$ - * ? asin (0.0) --> 0.0 - * ? asin (0.5) --> 0.5235... + * ? asin( 0.0 ) // --> 0.0 + * ? asin( 0.5 ) // --> 0.5235... * $TESTS$ - * asin (0.0) == 0.0 - * asin (sqrt(1/2)) == PI()/4 - * asin (1.0) == PI()/2 - * asin (0.0) == 0.0 // and not PI(), since the smallest angle is returned ! + * asin( 0.0 ) == 0.0 + * asin( sqrt( 1 / 2 ) ) == PI() / 4 + * asin( 1.0 ) == PI() / 2 + * asin( 0.0 ) == 0.0 // and not PI(), since the smallest angle is returned ! * $STATUS$ * Ready * $COMPLIANCE$ @@ -246,7 +246,7 @@ * $ONELINER$ * Arcus cosine of the argument * $SYNTAX$ - * ACOS (nCosine) -> nRadiant + * ACOS( nCosine ) -> nRadiant * $ARGUMENTS$ * the cosine of an angle * $RETURNS$ @@ -259,14 +259,14 @@ * Note, that must be between -1 and 1 and that * is always between 0 and PI(). * $EXAMPLES$ - * ? acos (0.0) --> PI()/2 - * ? acos (0.5) --> 1.04719... + * ? acos( 0.0 ) // --> PI() / 2 + * ? acos( 0.5 ) // --> 1.04719... * $TESTS$ - * acos (0.0) == PI()/2 - * acos (sqrt(1/2)) == PI()/4 - * acos (1.0) == 0.0 - * acos (-1.0) == PI() - * acos (0.0) == PI()/2 // and not -PI()/2, although cos (-PI()/2) == 0.0 ! + * acos( 0.0 ) == PI() / 2 + * acos( sqrt( 1 / 2 ) ) == PI() / 4 + * acos( 1.0 ) == 0.0 + * acos( -1.0 ) == PI() + * acos( 0.0 ) == PI() / 2 // and not -PI()/2, although cos (-PI()/2) == 0.0 ! * $STATUS$ * Ready * $COMPLIANCE$ @@ -288,7 +288,7 @@ * $ONELINER$ * Arcus tangent of the argument * $SYNTAX$ - * ACOS (nTangent) -> nRadiant + * ACOS( nTangent ) -> nRadiant * $ARGUMENTS$ * the tangent of an angle * $RETURNS$ @@ -299,12 +299,12 @@ * The return value is given in radiants between -PI()/2 and PI()/2 * (full angle equals 2*Pi - see DTOR() if you need to convert it into degress). * $EXAMPLES$ - * ? atan (0.0) --> 0.0 - * ? atan (0.5) --> 0.4636... + * ? atan( 0.0 ) // --> 0.0 + * ? atan( 0.5 ) // --> 0.4636... * $TESTS$ - * atan (0.0) == 0.0 - * atan (1.0) == PI()/4 - * atan (0.0) == 0.0 // and not PI(), although tan (PI()) == 0.0 ! + * atan( 0.0 ) == 0.0 + * atan( 1.0 ) == PI() / 4 + * atan( 0.0 ) == 0.0 // and not PI(), although tan( PI() ) == 0.0 ! * $STATUS$ * Ready * $COMPLIANCE$ @@ -326,7 +326,7 @@ * $ONELINER$ * Arcus tangent a sine and a cosine argument * $SYNTAX$ - * ATN2 (nSine, nCosine) -> nRadiant + * ATN2( nSine, nCosine ) -> nRadiant * $ARGUMENTS$ * the sine of an angle * the cosine of an angle @@ -344,12 +344,12 @@ * The return value is given in radiants (full angle equals 2*Pi - * see DTOR() if you need to convert it into degress). * $EXAMPLES$ - * ? atn2 (0.0, 1.0) --> 0.0 - * ? atn2 (sqrt(1/2), sqrt(1/2)) --> PI()/4 + * ? atn2( 0.0, 1.0 ) // --> 0.0 + * ? atn2( sqrt( 1 / 2 ), sqrt( 1 / 2 ) ) // --> PI() / 4 * $TESTS$ - * atn2 (0.0, 1.0) == 0.0 - * atn2 (sqrt(1/2),sqrt(1/2)) == PI()/4 - * atn2 (-sqrt(1/2),-sqrt(1/2)) == -3/4*PI() // atan() would return PI()/4 ! + * atn2( 0.0, 1.0 ) == 0.0 + * atn2( sqrt( 1 / 2 ), sqrt( 1 / 2 ) ) == PI() / 4 + * atn2( -sqrt( 1 / 2 ), -sqrt( 1 / 2 ) ) == -3 / 4 * PI() // atan() would return PI() / 4 ! * $STATUS$ * Ready * $COMPLIANCE$ @@ -371,7 +371,7 @@ * $ONELINER$ * Hyperbolic Sine of the argument * $SYNTAX$ - * SINH (nArea) -> nHyperbolicSine + * SINH( nArea ) -> nHyperbolicSine * $ARGUMENTS$ * the size of the area (see below) * $RETURNS$ @@ -384,11 +384,11 @@ * that is bound by the x axis, a straight line through the point of * origin (this one is fixed by the area) and the hyperbola x^2-y^2=1. * $EXAMPLES$ - * ? sinh (0.0) --> 0.0 - * ? sinh (1.0) --> 1.1752... + * ? sinh( 0.0 ) // --> 0.0 + * ? sinh( 1.0 ) // --> 1.1752... * $TESTS$ - * sinh (0.0) == 0.0 - * sinh (-0.5) == -sinh(0.5) + * sinh( 0.0 ) == 0.0 + * sinh( -0.5 ) == -sinh( 0.5 ) * $STATUS$ * Ready * $COMPLIANCE$ @@ -410,7 +410,7 @@ * $ONELINER$ * Hyperbolic Cosine of the argument * $SYNTAX$ - * COSH (nArea) -> nHyperbolicCosine + * COSH( nArea ) -> nHyperbolicCosine * $ARGUMENTS$ * the size of the area (see below) * $RETURNS$ @@ -423,11 +423,11 @@ * that is bound by the x axis, a straight line through the point of * origin (this one is fixed by the area) and the hyperbola x^2-y^2=1. * $EXAMPLES$ - * ? cosh (0.0) --> 1.0 - * ? cosh (1.0) --> 1.5430... + * ? cosh( 0.0 ) // --> 1.0 + * ? cosh( 1.0 ) // --> 1.5430... * $TESTS$ - * cosh (0.0) == 1.0 - * cosh (-0.5) == cosh(0.5) + * cosh( 0.0 ) == 1.0 + * cosh( -0.5 ) == cosh( 0.5 ) * $STATUS$ * Ready * $COMPLIANCE$ @@ -449,7 +449,7 @@ * $ONELINER$ * Hyperbolic Tangent of the argument * $SYNTAX$ - * TANH (nArea) -> nHyperbolicTangent + * TANH( nArea ) -> nHyperbolicTangent * $ARGUMENTS$ * the size of the area (see below) * $RETURNS$ @@ -458,11 +458,11 @@ * The function TANH() calculates the hyperbolic tangent of the argument. * In analytical mathematics it is defined as SINH(x)/COSH(x). * $EXAMPLES$ - * ? tanh (0.0) --> 0.0 - * ? tanh (1.0) --> 0.7615... + * ? tanh( 0.0 ) // --> 0.0 + * ? tanh( 1.0 ) // --> 0.7615... * $TESTS$ - * tanh (0.0) == 0.0 - * tanh (-0.5) == -tanh(0.5) + * tanh( 0.0 ) == 0.0 + * tanh( -0.5 ) == -tanh( 0.5 ) * $STATUS$ * Ready * $COMPLIANCE$ @@ -484,7 +484,7 @@ * $ONELINER$ * Convert radiant to degree * $SYNTAX$ - * RTOD (nRadiant) -> nDegree + * RTOD( nRadiant ) -> nDegree * $ARGUMENTS$ * the size of an angle in radiant * $RETURNS$ @@ -494,11 +494,11 @@ * in radiant (like those returned by the asin, acos or atan function) * to degrees that are commonly used geometry and technics. * $EXAMPLES$ - * ? rtod (PI()) --> 180 - * ? tanh (PI()/3) --> 60 + * ? rtod( PI() ) // --> 180 + * ? tanh( PI() / 3 ) // --> 60 * $TESTS$ - * rtod (0.0) == 0.0 - * rtod (PI()) == 180.0 + * rtod( 0.0 ) == 0.0 + * rtod( PI() ) == 180.0 * $STATUS$ * Ready * $COMPLIANCE$ @@ -520,7 +520,7 @@ * $ONELINER$ * Convert degree to radiant * $SYNTAX$ - * DTOR (nDegree) -> nRadiant + * DTOR( nDegree ) -> nRadiant * $ARGUMENTS$ * the size of that angle in degree * $RETURNS$ @@ -529,11 +529,11 @@ * The function DTOR() can be used to convert sizes of angles given * in degrees to radiant (as expected by sin, cos or tan functions). * $EXAMPLES$ - * ? dtor (180) --> PI() - * ? dtor (60) --> PI()/3 + * ? dtor( 180 ) // --> PI() + * ? dtor( 60 ) // --> PI() / 3 * $TESTS$ - * dtor (0.0) == 0.0 - * dtor (180.0) == PI() + * dtor( 0.0 ) == 0.0 + * dtor( 180.0 ) == PI() * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/video.txt b/harbour/contrib/hbct/doc/en/video.txt index 7686be8ee3..68f913bf7a 100644 --- a/harbour/contrib/hbct/doc/en/video.txt +++ b/harbour/contrib/hbct/doc/en/video.txt @@ -42,8 +42,8 @@ * $ONELINER$ * Changes VGA palette colors * $SYNTAX$ - * VGAPALETTE([, [, , - * lValid + * VGAPALETTE( [, [, , + * lValid * $ARGUMENTS$ * - the color to change in CA-Cl*pper color notation or * as a number from 0 to 15. @@ -114,9 +114,9 @@ * $ONELINER$ * Loads font from a string. * $SYNTAX$ - * SETFONT(, [], [], []) --> nError + * SETFONT( , [], [], [] ) --> nError * or: - * SETFONT(, [], []) --> nError + * SETFONT( , [], [] ) --> nError * $ARGUMENTS$ * Binary string containing a valid font definition. * Number of a font area where the font must be loaded. diff --git a/harbour/contrib/hbct/doc/en/wordrepl.txt b/harbour/contrib/hbct/doc/en/wordrepl.txt index ca6cf43e8e..74556aae94 100644 --- a/harbour/contrib/hbct/doc/en/wordrepl.txt +++ b/harbour/contrib/hbct/doc/en/wordrepl.txt @@ -10,8 +10,8 @@ * $ONELINER$ * Replacement of double characters * $SYNTAX$ - * WORDREPL (, <[@]cString>, - * , []) -> cString + * WORDREPL( , <[@]cString>, + * , [] ) -> cString * $ARGUMENTS$ * is a string of double characters * that should be replaced @@ -41,18 +41,18 @@ * One can omit the return value of this function by setting the CSETREF() * to .T., but one must then pass by reference to get a result. * $EXAMPLES$ - * ? wordrepl("CC", "AABBCCDDEE", "XX") // "AABBXXDDEE" - * ? wordrepl("aa", "1aaaa", "ba") // "1abaa" - * ? wordrepl("aa", "1aaaa", "ba", .T.) // "1baba" - * csetatmupa(.T.) - * ? wordrepl("aa", "1aaaa", "ba") // "1abaa" - * ? wordrepl("aa", "1aaaa", "ba", .T.) // "1bbba" + * ? wordrepl( "CC", "AABBCCDDEE", "XX" ) // "AABBXXDDEE" + * ? wordrepl( "aa", "1aaaa", "ba" ) // "1abaa" + * ? wordrepl( "aa", "1aaaa", "ba", .T. ) // "1baba" + * csetatmupa( .T. ) + * ? wordrepl( "aa", "1aaaa", "ba" ) // "1abaa" + * ? wordrepl( "aa", "1aaaa", "ba", .T. ) // "1bbba" * $TESTS$ - * wordrepl("CC", "AABBCCDDEE", "XX") == "AABBXXDDEE" - * wordrepl("aa", "1aaaa", "ba") == "1abaa" - * wordrepl("aa", "1aaaa", "ba", .T.) == "1baba" - * eval ({||csetatmupa(.T.),wordrepl("aa", "1aaaa", "ba")}) == "1abaa" - * eval ({||csetatmupa(.T.),wordrepl("aa", "1aaaa", "ba", .T.)}) == "1bbba" + * wordrepl( "CC", "AABBCCDDEE", "XX" ) == "AABBXXDDEE" + * wordrepl( "aa", "1aaaa", "ba" ) == "1abaa" + * wordrepl( "aa", "1aaaa", "ba", .T. ) == "1baba" + * Eval( {|| csetatmupa( .T. ), wordrepl( "aa", "1aaaa", "ba" ) } ) == "1abaa" + * Eval( {|| csetatmupa( .T. ), wordrepl( "aa", "1aaaa", "ba", .T. ) } ) == "1bbba" * $STATUS$ * Ready * $COMPLIANCE$ diff --git a/harbour/contrib/hbct/doc/en/wordtoch.txt b/harbour/contrib/hbct/doc/en/wordtoch.txt index d7f31e7745..08b2aa18e4 100644 --- a/harbour/contrib/hbct/doc/en/wordtoch.txt +++ b/harbour/contrib/hbct/doc/en/wordtoch.txt @@ -10,8 +10,8 @@ * $ONELINER$ * Replace double with single characters * $SYNTAX$ - * WORDTOCHAR (, , - * ) -> cString + * WORDTOCHAR( , , + * ) -> cString * $ARGUMENTS$ * * $RETURNS$