String comparison: Difference between revisions
Content added Content deleted
m (Added Sidef language) |
|||
Line 360: | Line 360: | ||
<lang cobol>"hello " = "hello" *> True |
<lang cobol>"hello " = "hello" *> True |
||
X"00" > X"0000" *> True</lang> |
X"00" > X"0000" *> True</lang> |
||
=={{header|ColdFusion}}== |
|||
In CFML: |
|||
<lang cfm><cffunction name="CompareString"> |
|||
<cfargument name="String1" type="string"> |
|||
<cfargument name="String2" type="string"> |
|||
<cfset VARIABLES.Result = "" > |
|||
<cfif ARGUMENTS.String1 LT ARGUMENTS.String2 > |
|||
<cfset VARIABLES.Result = VARIABLES.Result & "('" & ARGUMENTS.String1 & "' is less than '" & ARGUMENTS.String2 & "')" > |
|||
</cfif> |
|||
<cfif ARGUMENTS.String1 LTE ARGUMENTS.String2 > |
|||
<cfset VARIABLES.Result = VARIABLES.Result & "('" & ARGUMENTS.String1 & "' is less than or equal to '" & ARGUMENTS.String2 & "')" > |
|||
</cfif> |
|||
<cfif ARGUMENTS.String1 GT ARGUMENTS.String2 > |
|||
<cfset VARIABLES.Result = VARIABLES.Result & "('" & ARGUMENTS.String1 & "' is greater than '" & ARGUMENTS.String2 & "')" > |
|||
</cfif> |
|||
<cfif ARGUMENTS.String1 GTE ARGUMENTS.String2 > |
|||
<cfset VARIABLES.Result = VARIABLES.Result & "('" & ARGUMENTS.String1 & "' is greater than or equal to '" & ARGUMENTS.String2 & "')" > |
|||
</cfif> |
|||
<cfif ARGUMENTS.String1 EQ ARGUMENTS.String2 > |
|||
<cfset VARIABLES.Result = VARIABLES.Result & "('" & ARGUMENTS.String1 & "' is equal to '" & ARGUMENTS.String2 & "')" > |
|||
</cfif> |
|||
<cfif ARGUMENTS.String1 NEQ ARGUMENTS.String2 > |
|||
<cfset VARIABLES.Result = VARIABLES.Result & "('" & ARGUMENTS.String1 & "' is not equal to '" & ARGUMENTS.String2 & "')" > |
|||
</cfif> |
|||
<cfreturn VARIABLES.Result > |
|||
</cffunction></lang> |
|||
In CFScript: |
|||
<lang cfm><cfscript> |
|||
function CompareString( String1, String2 ) { |
|||
VARIABLES.Result = ""; |
|||
if ( ARGUMENTS.String1 LT ARGUMENTS.String2 ) { |
|||
VARIABLES.Result = VARIABLES.Result & "('" & ARGUMENTS.String1 & "' is less than '" & ARGUMENTS.String2 & "')"; |
|||
} |
|||
if ( ARGUMENTS.String1 LTE ARGUMENTS.String2 ) { |
|||
VARIABLES.Result = VARIABLES.Result & "('" & ARGUMENTS.String1 & "' is less than or equal to '" & ARGUMENTS.String2 & "')"; |
|||
} |
|||
if ( ARGUMENTS.String1 GT ARGUMENTS.String2 ) { |
|||
VARIABLES.Result = VARIABLES.Result & "('" & ARGUMENTS.String1 & "' is greater than '" & ARGUMENTS.String2 & "')"; |
|||
} |
|||
if ( ARGUMENTS.String1 GTE ARGUMENTS.String2 ) { |
|||
VARIABLES.Result = VARIABLES.Result & "('" & ARGUMENTS.String1 & "' is greater than or equal to '" & ARGUMENTS.String2 & "')"; |
|||
} |
|||
if ( ARGUMENTS.String1 EQ ARGUMENTS.String2 ) { |
|||
VARIABLES.Result = VARIABLES.Result & "('" & ARGUMENTS.String1 & "' is equal to '" & ARGUMENTS.String2 & "')"; |
|||
} |
|||
if ( ARGUMENTS.String1 NEQ ARGUMENTS.String2 ) { |
|||
VARIABLES.Result = VARIABLES.Result & "('" & ARGUMENTS.String1 & "' is not equal to '" & ARGUMENTS.String2 & "')"; |
|||
} |
|||
return VARIABLES.Result; |
|||
} |
|||
</cfscript></lang> |
|||
=={{header|Common Lisp}}== |
=={{header|Common Lisp}}== |