summaryrefslogtreecommitdiff
path: root/test-lib.sh
diff options
context:
space:
mode:
Diffstat (limited to 'test-lib.sh')
-rwxr-xr-xtest-lib.sh41
1 files changed, 0 insertions, 41 deletions
diff --git a/test-lib.sh b/test-lib.sh
deleted file mode 100755
index c3e359a..0000000
--- a/test-lib.sh
+++ /dev/null
@@ -1,41 +0,0 @@
-#!/bin/sh
-# the next line restarts using tclsh \
-exec tclsh "$0" "$@" || echo "0"; exit 1
-
-# --------------------------------------------------------
-# Copyright (C) Martin Ošmera <P16F87504SP@seznam.cz>
-# Licence: GPL
-# Version: 1.0
-# Homepage: http://sourceforge.net/projects/mcu8051ide
-# --------------------------------------------------------
-#
-# Test for presence of a Tcl library
-# Usage:
-# ./test-lib LIBRARY [VERSION]
-#
-# --------------------------------------------------------
-
-if {$argv == {--help}} {
- puts "Test for presence of Tcl library"
- puts "Usage:"
- puts "\t./test-lib LIBRARY [VERSION]"
-}
-
-if {$argc == 2} {
- if [catch {package require [lindex $argv 0] [lindex $argv 1]}] {
- puts {0}
- exit 1
- }
-} elseif {$argc == 1} {
- if [catch {package require [lindex $argv 0]}] {
- puts {0}
- exit 1
- }
-} else {
- puts {0}
- exit 1
-}
-
-puts {1}
-exit 0
-