summaryrefslogtreecommitdiff
path: root/form.h
diff options
context:
space:
mode:
authorLarry Wall <lwall@jpl-devvax.jpl.nasa.gov>1990-10-16 02:28:17 +0000
committerLarry Wall <lwall@jpl-devvax.jpl.nasa.gov>1990-10-16 02:28:17 +0000
commitd9d8d8de9462d72f6b4520fc11dd84dbe2c8bf1d (patch)
tree42dd9d991eecc159ab1e232be5f9941456228df0 /form.h
parentc2ab57d4ffc80c0e2a9e968e66e52c289ac9ed45 (diff)
downloadperl-d9d8d8de9462d72f6b4520fc11dd84dbe2c8bf1d.tar.gz
perl 3.0 patch #32 patch #29, continued
See patch #29.
Diffstat (limited to 'form.h')
-rw-r--r--form.h8
1 files changed, 7 insertions, 1 deletions
diff --git a/form.h b/form.h
index ee055a5f5b..f8c978836b 100644
--- a/form.h
+++ b/form.h
@@ -1,4 +1,4 @@
-/* $Header: form.h,v 3.0 89/10/18 15:17:39 lwall Locked $
+/* $Header: form.h,v 3.0.1.1 90/10/15 17:26:57 lwall Locked $
*
* Copyright (c) 1989, Larry Wall
*
@@ -6,6 +6,9 @@
* as specified in the README file that comes with the perl 3.0 kit.
*
* $Log: form.h,v $
+ * Revision 3.0.1.1 90/10/15 17:26:57 lwall
+ * patch29: added @###.## fields to format
+ *
* Revision 3.0 89/10/18 15:17:39 lwall
* 3.0 baseline
*
@@ -16,6 +19,7 @@
#define F_RIGHT 2
#define F_CENTER 3
#define F_LINES 4
+#define F_DECIMAL 5
struct formcmd {
struct formcmd *f_next;
@@ -25,6 +29,7 @@ struct formcmd {
char *f_pre;
short f_presize;
short f_size;
+ short f_decimals;
char f_type;
char f_flags;
};
@@ -33,6 +38,7 @@ struct formcmd {
#define FC_NOBLANK 2
#define FC_MORE 4
#define FC_REPEAT 8
+#define FC_DP 16
#define Nullfcmd Null(FCMD*)