From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 114679 invoked by alias); 3 Oct 2017 13:41:33 -0000 Mailing-List: contact kawa-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: kawa-owner@sourceware.org Received: (qmail 114106 invoked by uid 89); 3 Oct 2017 13:41:32 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=0.9 required=5.0 tests=AWL,BAYES_05,KAM_LAZY_DOMAIN_SECURITY autolearn=no version=3.3.2 spammy=obs, servlet, deployment, 03oct2017 X-HELO: smtps-n.oca.eu Received: from smtps-n.oca.eu (HELO smtps-n.oca.eu) (192.54.174.167) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Tue, 03 Oct 2017 13:41:28 +0000 Received: from [192.168.109.88] (natoca100-13.unice.fr [134.59.100.13]) by smtps-n.oca.eu (Postfix) with ESMTPSA id 9F6DF50F643 for ; Tue, 3 Oct 2017 15:41:25 +0200 (CEST) From: Damien MATTEI To: Kawa mailing list Subject: variable definition in include files not usable in class file Date: Tue, 03 Oct 2017 13:41:00 -0000 User-Agent: KMail/1.9.6 MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Content-Disposition: inline Message-Id: <201710031541.24999.Damien.Mattei@unice.fr> X-IsSubscribed: yes X-SW-Source: 2017-q4/txt/msg00001.txt.bz2 hello, i try to use a variable defined in an include files and i got an error, i have a scheme class that run well: https://github.com/damien-mattei/Jkawa/blob/master/DBtoWebObserversKawa.scm after debug i had macros to hide the debug info in the log files, si i wrot= e some macros that depending on a flag (debug-mode) print or not some info on output that= go to log files, those macros are in a in a file used also by others scheme implementations= (debug.scm :=20 https://github.com/damien-mattei/LOGIKI/blob/master/lib/debug.scm=20 ) that is included by the previous one (DBtoWebObserversKawa.scm) by an instruction loke this (see DBtoWebObserversKawa.scm): (include-relative "../git/LOGIKI/lib/debug.scm") ;; for debug it adds some macro like those: ;; debug with display-nl (define-syntax debug-display-nl=20 (syntax-rules () ((_ msg) (begin (display "debug.scm : debug-display-nl : debug-mode =3D ") ;; this = has been added for debugging the debug macros !!! (and should be removed la= ter) (display debug-mode) (newline) (if debug-mode (begin (display msg)=20 (newline))))))) or this special one chich is a macro that take another macro in argument: ;; tired of rewriting debug macros starting from normal ones i wrote this o= ne that encapsulate ANY one !!! (define-syntax debug-only (syntax-rules () ((_ fct-or-mac ...) (begin (display "debug.scm : debug-only : debug-mode =3D ") ;; this has bee= n added for debugging the debug macros !!! (and should be removed later) (display debug-mode) (newline) (when debug-mode (fct-or-mac ...)))) =20=20=20=20 ((_ instruction) (begin (display "debug.scm : debug-only : debug-mode =3D ") ;; this has bee= n added for debugging the debug macros !!! (and should be removed later) (display debug-mode) (newline) (when debug-mode (instruction)))))) this works well in another Scheme implementation named Bigloo as in this fi= le (part also of the Sidonie web application): https://github.com/damien-mattei/Jbigl/blob/master/BiglooCode.scm i hoped it could work also in Kawa, but i can not find a way (place) to def= ine the flag called debug-mode=20 i tried many places, debug-mode is set to #t in debug.scm and DBtoWebObserv= ersKawa.scm but at run-time appears to be #!null in the log files: (this does not prevent the application to run well but it is now impossible= to have debug info in the Kawa part of the application) 03-Oct-2017 14:46:16.824 INFO [http-nio-127.0.0.1-8080-exec-767] org.apache.catalina.startup.HostConfig.deployWAR D=E9ploiement de l'archive /usr/local/apache-tomcat-8.0.27/webapps/Sidonie.war de l'application web 03-Oct-2017 14:46:17.840 INFO [http-nio-127.0.0.1-8080-exec-767] org.apache.jasper.servlet.TldScanner.scanJars At least one JAR was scanned for TLDs yet contained no TLDs. Enable debug logging for this logger for a complete list of JARs that were scanned but no TLDs were found in them. Skipping unneeded JARs during scanning can improve startup time and JSP compilation time. 03-Oct-2017 14:46:17.882 INFO [http-nio-127.0.0.1-8080-exec-767] org.glassfish.jersey.servlet.init.JerseyServletContainerInitializer.addServ= letWithApplication Registering the Jersey servlet application, named eu.oca.ApplicationConfig, at the servlet mapping /jersey/*, with the Application class of the same name. Sidonie : ApplicationConfig : getClasses : alreadyRun =3D false Sidonie : ApplicationConfig : initSidonie : registering Scheme environment... Sidonie : ApplicationConfig : initSidonie : Scheme environment registered. Sidonie : ApplicationConfig : initSidonie : path =3D /usr/local/apache-tomcat-8.0.27/logs Sidonie : ApplicationConfig : Hostname =3D moita.oca.eu Sidonie : ApplicationConfig : webapps_dir =3D /usr/local/apache-tomcat-8.0.27/webapps Sidonie : DBtoWebObserversKawa : *init* : (WebAppsDirParam ::java.lang.String) Sidonie : DataBase : searchDriver : driver found Sidonie : DBtoWebObserversKawa : work : eu.oca.DataBase:searchDriverStatic PASSED Sidonie : DataBase : connectStatic : Hostname =3D moita.oca.eu Sidonie : DataBase : connectStatic : using localhost as computer name and mattei as user for sidonie database Sidonie : DataBase : connectStatic : connection established Sidonie : DBtoWebObserversKawa : work : eu.oca.DataBase:connectStatic PASSED Sidonie : DataBase : createStatementStatic : done Sidonie : DBtoWebObserversKawa : work : eu.oca.DataBase:createStatementStatic PASSED Sidonie : DBtoWebObserversKawa : work : fetching http://ad.usno.navy.mil/wds/Webtextfiles/wdsnewref.txt ... could take a few seconds to GET file ... Sidonie : DBtoWebObserversKawa : work : before java.lang.System:getProperty Sidonie : DBtoWebObserversKawa : work : after fetching or reading file Sidonie : DBtoWebObserversKawa : work : creating regex. Sidonie : DBtoWebObserversKawa : work : running map-nil-iter-optim-tail-calls-call.... Sidonie : DBtoWebObserversKawa : work :: debug-mode =3D #t Sidonie : DBtoWebObserversKawa : work : after let* declarations. debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null Sidonie : DBtoWebObserversKawa : work : Voila la valeur SQL de la requ=E8te= : marequete =3D SELECT * FROM Obs ORDER BY Auteur Sidonie : DataBase : executeQueryStatic(String,String) : query: SELECT * FROM Obs ORDER BY Auteur | name : Observateurs debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-display-nl : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null debug.scm : debug-only : debug-mode =3D #!null Sidonie : DBtoWebObserversKawa : work : total =3D 492 Sidonie : DBtoWebObserversKawa : work : debug =3D #f Sidonie : DBtoWebObserversKawa : work : result : entering HTML footer writing... Sidonie : DBtoWebObserversKawa : write-HTML-file-str : writing file /usr/local/apache-tomcat-8.0.27/webapps/Sidonie/ObserversCodes.html... Sidonie : DBtoWebObserversKawa : write-HTML-file-str : file written. Sidonie : DBtoWebObserversKawa : work : debug =3D #f Sidonie : DBtoWebObserversKawa : work : fullPathFileName =3D /usr/local/apache-tomcat-8.0.27/webapps/Sidonie/ObservateursCodes.html Sidonie : DBtoWebObserversKawa : work : writing file... Sidonie : DBtoWebObserversKawa : write-HTML-file : writing file /usr/local/apache-tomcat-8.0.27/webapps/Sidonie/ObservateursCodes.html... Sidonie : DBtoWebObserversKawa : write-HTML-file : file written. Sidonie : DBtoWebObserversKawa : work : after write-HTML-file Sidonie : DBtoWebObserversKawa : write-HTML-file-str : writing file /usr/local/apache-tomcat-8.0.27/webapps/Sidonie/ObservateursCodesAlphab.htm= l... Sidonie : DBtoWebObserversKawa : write-HTML-file-str : file written. Sidonie : DataBase : closeStatic : resultSetObservateurs closed. Sidonie : DataBase : closeStatic : statement closed. Sidonie : DataBase : closeStatic : connect closed. Sidonie : DataBase : closeStatic : connection to database closed. Sidonie : DBtoWebObserversKawa : work : eu.oca.DataBase:closeStatic PASSED Sidonie : ApplicationConfig : getClasses : alreadyRun =3D true 03-Oct-2017 14:46:23.949 INFO [http-nio-127.0.0.1-8080-exec-767] org.glassfish.jersey.server.ApplicationHandler.initialize Initiating Jersey application, version Jersey: 2.5.1 2014-01-02 13:43:00... 03-Oct-2017 14:46:24.243 INFO [http-nio-127.0.0.1-8080-exec-767] org.apache.catalina.startup.HostConfig.deployWAR Deployment of web application archive /usr/local/apache-tomcat-8.0.27/webapps/Sidonie.war has finished in 7 419 ms Damien