This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Mention the Unicode UTR #18 version referenced.
[perl5.git] / qnx / ar
diff --git a/qnx/ar b/qnx/ar
index e69de29..b46549a 100755 (executable)
--- a/qnx/ar
+++ b/qnx/ar
@@ -0,0 +1,33 @@
+#! /bin/sh
+#__USAGE
+#%C    key library name ...
+#      Crude cover for wlib to be compatible with ar
+#      Supports the following key letters:
+#      qcru
+#      ru  replace existing modules. u indicates only replace
+#          those which are newer
+#      c   create the library (kinda moot)
+#      q   quickly append to the end.
+#
+#This is a crude cover, but it has proved sufficient for many
+#ports. Rather than attempt to implement subtleties of the
+#ar syntax, I simply create a new library under all
+#circumstances. A much more thorough cover is available from
+#http://www.fdma.com/pub/qnx/porting/ar
+#
+#Note that Watcom 10.6 supports ar directly, so this
+#cover is not necessary.
+#
+#Increased the record size to 32 to accomodate a large library
+#in the perl 5.003 distribution
+#
+#Submitted by Norton T. Allen (allen@huarp.harvard.edu)
+
+if [ $# -lt 3 ]; then
+  use $0
+  exit 1
+fi
+shift
+library=$1
+shift
+wlib -p=32 -n $library `for i in $*; do echo "+$i \\c"; done`