From db9c4c7cd0c08a8b35a7d56d0279139021d8b945 Mon Sep 17 00:00:00 2001 From: Gabriel Dos Reis Date: Wed, 23 Dec 2015 22:38:12 -0800 Subject: Retain Lisp code generated from algebra if asked. --- src/boot/translator.boot | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/boot') diff --git a/src/boot/translator.boot b/src/boot/translator.boot index 34aa7816..8ba8e4fc 100644 --- a/src/boot/translator.boot +++ b/src/boot/translator.boot @@ -1,6 +1,6 @@ -- Copyright (c) 1991-2002, The Numerical Algorithms Group Ltd. -- All rights reserved. --- Copyright (C) 2007-2014, Gabriel Dos Reis. +-- Copyright (C) 2007-2015, Gabriel Dos Reis. -- All rights reserved. -- -- Redistribution and use in source and binary forms, with or without @@ -40,7 +40,7 @@ import parser import ast namespace BOOTTRAN module translator (evalBootFile, loadNativeModule, loadSystemRuntimeCore, - string2BootTree, genImportDeclaration) + string2BootTree, genImportDeclaration, retainFile?) ++ If non nil, holds the name of the current module being translated. $currentModuleName := nil -- cgit v1.2.3