From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Jan Nieuwenhuizen Newsgroups: gmane.lisp.guile.user Subject: libguile/eval.c: parse failed on input "x37" [WAS: [ANN] nyacc 0.80.3 released] Date: Mon, 24 Jul 2017 14:59:09 +0200 Organization: AvatarAcademy.nl Message-ID: <877eyygfdu.fsf@gnu.org> References: <2D72B3FB-6075-4F56-8698-6AC5BA96B2C0@gmail.com> NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-Trace: blaine.gmane.org 1500901202 12542 195.159.176.226 (24 Jul 2017 13:00:02 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Mon, 24 Jul 2017 13:00:02 +0000 (UTC) User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/25.2 (gnu/linux) Cc: Guile User To: Matt Wette Original-X-From: guile-user-bounces+guile-user=m.gmane.org@gnu.org Mon Jul 24 14:59:52 2017 Return-path: Envelope-to: guile-user@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1dZcxd-0002M8-8Q for guile-user@m.gmane.org; Mon, 24 Jul 2017 14:59:45 +0200 Original-Received: from localhost ([::1]:54742 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dZcxi-0006oO-Hx for guile-user@m.gmane.org; Mon, 24 Jul 2017 08:59:50 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:51806) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dZcxJ-0006oE-U1 for guile-user@gnu.org; Mon, 24 Jul 2017 08:59:27 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1dZcxG-0000Ul-Qs for guile-user@gnu.org; Mon, 24 Jul 2017 08:59:26 -0400 Original-Received: from fencepost.gnu.org ([2001:4830:134:3::e]:41581) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dZcx5-0000Qo-HL; Mon, 24 Jul 2017 08:59:11 -0400 Original-Received: from peder.onsbrabantnet.nl ([88.159.206.46]:40328 helo=dundal.peder.onsbrabantnet.nl) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1dZcx4-0003NS-W7; Mon, 24 Jul 2017 08:59:11 -0400 X-Url: http://AvatarAcademy.nl In-Reply-To: <2D72B3FB-6075-4F56-8698-6AC5BA96B2C0@gmail.com> (Matt Wette's message of "Sun, 18 Jun 2017 15:07:58 -0700") X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 2001:4830:134:3::e X-BeenThere: guile-user@gnu.org X-Mailman-Version: 2.1.21 Precedence: list List-Id: General Guile related discussions List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guile-user-bounces+guile-user=m.gmane.org@gnu.org Original-Sender: "guile-user" Xref: news.gmane.org gmane.lisp.guile.user:13979 Archived-At: Matt Wette writes: The below condensed excerpt from Guile's eval.c gives (unknown):1: parse failed at state 299, on input "x37" scaffold/tests/t.c:55: C99 parse error This looks pretty tricky and I'm not really working on this atm, just thought to let you know. Greetings, janneke typedef int scm_t_bits; typedef int scm_t_cell; typedef int *SCM; #define SCM_UNPACK(x) ((scm_t_bits) (x)) #define SCM_UNPACK_POINTER(x) ((scm_t_bits *) (SCM_UNPACK (x))) #define SCM_PACK_POINTER(x) (SCM_PACK ((scm_t_bits) (x))) #define SCM2PTR(x) ((scm_t_cell *) (SCM_UNPACK_POINTER (x))) #define SCM_GC_CELL_OBJECT(x, n) (((SCM *)SCM2PTR (x)) [n]) #define SCM_GC_CELL_WORD(x, n) (SCM_UNPACK (SCM_GC_CELL_OBJECT ((x), (n))= )) #define SCM_CELL_WORD(x, n) SCM_GC_CELL_WORD ((x), (n)) #define SCM_CELL_WORD_0(x) SCM_CELL_WORD ((x), 0) #define SCM_CELL_TYPE(x) SCM_CELL_WORD_0 (x) #define SCM_IMP(x) (6 & SCM_UNPACK (x)) #define SCM_NIMP(x) (!SCM_IMP (x)) #define SCM_HEAP_OBJECT_P(x) (SCM_NIMP (x)) #define SCM_TYP7(x) (0x7f & SCM_CELL_TYPE (x)) #define SCM_HAS_HEAP_TYPE(x, type, tag) \ (SCM_NIMP (x) && type (x) =3D=3D (tag)) #define SCM_HAS_TYP7(x, tag) (SCM_HAS_HEAP_TYPE (x, SCM_TYP7, tag)) #define scm_tc7_atomic_box 0x37 int main () { return SCM_HAS_TYP7 (0, scm_tc7_atomic_box); } --=20 Jan Nieuwenhuizen | GNU LilyPond http://lilypond.org Freelance IT http://JoyofSource.com | Avatar=C2=AE http://AvatarAcademy.com