From 9a6bbcb302ccba1e406dfd7f5bdbb1083bb7b98d Mon Sep 17 00:00:00 2001
From: peter <peter@freepascal.org>
Date: Wed, 25 Dec 2002 00:46:05 +0000
Subject: [PATCH]   * delphi mode

---
 tests/tbs/tb0440.pp | 1 +
 1 file changed, 1 insertion(+)

diff --git a/tests/tbs/tb0440.pp b/tests/tbs/tb0440.pp
index a65df043e2..3a84ae2f79 100644
--- a/tests/tbs/tb0440.pp
+++ b/tests/tbs/tb0440.pp
@@ -1,3 +1,4 @@
+{$mode delphi}
 uses ub0440;
 
 procedure ub0440;