Table of Contents


Forth#

false ( -- 0 )


Forth79Forth83ANSIForth200x
X X X X


returns 0 as a flag for logic "false" on the stack
hinterläßt Null als Zeichen für logisch-falsch auf dem Stack.

Action#

false =0

Example:

BYTE FUNC values_match(BYTE x,y)

  BYTE rval

  rval=0                ;means FALSE
  IF x=10 AND y=20 THEN
    rval=1              ;means TRUE
  FI
RETURN(rval)


PROC main()

  BYTE v1,
       v2

  PrintE("Please give me 2 numbers.")
  Print("v1 = ")
  v1=InputB()
  Print("v2 = ")
  v2=InputB()

  IF values_match(v1,v2) THEN 
    PrintE("Your values match!!")
  FI

RETURN