Export SEQUENCE-FIRST and SEQUENCE-SECOND.

diff --git a/src/compiler/machines/C/compiler.pkg b/src/compiler/machines/C/compiler.pkg
index 8303a825b9e2678aed2748bb706deec19c2f0abd..e1e8dd6c1cded75f9b7df91c4a45c5265a9db0ad 100644 (file)
--- a/src/compiler/machines/C/compiler.pkg
+++ b/src/compiler/machines/C/compiler.pkg
@@ -163,6 +163,8 @@ USA.
          (scode/quotation? quotation?)
          (scode/sequence-actions sequence-actions)
          (scode/sequence-components sequence-components)
+         (scode/sequence-first sequence-first)
+         (scode/sequence-second sequence-second)
          (scode/sequence? sequence?)
          (scode/symbol? symbol?)
          (scode/the-environment? the-environment?)

diff --git a/src/compiler/machines/alpha/compiler.pkg b/src/compiler/machines/alpha/compiler.pkg
index dec37afe641f86d16837e6b868ae0fa6621b1c3e..4910c3891dd7b89e8f00ad645ed55cc1829a8df3 100644 (file)
--- a/src/compiler/machines/alpha/compiler.pkg
+++ b/src/compiler/machines/alpha/compiler.pkg
@@ -161,6 +161,8 @@ USA.
          (scode/quotation? quotation?)
          (scode/sequence-actions sequence-actions)
          (scode/sequence-components sequence-components)
+         (scode/sequence-first sequence-first)
+         (scode/sequence-second sequence-second)
          (scode/sequence? sequence?)
          (scode/symbol? symbol?)
          (scode/the-environment? the-environment?)

diff --git a/src/compiler/machines/bobcat/compiler.pkg b/src/compiler/machines/bobcat/compiler.pkg
index a2c180896ab30c598c674baf74e8afaf64bbeeab..2285b8a15c377abc752886a14d6d4778aeb49ed2 100644 (file)
--- a/src/compiler/machines/bobcat/compiler.pkg
+++ b/src/compiler/machines/bobcat/compiler.pkg
@@ -162,6 +162,8 @@ USA.
          (scode/quotation? quotation?)
          (scode/sequence-actions sequence-actions)
          (scode/sequence-components sequence-components)
+         (scode/sequence-first sequence-first)
+         (scode/sequence-second sequence-second)
          (scode/sequence? sequence?)
          (scode/symbol? symbol?)
          (scode/the-environment? the-environment?)

diff --git a/src/compiler/machines/i386/compiler.pkg b/src/compiler/machines/i386/compiler.pkg
index a440ff44d22c8a04c9b46b256b44d51e13c5fa73..4c264e65876f072f74eb733be4e588ec0330c12a 100644 (file)
--- a/src/compiler/machines/i386/compiler.pkg
+++ b/src/compiler/machines/i386/compiler.pkg
@@ -164,6 +164,8 @@ USA.
          (scode/quotation? quotation?)
          (scode/sequence-actions sequence-actions)
          (scode/sequence-components sequence-components)
+         (scode/sequence-first sequence-first)
+         (scode/sequence-second sequence-second)
          (scode/sequence? sequence?)
          (scode/symbol? symbol?)
          (scode/the-environment? the-environment?)

diff --git a/src/compiler/machines/mips/compiler.pkg b/src/compiler/machines/mips/compiler.pkg
index bbeb1e25cfd2f5525a11eb2f28a22ba4c1bbf22f..66c073626e01386a373e2b74d8be61213b9e6a1f 100644 (file)
--- a/src/compiler/machines/mips/compiler.pkg
+++ b/src/compiler/machines/mips/compiler.pkg
@@ -162,6 +162,8 @@ USA.
          (scode/quotation? quotation?)
          (scode/sequence-actions sequence-actions)
          (scode/sequence-components sequence-components)
+         (scode/sequence-first sequence-first)
+         (scode/sequence-second sequence-second)
          (scode/sequence? sequence?)
          (scode/symbol? symbol?)
          (scode/the-environment? the-environment?)

diff --git a/src/compiler/machines/spectrum/compiler.pkg b/src/compiler/machines/spectrum/compiler.pkg
index cac33715bee69a7aed60ca81d7c1155c928dc255..3441a528ad616133c5b9f709bc6f5786df7b4567 100644 (file)
--- a/src/compiler/machines/spectrum/compiler.pkg
+++ b/src/compiler/machines/spectrum/compiler.pkg
@@ -162,6 +162,8 @@ USA.
          (scode/quotation? quotation?)
          (scode/sequence-actions sequence-actions)
          (scode/sequence-components sequence-components)
+         (scode/sequence-first sequence-first)
+         (scode/sequence-second sequence-second)
          (scode/sequence? sequence?)
          (scode/symbol? symbol?)
          (scode/the-environment? the-environment?)

diff --git a/src/compiler/machines/svm/compiler.pkg b/src/compiler/machines/svm/compiler.pkg
index 2b16e16075465b3c4ee0765a499f880b02adbb15..009f81bda52774be913c867a7833c7d24b1c8ed3 100644 (file)
--- a/src/compiler/machines/svm/compiler.pkg
+++ b/src/compiler/machines/svm/compiler.pkg
@@ -165,6 +165,8 @@ USA.
          (scode/quotation? quotation?)
          (scode/sequence-actions sequence-actions)
          (scode/sequence-components sequence-components)
+         (scode/sequence-first sequence-first)
+         (scode/sequence-second sequence-second)
          (scode/sequence? sequence?)
          (scode/symbol? symbol?)
          (scode/the-environment? the-environment?)

diff --git a/src/compiler/machines/vax/compiler.pkg b/src/compiler/machines/vax/compiler.pkg
index 3d35736977da1a5cdd96802155f406bb7699b1e6..df0657bf1c5b5028acd888c4f821620957705f38 100644 (file)
--- a/src/compiler/machines/vax/compiler.pkg
+++ b/src/compiler/machines/vax/compiler.pkg
@@ -162,6 +162,8 @@ USA.
          (scode/quotation? quotation?)
          (scode/sequence-actions sequence-actions)
          (scode/sequence-components sequence-components)
+         (scode/sequence-first sequence-first)
+         (scode/sequence-second sequence-second)
          (scode/sequence? sequence?)
          (scode/symbol? symbol?)
          (scode/the-environment? the-environment?)

diff --git a/src/compiler/machines/x86-64/compiler.pkg b/src/compiler/machines/x86-64/compiler.pkg
index 017d181f1fdbeef9ecafdb3f7775348ffbd116f2..ca2aa71071122b1e8896b455dc3fcaa4141a05af 100644 (file)
--- a/src/compiler/machines/x86-64/compiler.pkg
+++ b/src/compiler/machines/x86-64/compiler.pkg
@@ -164,6 +164,8 @@ USA.
          (scode/quotation? quotation?)
          (scode/sequence-actions sequence-actions)
          (scode/sequence-components sequence-components)
+         (scode/sequence-first sequence-first)
+         (scode/sequence-second sequence-second)
          (scode/sequence? sequence?)
          (scode/symbol? symbol?)
          (scode/the-environment? the-environment?)