Displaying 16 results from an estimated 16 matches for "stringlength".
2009 Sep 04
0
passing character vectors to FORTRAN
...no FORTRAN expert, and I would like to hear your thoughts about it. The basic idea is to convert the strings to integers, transfer the resulting integer vector to FORTRAN, and then convert back to characters. Here's an example:
####### start of fortran code
subroutine readchar(intstring,stringlengths,totalnchar,nstrings)
implicit none
C global variables
integer totalnchar,nstrings
integer intstring(totalnchar),stringlengths(nstrings)
C local variables
integer j,count, stringLength, i1, i2
parameter(stringLength = 1000)
character c*(stringLength...
2007 Jul 02
0
Branch 'as' - 4 commits - libswfdec/swfdec_as_interpret.c test/trace
...race/chartoascii-6.swf |binary
test/trace/chartoascii-6.swf.trace | 1008 +++++++++++++++++++++++++++++++++++
test/trace/chartoascii-7.swf |binary
test/trace/chartoascii-7.swf.trace | 1008 +++++++++++++++++++++++++++++++++++
test/trace/chartoascii.as | 20
test/trace/stringlength-5.swf |binary
test/trace/stringlength-5.swf.trace | 501 +++++++++++++++++
test/trace/stringlength-6.swf |binary
test/trace/stringlength-6.swf.trace | 501 +++++++++++++++++
test/trace/stringlength-7.swf |binary
test/trace/stringlength-7.swf.trace | 501 +++++++++++++++++
te...
2007 Jul 02
0
[PATCH] Implement StringLength + simple testcase.
On 6/29/07, Andreas Henriksson <andreas at fatal.se> wrote:
> (I don't know if adobe flash player actually handles utf8 characters in a v4
> flash, or if it's ming doing something funny to the testcase. Anyway,
> using g_utf8_strlen gives same result as the official player in both v4, v5,
> ...)
>
Ming is encoding characters as UTF8, no matter the Flash version. I
2011 Nov 28
5
window manager interface commands for linux
How can i replicate this in Linux:
source(file.choose())
I've tried source(tkgetOpenFile()) but with no luck
2007 Aug 24
0
7 commits - libswfdec/swfdec_as_context.c libswfdec/swfdec_as_interpret.c libswfdec/swfdec_as_object.h libswfdec/swfdec_as_string.c test/trace
...7,13 @@ EXTRA_DIST = \
string-split-empty-6.swf.trace \
string-split-empty-7.swf \
string-split-empty-7.swf.trace \
+ string-trace.as \
+ string-trace-5.swf \
+ string-trace-5.swf.trace \
+ string-trace-6.swf \
+ string-trace-6.swf.trace \
+ string-trace-7.swf \
+ string-trace-7.swf.trace \
stringlength.as \
stringlength-5.swf \
stringlength-5.swf.trace \
diff --git a/test/trace/string-trace-5.swf b/test/trace/string-trace-5.swf
new file mode 100644
index 0000000..923ebed
Binary files /dev/null and b/test/trace/string-trace-5.swf differ
diff --git a/test/trace/string-trace-5.swf.trace b/test/t...
2018 Nov 01
4
Fwd: RFC: Adding debug information to LLVM to support Fortran
...s produces the following DWARF information.
DW_TAG_string_type:
DW_AT_name: “character(5)”
DW_AT_byte_size: 5
CHARACTER types can also have deferred length. This is supported in the new
metadata as follows.
!22 = !DIStringType(name: “character(*)!1”, size: 32, stringLength: !23,
stringLengthExpression: !DIExpression())
!23 = !DILocalVariable(scope: !3, arg: 4, file: !4, type: !5, flags:
DIFlagArtificial)
This will generate the following DWARF information.
DW_TAG_string_type:
DW_AT_name: character(*)!1
DW_AT_string_length: 0x9b (location list)...
2007 Nov 07
0
14 commits - libswfdec/swfdec_as_context.c libswfdec/swfdec_as_interpret.c libswfdec/swfdec_as_interpret.h libswfdec/swfdec_net_stream.c libswfdec/swfdec_script.c libswfdec/swfdec_sprite_movie.c libswfdec/swfdec_tag.c libswfdec/swfdec_text_field_movie.c
...-1, 0, swfdec_action_implements, 7 },
/* version 4 */
- [0x30] = { "RandomNumber", NULL, 1, 1, swfdec_action_random_number, 4 },
+ [SWFDEC_AS_ACTION_RANDOM] = { "RandomNumber", NULL, 1, 1, swfdec_action_random_number, 4 },
[SWFDEC_AS_ACTION_MB_STRING_LENGTH] = { "MBStringLength", NULL, -1, -1, NULL, 4 },
[SWFDEC_AS_ACTION_CHAR_TO_ASCII] = { "CharToAscii", NULL, 1, 1, swfdec_action_char_to_ascii, 4 },
[SWFDEC_AS_ACTION_ASCII_TO_CHAR] = { "AsciiToChar", NULL, 1, 1, swfdec_action_ascii_to_char, 4 },
commit 5f1c374cc2748bafd146e2424aad14786882a7...
2007 Apr 12
0
Branch 'as' - 14 commits - libswfdec-gtk/swfdec_playback_alsa.c libswfdec/swfdec_as_context.c libswfdec/swfdec_as_context.h libswfdec/swfdec_as_frame.c libswfdec/swfdec_as_frame.h libswfdec/swfdec_as_function.c libswfdec/swfdec_as_function.h
...dec_action_logical, swfdec_action_logical, swfdec_action_logical } },
[SWFDEC_AS_ACTION_NOT] = { "Not", NULL, 1, 1, { NULL, swfdec_action_not_4, swfdec_action_not_5, swfdec_action_not_5, swfdec_action_not_5 } },
-#if 0
- [0x13] = { "StringEquals", NULL },
- [0x14] = { "StringLength", NULL },
- [0x15] = { "StringExtract", NULL },
-#endif
+ [SWFDEC_AS_ACTION_STRING_EQUALS] = { "StringEquals", NULL },
+ [SWFDEC_AS_ACTION_STRING_LENGTH] = { "StringLength", NULL },
+ [SWFDEC_AS_ACTION_STRING_EXTRACT] = { "StringExtract", NULL },...
2018 Nov 01
2
RFC: Adding debug information to LLVM to support Fortran
...)
This produces the following DWARF information.
DW_TAG_string_type:
DW_AT_name: “character(5)”
DW_AT_byte_size: 5
CHARACTER types can also have deferred length. This is supported in the new metadata as follows.
!22 = !DIStringType(name: “character(*)!1”, size: 32, stringLength: !23, stringLengthExpression: !DIExpression())
!23 = !DILocalVariable(scope: !3, arg: 4, file: !4, type: !5, flags: DIFlagArtificial)
Can you take a look at how variable-length arrays in C99 are implemented in Clang at the moment? It would be nice to use a similar scheme here.
This will generate...
2007 Apr 05
0
Branch 'as' - 9 commits - configure.ac libswfdec/swfdec_as_context.c libswfdec/swfdec_as_frame.c libswfdec/swfdec_as_frame.h libswfdec/swfdec_as_function.h libswfdec/swfdec_as_interpret.c libswfdec/swfdec_as_object.c libswfdec/swfdec_as_object.h
...sp -= 3;
- return JS_TRUE;
-}
-
-static void
swfdec_action_new_comparison_6 (SwfdecAsContext *cx, guint action, const guint8 *data, guint len)
{
jsval lval, rval;
@@ -2347,7 +2294,9 @@ const SwfdecActionSpec swfdec_as_actions
[0x13] = { "StringEquals", NULL },
[0x14] = { "StringLength", NULL },
[0x15] = { "StringExtract", NULL },
- [0x17] = { "Pop", NULL, 1, 0, { NULL, swfdec_action_pop, swfdec_action_pop, swfdec_action_pop, swfdec_action_pop } },
+#endif
+ [SWFDEC_AS_ACTION_POP] = { "Pop", NULL, 1, 0, { NULL, swfdec_action_pop, swfdec_act...
2007 Jan 25
0
Branch 'interpreter' - 28 commits - configure.ac libswfdec/js libswfdec/swfdec_buffer.c libswfdec/swfdec_edittext_movie.c libswfdec/swfdec_js.c libswfdec/swfdec_js_global.c libswfdec/swfdec_js.h libswfdec/swfdec_js_movie.c libswfdec/swfdec_player.c
...", NULL },
[0x11] = { "Or", NULL },
- [0x12] = { "Not", NULL },
+ [0x12] = { "Not", NULL, 1, 1, { NULL, swfdec_action_not_4, swfdec_action_not_5, swfdec_action_not_5, swfdec_action_not_5 } },
[0x13] = { "StringEquals", NULL },
[0x14] = { "StringLength", NULL },
[0x15] = { "StringExtract", NULL },
@@ -938,12 +1007,12 @@ static const SwfdecActionSpec actions[25
[0x94] = { "With", NULL },
/* version 4 */
[0x96] = { "Push", swfdec_action_print_push, 0, -1, { NULL, swfdec_action_push, swfdec_action_push,...
2007 Apr 08
0
6 commits - libswfdec/Makefile.am libswfdec/swfdec_audio_flv.c libswfdec/swfdec_audio_flv.h libswfdec/swfdec_audio_stream.c libswfdec/swfdec_audio_stream.h libswfdec/swfdec_buffer.c libswfdec/swfdec_codec_adpcm.c libswfdec/swfdec_codec_audio.c
...ot_5, swfdec_action_not_5, swfdec_action_not_5 } },
- [0x13] = { "StringEquals", NULL },
+ [0x13] = { "StringEquals", NULL, 2, 1, { NULL, swfdec_action_string_equals, swfdec_action_string_equals, swfdec_action_string_equals, swfdec_action_string_equals } },
[0x14] = { "StringLength", NULL },
[0x15] = { "StringExtract", NULL },
[0x17] = { "Pop", NULL, 1, 0, { NULL, swfdec_action_pop, swfdec_action_pop, swfdec_action_pop, swfdec_action_pop } },
diff-tree db9f11b9b1f4ba2aa1122c94d0dc8ac459a074d1 (from e869d0ff88487c7f8998b190b849d7cb174fcaa4)
Autho...
2007 Jan 31
0
Branch 'interpreter' - 20 commits - autogen.sh configure.ac libswfdec/js libswfdec/swfdec_debug.h libswfdec/swfdec_js.c libswfdec/swfdec_js_color.c libswfdec/swfdec_js_movie.c libswfdec/swfdec_movie.c libswfdec/swfdec_movie.h libswfdec/swfdec_script.c
...ction_play } },
[0x07] = { "Stop", NULL, 0, 0, { swfdec_action_stop, swfdec_action_stop, swfdec_action_stop, swfdec_action_stop, swfdec_action_stop } },
[0x08] = { "ToggleQuality", NULL },
@@ -1494,10 +1655,10 @@ static const SwfdecActionSpec actions[25
[0x14] = { "StringLength", NULL },
[0x15] = { "StringExtract", NULL },
[0x17] = { "Pop", NULL, 1, 0, { NULL, swfdec_action_pop, swfdec_action_pop, swfdec_action_pop, swfdec_action_pop } },
- [0x18] = { "ToInteger", NULL },
+ [0x18] = { "ToInteger", NULL, 1, 1, { NULL, sw...
2007 Feb 06
0
109 commits - configure.ac libswfdec/js libswfdec/Makefile.am libswfdec/swfdec_bits.c libswfdec/swfdec_bits.h libswfdec/swfdec_buffer.c libswfdec/swfdec_button_movie.c libswfdec/swfdec_codec_screen.c libswfdec/swfdec_color.c libswfdec/swfdec_color.h
...t;, compile_binary_op },
- { 0x0e, "Equals", compile_equals },
- { 0x0f, "Less", compile_less },
- { 0x10, "And", NULL },
- { 0x11, "Or", NULL },
- { 0x12, "Not", compile_oneliner },
- { 0x13, "StringEquals", NULL },
- { 0x14, "StringLength", NULL },
- { 0x15, "StringExtract", NULL },
- { 0x17, "Pop", compile_oneliner },
- { 0x18, "ToInteger", compile_to_integer },
- { 0x1c, "GetVariable", compile_get_variable },
- { 0x1d, "SetVariable", compile_set_variable },
- { 0x20, &qu...
2007 Apr 04
0
Branch 'as' - 4 commits - libswfdec/Makefile.am libswfdec/swfdec_as_context.c libswfdec/swfdec_as_frame.c libswfdec/swfdec_as_interpret.c libswfdec/swfdec_as_interpret.h libswfdec/swfdec_as_object.c libswfdec/swfdec_as_types.c libswfdec/swfdec_as_types.h
...N (val)) {
+ return JSVAL_TO_BOOLEAN (val);
+ } else if (JSVAL_IS_INT (val)) {
+ return JSVAL_TO_INT (val) != 0;
+ } else if (JSVAL_IS_DOUBLE (val)) {
+ double d = *JSVAL_TO_DOUBLE (val);
+ return d != 0.0 && !isnan (d);
+ } else if (JSVAL_IS_STRING (val)) {
+ return JS_GetStringLength (JSVAL_TO_STRING (val)) > 0;
+ } else if (JSVAL_IS_NULL (val)) {
+ return JS_FALSE;
+ } else if (JSVAL_IS_VOID (val)) {
+ return JS_FALSE;
+ } else if (JSVAL_IS_OBJECT (val)) {
+ return JS_TRUE;
+ }
+ g_assert_not_reached ();
+ return JS_FALSE;
+}
+
+static double
+swfdec_value_to...
2007 Mar 12
0
11 commits - libswfdec/js libswfdec/swfdec_loader.c libswfdec/swfdec_root_sprite.c libswfdec/swfdec_script.c player/swfdebug.c player/swfdec_player_manager.c test/trace
...N (val)) {
+ return JSVAL_TO_BOOLEAN (val);
+ } else if (JSVAL_IS_INT (val)) {
+ return JSVAL_TO_INT (val) != 0;
+ } else if (JSVAL_IS_DOUBLE (val)) {
+ double d = *JSVAL_TO_DOUBLE (val);
+ return d != 0.0 && !isnan (d);
+ } else if (JSVAL_IS_STRING (val)) {
+ return JS_GetStringLength (JSVAL_TO_STRING (val)) > 0;
+ } else if (JSVAL_IS_NULL (val)) {
+ return JS_FALSE;
+ } else if (JSVAL_IS_VOID (val)) {
+ return JS_FALSE;
+ } else if (JSVAL_IS_OBJECT (val)) {
+ return JS_TRUE;
+ }
+ g_assert_not_reached ();
+ return JS_FALSE;
+}
+
static double
swfdec_value_to...