Graybyt3 Was Here

Linux host1.absolutelystunningcenterpieces.com 3.10.0-957.21.3.el7.x86_64 #1 SMP Tue Jun 18 16:35:19 UTC 2019 x86_64
Apache
69.167.136.200

longlongs.i

/* -----------------------------------------------------------------------------
 * longlongs.i
 *
 * Typemap addition for support of 'long long' type and 'unsigned long long 
 * Makes use of swig-def-foreign-class, so this header should be loaded
 * after allegrocl.swg and after any custom user identifier-conversion
 * functions have been defined.
 * ----------------------------------------------------------------------------- */

#ifdef Acl64Bit
%typemap(ctype) long long, unsigned long long "$1_ltype";
%typemap(out) long long, unsigned long long "$result = $1;";

%typemap(ffitype) long long ":nat";
%typemap(ffitype) unsigned long long ":unsigned-nat";

%typemap(lout) long long, unsigned long long "  #+64bit (cl::setq ACL_ffresult $body)";

#else
%typemap(out) long long, unsigned long long "$result = &$1;";
%typemap(ffitype) long long "(:struct (l1 :long) (l2 :long))";

%typemap(ffitype) unsigned long long "(:struct (l1 :unsigned-long) (l2 :unsigned-long))";

%typemap(lout) long long 
"  (cl::setq ACL_ffresult (make-instance '#.(swig-insert-id \"longlong\" () :type :class)
                  :foreign-address $body))";

%typemap(lout) unsigned long long
"  (cl:setq ACL_ffresult (make-instance '#.(swig-insert-id \"ulonglong\" () :type :class)
                  :foreign-address $body))";

#endif

%typemap(in) long long, unsigned long long "$1 = $input;";

%insert("lisphead") %{

#-64bit
(swig-def-foreign-class "longlong"
 (ff:foreign-pointer)
 (:struct (l1 :long) (l2 :long)))

#-64bit
(swig-def-foreign-class "ulonglong"
 (ff:foreign-pointer)
 (:struct (l1 :unsigned-long) (l2 :unsigned-long)))
%}

System Information
*ReClick For Close
File : BlackDragon /wanderfuls/about.php

Name	Type	Size	Owner/Group	Permission	Last Modified	Actions
.	dir	-	root/root	0755	2019-06-29 08:18:58
..	dir	-	root/root	0755	2019-06-29 08:18:59
allegrocl.swg	file	23.68 KB	root/root	0644	2016-11-05 04:22:53
inout_typemaps.i	file	4.34 KB	root/root	0644	2016-11-05 04:22:53
longlongs.i	file	1.58 KB	root/root	0644	2016-11-05 04:22:53
std_list.i	file	4.74 KB	root/root	0644	2016-11-05 04:22:53
std_string.i	file	6.52 KB	root/root	0644	2016-11-05 04:22:53
typemaps.i	file	87 B	root/root	0644	2016-11-05 04:22:53