langs a-z

Task/Function-definition/XPL0/function-definition.xpl0

@@ -0,0 +1,8 @@
+func Multiply(A, B);    \the characters in parentheses are only a comment
+int  A, B;              \the arguments are actually declared here, as integers
+return A*B;             \the default (undeclared) function type is integer
+                        \no need to enclose a single statement in brackets
+
+func real FloatMul(A, B); \floating point version
+real A, B;              \arguments are declared here as floating point (doubles)
+return A*B;