From fc42fe56a57eace2dbdb31574c2e161f0eacf839 Mon Sep 17 00:00:00 2001
From: Ludovic Court`es
Date: Wed, 15 Jun 2005 13:00:39 +0000
Subject: Initial import of Skribe 1.2d.

Initial import of Skribe 1.2d.


git-archimport-id: lcourtes@laas.fr--2004-libre/skribilo--devel--1.2--base-0
---
 src/bigloo/new.sch | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 src/bigloo/new.sch

(limited to 'src/bigloo/new.sch')

diff --git a/src/bigloo/new.sch b/src/bigloo/new.sch
new file mode 100644
index 0000000..16bb7d5
--- /dev/null
+++ b/src/bigloo/new.sch
@@ -0,0 +1,17 @@
+;*=====================================================================*/
+;*    serrano/prgm/project/skribe/src/bigloo/new.sch                   */
+;*    -------------------------------------------------------------    */
+;*    Author      :  Manuel Serrano                                    */
+;*    Creation    :  Sun Aug 17 11:58:30 2003                          */
+;*    Last change :  Wed Sep 10 11:14:15 2003 (serrano)                */
+;*    Copyright   :  2003 Manuel Serrano                               */
+;*    -------------------------------------------------------------    */
+;*    The new facility                                                 */
+;*=====================================================================*/
+
+;*---------------------------------------------------------------------*/
+;*    new ...                                                          */
+;*---------------------------------------------------------------------*/
+(define-macro (new id . inits)
+   `(,(symbol-append 'instantiate::% id) ,@inits))
+   
-- 
cgit v1.2.3