From 958b1cb9769ec3176e40a8cd4ef33b2060b7074d Mon Sep 17 00:00:00 2001 From: dom96 Date: Mon, 3 Jan 2011 20:29:00 +0000 Subject: [PATCH] Added a generics test case. --- tests/accept/compile/tgenericvariant.nim | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 tests/accept/compile/tgenericvariant.nim diff --git a/tests/accept/compile/tgenericvariant.nim b/tests/accept/compile/tgenericvariant.nim new file mode 100644 index 0000000000..51d01355a9 --- /dev/null +++ b/tests/accept/compile/tgenericvariant.nim @@ -0,0 +1,23 @@ +type + TMaybe[T] = object + case empty: Bool + of False: value: T + else: nil + +proc Just*[T](val: T): TMaybe[T] = + result.empty = False + result.value = val + +proc Nothing[T](): TMaybe[T] = + result.empty = True + +proc safeReadLine(): TMaybe[string] = + var r = stdin.readLine() + if r == "": return Nothing[string]() + else: return Just(r) + +when isMainModule: + var Test = Just("Test") + echo(Test.value) + var mSomething = safeReadLine() + echo(mSomething.value)