src/: More missing exports.

diff --git a/src/codegen-proto.lisp b/src/codegen-proto.lisp
index e947a7291825bd5ec52194870f865d80b9c459c8..571f0b0cdf7fd5b0a8f07997f87163103606bb2b 100644 (file)
--- a/src/codegen-proto.lisp
+++ b/src/codegen-proto.lisp
@@ -49,7 +49,7 @@ (defgeneric (setf var-in-use-p) (value var)
 
 ;; Root class.
 
-(export 'temporary-name)
+(export '(temporary-name temp-tag))
 (defclass temporary-name ()
   ((tag :initarg :tag :reader temp-tag))
   (:documentation

diff --git a/src/output-proto.lisp b/src/output-proto.lisp
index 3483daa40a5b9f19f004c51e29ffa99cdca10c41..65068f3f3d511073facc368286fbd92e264904cd 100644 (file)
--- a/src/output-proto.lisp
+++ b/src/output-proto.lisp
@@ -119,6 +119,7 @@ (defgeneric hook-output (object reason sequencer)
 ;;;--------------------------------------------------------------------------
 ;;; Useful syntax.
 
+(export 'sequence-output)
 (defmacro sequence-output
     ((streamvar sequencer) &body clauses)
   "Register output behaviour in a convenient manner.