diff options
Diffstat (limited to 'src/interp/sys-macros.lisp')
-rw-r--r-- | src/interp/sys-macros.lisp | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/interp/sys-macros.lisp b/src/interp/sys-macros.lisp index fac17612..0e2ec836 100644 --- a/src/interp/sys-macros.lisp +++ b/src/interp/sys-macros.lisp @@ -1,6 +1,6 @@ ;; Copyright (c) 1991-2002, The Numerical Algorithms Group Ltd. ;; All rights reserved. -;; Copyright (C) 2007-2010, Gabriel Dos Reis. +;; Copyright (C) 2007-2011, Gabriel Dos Reis. ;; All rights reserved. ;; ;; Redistribution and use in source and binary forms, with or without @@ -1259,3 +1259,6 @@ (defmacro |spadConstant| (dollar n) `(spadcall (svref ,dollar (the fixnum ,n)))) + +(defmacro |getShellEntry| (dollar n) + `(svref ,dollar ,n)) |