diff --git a/compiler/macro-plugin.stanza b/compiler/macro-plugin.stanza index 63eae97b0..c6848c079 100644 --- a/compiler/macro-plugin.stanza +++ b/compiler/macro-plugin.stanza @@ -22,7 +22,7 @@ val PLUGIN-INTERFACE = PluginInterface(SExpIO()) ;============================================================ ;The entry-point for performing macro-expansion. -extern defn macroexpand (input:ptr) -> ptr : +protected extern defn macroexpand (input:ptr) -> ptr : return receive(PLUGIN-INTERFACE, input, fn(macroexpand-sexp)) ;Expand the given sexpression using the Stanza core @@ -76,7 +76,7 @@ defmethod print (o:OutputStream, e:NoSyntaxPackageInPlugin) : ;============================================================ ;The entry-point for retrieving the list of all syntax packages. -extern defn list_syntax_packages (input:ptr) -> ptr : +protected extern defn list_syntax_packages (input:ptr) -> ptr : return receive(PLUGIN-INTERFACE, input, fn(list-syntax-packages)) ;List all supported syntax packages. @@ -88,7 +88,7 @@ defn list-syntax-packages (f:False) -> Tuple : ;============================================================ ;The entry-point for adding all of the initial compiler flags. -extern defn add_compiler_flags (input:ptr) -> ptr : +protected extern defn add_compiler_flags (input:ptr) -> ptr : return receive(PLUGIN-INTERFACE, input, fn(add-compiler-flags)) ;Add all the compiler flags. diff --git a/compiler/params.stanza b/compiler/params.stanza index 6b52d783f..1e4519e6b 100644 --- a/compiler/params.stanza +++ b/compiler/params.stanza @@ -18,7 +18,7 @@ public defn compiler-flags () : to-tuple(COMPILE-FLAGS) ;========= Stanza Configuration ======== -public val STANZA-VERSION = [0 17 55] +public val STANZA-VERSION = [0 17 56] public var STANZA-INSTALL-DIR:String = "" public var OUTPUT-PLATFORM:Symbol = `platform public var STANZA-PKG-DIRS:List = List()