From a33dfa361131956524afb2f2e3c8efdd50ac381d Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Thu, 26 Mar 1998 10:41:55 +0000
Subject: [PATCH] *** empty log message ***

---
 bugs/bug0115.pp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/bugs/bug0115.pp b/bugs/bug0115.pp
index 4e67896299..fd3d22e18b 100644
--- a/bugs/bug0115.pp
+++ b/bugs/bug0115.pp
@@ -2,7 +2,9 @@ var
    c : comp;
 
 begin
+   c:=1234;
    writeln(c);
    readln(c);
+   writeln(c);
 end.